redefine a hotkey based on realtime user input

[DarkBoost]

I added HotKeySet() within the "Func MY_WM_COMMAND($hWnd, $Msg, $wParam, $lParam)" so that a user can adjust a hotkey realtime however it is not overwriting/updating the Hotkey instead it is adding a new HotKeySet(). Could someone please advise of a better approach to this?

[Melba23]

DarkBoost,

I posted some code yesterday which does exactly what you want.

Take a look and come back if you have any questions or you run into difficulty incorporating the idea into your script.

M23

[DarkBoost]

ah I see... you set the existing hotkey to "" and then create a new hotkey. I would think that this would still end up creating many hotkeys which are unassigned but maybe still not affecting the scripts performance?

here is my working example:

expandcollapse popup

#include <GUIConstantsEx.au3>
#include <EditConstants.au3>
#include <ButtonConstants.au3>
#include <WindowsConstants.au3>

Dim $msg, $input[5]
Dim $hotkey = "x"

GUICreate("hotkey-example", 300, 60)
    $input[0] = 4
    $input[1] = GUICtrlCreateInput($hotkey, 10, 20, 50, 20, $ES_CENTER)
    $input[2] = GUICtrlCreateCheckbox("CTRL", 90, 20, 60, 20, $BS_CENTER)
    $input[3] = GUICtrlCreateCheckbox("ALT", 160, 20, 60, 20, $BS_CENTER)
    $input[4] = GUICtrlCreateCheckbox("SHIFT", 230, 20, 60, 20, $BS_CENTER)
    GUICtrlSetState($input[2], $GUI_FOCUS)
    HotKeySet($hotkey, "hotkey_display")
GUIRegisterMsg($WM_COMMAND, "MY_WM_COMMAND")
GUISetState(@SW_SHOW)

While 1
    $msg = GUIGetMsg()
    Select
        Case $msg = $GUI_EVENT_CLOSE
            Exit
    EndSelect
WEnd

Func MY_WM_COMMAND($hWnd, $Msg, $wParam, $lParam)
    Local $nNotifyCode = BitShift($wParam, 16)
    Local $nID = BitAND($wParam, 0x0000FFFF)
    Local $hCtrl = $lParam

    HotKeySet($hotkey, "hotkey_empty")
    $hotkey = ""
    If GUICtrlRead($input[2]) = 1 Then $hotkey &= "^"
    If GUICtrlRead($input[3]) = 1 Then $hotkey &= "!"
    If GUICtrlRead($input[4]) = 1 Then $hotkey &= "+"
    If GUICtrlRead($input[1]) <> "" Then $hotkey &= GUICtrlRead($input[1])
    HotKeySet($hotkey, "hotkey_display")
EndFunc

Func hotkey_empty()
EndFunc

Func hotkey_display()
    MsgBox(0, "", $hotkey)
EndFunc

Edited September 28, 2010 by DarkBoost

[Melba23]

DarkBoost,

If you think about it, you start with all the possible HotKey combinations unassigned - using HotKeySet just tells Windows that a particular function should be associated with a particular key combination. Unsetting the HotKey just returns that key combination to its original state, so it will certainly not affect performance.

M23