如何禁止 热键 重复使用?[已解决]

wu5cheng3_bak

当按下热键，继续按热键连续运行函数_exit() 按多少次后面就出现多少次InputBox,

如何让这个函数_exit() 运行出现InputBox时，禁用热键呢?


[au3]
Opt("TrayMenuMode", 3)

Global Const $TRAY_EVENT_PRIMARYDOUBLE = -13

HotKeySet("+!z", "_exit")

While 1
        Sleep(50)
        tray()
WEnd

Func tray()
        $msg = TrayGetMsg()
        Select
                Case $msg = $TRAY_EVENT_PRIMARYDOUBLE
                        _exit()
        EndSelect
EndFunc

Func _exit()
    InputBox("1", "2", "", "*", 100, 20, @DesktopWidth / 2 - 100, @DesktopHeight / 2 - 100, 2)
EndFunc
[/au3]

zldfsz

最后一个函数改成这样

Func _exit()
        HotKeySet("+!z")
    InputBox("1", "2", "", "*", 100, 20, @DesktopWidth / 2 - 100, @DesktopHeight / 2 - 100, 2)
        HotKeySet("+!z", "_exit")
EndFunc

wu5cheng3_bak

回复 2# zldfsz


非常感谢Z兄,果然熬夜对脑袋不好,帮助文档都不看了!~

HotKeySet ( "热键" [, "函数名"] )

参数
热键 要设置的热键,按键格式与 Send() 函数使用的一样.  
函数名 [可选参数] 按下热键后要调用的函数名.留空则撤销此前设置的热键.