Что нового

Проверить валидность функции HotKeySet в коде скрипта

dr.room

Новичок
Сообщения
283
Репутация
0
Идея такова
Придумываем 2 горячие клавиши: пауза и выход
Но так чтобы при нажатии на паузу выскакивало окно об состоянии выполнения скрипта
Идея не моя, просто объединил разрозненные элементы в одном скрипте
Вопрос только - а всё ли правильно ? :smile:
Код:
#cs ----------------------------------------------------------------------------

 AutoIt Version: 3.3.14.2
 Author:         myName

 Script Function:
	Template AutoIt script.

#ce ----------------------------------------------------------------------------

; Script Start - Add your code below here

HotKeySet("{ESC}", "_Exit")
Global $Paused
HotKeySet("{F9}", "TogglePause")

Func _Exit()
    Exit
EndFunc   ;==>_Exit

Func TogglePause()
    $Paused = Not $Paused
    If $Paused Then
        ToolTip('Пауза!', 0, 0, 'Внимание', 1, 5)
        TrayTip('Внимание', 'Пауза!', 3, 1)
    Else
        ToolTip('', 0, 0)
        TrayTip('', '', 0)
    EndIf
    While $Paused
;~         Sleep(300)
    WEnd
EndFunc   ;==>TogglePause

;~ Любой произвольный код для проверки работы паузы
MsgBox(0, "Предупреждение" , "Окно№1")
Sleep(500)
MsgBox(0, "Предупреждение" , "Окно№2")
Sleep(500)
MsgBox(0, "Предупреждение" , "Окно№3")
Sleep(500)
MsgBox(0, "Предупреждение" , "Окно№4")
Sleep(500)
MsgBox(0, "Предупреждение" , "Окно№5")
Sleep(500)
MsgBox(0, "Предупреждение" , "Окно№6")
;~ и т.д  и т.п. ...
 
Верх