deny
Новичок
- Сообщения
- 50
- Репутация
- 2
Как сделать в скрипте ,чтоб так отображался sleep (11*6000)
в панели задач
в панели задач
Код:
Global $k=0
$Gui = GUICreate("Нажми Start", 370, 140, -1, -1, 0x00040000+0x00020000)
GUICtrlCreateLabel('Изменить, текущий 300 мсек.', 5, 5, 360, 60)
$Start = GUICtrlCreateButton('Start', 10, 70, 70, 25)
$Stop = GUICtrlCreateButton('Stop', 90, 70, 70, 25)
GUISetState()
While 1
$msg = GUIGetMsg()
Select
Case $msg = $Start
_Start()
Case $msg = $Stop
_Stop()
Case $msg = -3
Exit
EndSelect
WEnd
Func _Start()
GUIRegisterMsg(0x0113, "WM_TIMER")
DllCall("User32.dll", "int", "SetTimer", "hwnd", $Gui, "int", 50, "int", 300, "int", 0) ; здесь 300 - установка интервала вызова WM_TIMER
EndFunc
Func _Stop()
GUIRegisterMsg(0x0113, '')
DllCall("user32.dll", "int", "KillTimer", "hwnd", $Gui, "int*", 50)
EndFunc
Func WM_TIMER()
$k+=1
WinSetTitle($Gui, '', 'Вызов ' &$k& ' раз')
EndFunc