saavaage,
Я не совсем понял, Вам надо отдельное окно с прогресс-баром? Если нет, то попробуйте так:
Код:
#include <GUIConstantsEx.au3>
$j = False
$i = 0
$z = 2
#region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 300, 200, -1, -1)
$Label1 = GUICtrlCreateLabel('', 125, 20, 50, 20)
$Progress1 = GUICtrlCreateProgress(50, 50, 200, 20)
$Button1 = GUICtrlCreateButton("Start", 100, 100, 100, 50)
GUISetState(@SW_SHOW)
#endregion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Button1
$j = Not $j
If $j Then
GUICtrlSetData($Button1, "Stop")
GUICtrlSetData($Label1, "Work")
AdlibRegister('_MyFunc', 50)
Else
GUICtrlSetData($Button1, "Start")
GUICtrlSetData($Label1, "No Work")
AdlibUnRegister('_MyFunc')
EndIf
EndSwitch
WEnd
Func _MyFunc()
$i += $z
If $i = 100 Then $z = -2
If $i = 0 Then $z = 2
GUICtrlSetData($Progress1, $i)
EndFunc ;==>_MyFunc