How to make a 'private' hot key with AutoIt?

[chenxu]

We can define a hot key in our scripts by HotKeySet(), but, it is a global hot key, I now need to make a private one, which is only work when the AutoIt GUI is activated? How to do this?

[JFee]

In your GUI's while loop make a condition:

Global $hotKeyIsSet

;Create $GUI here

While 1
    If WinActive("Title of window") AND $hotKeyIsSet = 0 Then 
        HotkeySet("^+Q", "hotkeyfunc")
        $hotKeyIsSet = 1
    EndIf
    If Not WinActive("Title of window") AND $hotKeyIsSet = Then
        HotkeySet("^+Q")
        $hotKeyIsSet = 0
    EndIf

WEnd

[ProgAndy]

Use GUISetAccelerators muttley

Or do the Check in

WM_ACTIVATEAPP 0x001C

Edited July 18, 2008 by ProgAndy

[Xand3r]

HotKetSet("key" , "func")

Func func()
HotKeySet("key")
Send("key")
If WinActive($yourgui) then
;action
EndIf
HotKetSet("key" , "func")
EndFunc

[JFee]

HotKetSet("key" , "func")

Func func()
HotKeySet("key")
Send("key")
If WinActive($yourgui) then
;action
EndIf
HotKetSet("key" , "func")
EndFunc

When are you suggesting calling that function? If you do it every time it loops through the while, then you are doing a ton of redundant hotkeysets. Also why the Send? (Not being critical, just curious)

That also seems to be redundant because you are clearing the hotkey, then resetting it if the window is open instead of setting the hotkey once when the window becomes active, and clearing it once when it isn't.

[NELyon]

Why is everyone putting too much thought into this?

$hGUI = GUICreate("Test", 500, 500)
$hDummy = GUICtrlCreateDummy()
$hDummy2 = GUICtrlCreateDummy()
Dim $azAccelerators[2][2] = [["^e", $hDummy],["^y", $hDummy2]]
GUISetAccelerators($azAccelerators)
GUISetState()
While 1
    Switch GUIGetMsg()
        Case - 3, $hDummy
            Exit
        Case $hDummy2
            MsgBox(0, "Hey", "Sup")
    EndSwitch
WEnd

Ctrl+E Exits, Ctrl+Y Greets you.

[chenxu]

Why is everyone putting too much thought into this?

$hGUI = GUICreate("Test", 500, 500)
$hDummy = GUICtrlCreateDummy()
$hDummy2 = GUICtrlCreateDummy()
Dim $azAccelerators[2][2] = [["^e", $hDummy],["^y", $hDummy2]]
GUISetAccelerators($azAccelerators)
GUISetState()
While 1
    Switch GUIGetMsg()
        Case - 3, $hDummy
            Exit
        Case $hDummy2
            MsgBox(0, "Hey", "Sup")
    EndSwitch
WEnd

Ctrl+E Exits, Ctrl+Y Greets you.

My AutoIt claim the error:

ERROR: GUISetAccelerators(): undefined function.

Why?

[NELyon]

My AutoIt claim the error:

ERROR: GUISetAccelerators(): undefined function.

Why?

You must have an old version. Update.