Define hotkeys via script possible?

I have a combobox with four items. In the message loop I defined a combochange event. For each value of the combobox some controls are enabled/disabled a column is shown/hidden and such. It works fine when I manually change the combobox value but with the hotkey the combobox just changes it's "label".

A short example from my message loop code:

[code]Do
Set msg = dlg.GetMsg()
comboChange = If (msg.event = "selchange" And Msg.control = "combo1")

If (comboChange And dlg.Control("combo1").value = 2) Then
dlg.Control("edit2").enabled = False
dlg.Control("edit2").value = ""

    If (colIndex = False And arg.got_arg.colindex = True) Then
        cmd.RunCommand("Set COLUMNSREMOVE=index")
    End If

End If
Loop While msg[/code]

Thinking about it again I should only need to integrate the hotkey event like this: If ((comboChange Or hotkey_val2) And dlg.Control("combo1").value = 2)) Then

[quote]Thinking about it again I should only need to integrate the hotkey event like this: If ((comboChange Or hotkey_val2) And dlg.Control("combo1").value = 2)) Then[/quote]Got it working with this. Thanks for your patience.