|
发表于 2016-9-18 09:26:11
|
显示全部楼层
回复 1# cashiba
查看帮助文件
#include <MsgBoxConstants.au3>
; 点击 Esc 键中止脚本, 点击 Pause/Break 键暂停脚本
Global $g_bPaused = False
HotKeySet("{PAUSE}", "TogglePause")
HotKeySet("{ESC}", "Terminate")
HotKeySet("+!d", "ShowMessage") ; Shift-Alt-d
While 1
Sleep(100)
WEnd
Func TogglePause()
$g_bPaused = Not $g_bPaused
While $g_bPaused
Sleep(100)
ToolTip('Script is 脚本"暂停"', 0, 0)
WEnd
ToolTip("")
EndFunc ;==>TogglePause
Func Terminate()
Exit
EndFunc ;==>Terminate
Func ShowMessage()
MsgBox($MB_SYSTEMMODAL, "", "这是一条消息.")
EndFunc ;==>ShowMessage |
|