AutoIt 设置快捷键 -> HotKeySet
使用 AutoIt 编制 GUI 程序时，可以自定义快捷键。通常可以使用下面的代码：
1 ; FILENAME HotKeySetDemo01.au3
2 ; PURPOSE: Hotkey demo
3 ; CREATED BY: @kysnail at
4 ; NOTE:
5 ;
6 ;
7 ; RESOURCE:
8 ;
9 ;
10 ; Press Esc to terminate script, Pause/Break to "pause"
11
12 ; Flag variable 'start/pause' the script
13 Global $Paused
14 ; Win Key + XXX
15 HotKeySet("#o", "WinHotKey")
16 ; CONTROL + ALT + XXX
17 HotKeySet("^!a", "CtlAltHotkey")
18 ; ALT + SHIFT + XXX
19 HotKeySet("!+a", "ShiAltHotKey")
20 ; {ESC}
21 HotKeySet("{ESC}", "Terminate")
22 ; {DOWN} -> Move down a menu
23 HotKeySet("{DOWN}", "MoveDownMenu")
24 ; Toggle the state
25 HotKeySet("{PAUSE}", "TogglePause")
26
27 ;;;; Body of program would go here ;;;;
28 While 1
29 Sleep(100)
30 WEnd
31 ;;;;;;;;
32
33 Func TogglePause()
34 $Paused = Not $Paused
35 While $Paused
36 Sleep(100)
37 ToolTip('Script is "Paused"', 2)
38 WEnd
39 ToolTip("")
40 EndFunc ;==>TogglePause
41
42 ; Terminate the demo
43 Func Terminate()
44 Exit 0
45 EndFunc ;==>Terminate
46
47 ; Move down a menu
48 Func MoveDownMenu()
49 MsgBox(4096, "MoveDownMenu Function", "You just move down a menu!")
50 EndFunc ;==>ShowMessage
51
52 ; Window Key + Key
53 Func WinHotKey()
54 MsgBox(0, "WinHotKey Function", "Actived by 'Win Key'")
55 EndFunc
56
57 ; Control + Alt + Key
58 Func CtlAltHotkey()
59 MsgBox(0, "CtlAltHotKey Function", "Actived by 'Ctrl + Alt + a'")
60 EndFunc ;==>CtlAltHotKey
61
62 ; Shift + Alt + Key
63 Func ShiAltHotKey()
64 MsgBox(0, "ShiAltHotKey Function", "Actived by 'Shift + Alt + a")
65 EndFunc
HotKeySet 函数的说明如下：
Sets a hotkey that calls a user function.
HotKeySet ( "key" [, "function"] )
根据定义的描述可知，HotKeySet 主要用来对用户自定义函数进行快捷设置。
