GUICtrlOnEvent - Set events without using OnEvent mode

[MrCreatoR]

This small UDF allows to set events for the controls without using GUIOnEventMode.

Also the events function can accept parameters (actually one parameter, which can be an array).

 

Remark: $WM_COMMAND registered by this UDF, so if you or other UDF uses this message, please call __GCSOEE_WM_COMMAND($hWnd, $iMsg, $wParam, $lParam) from that message function to allow this UDF to work properly.

Not relevant anymore.

 

Example:

#include <GUIConstantsEx.au3>
#include 'GUICtrlOnEvent.au3'

$hGUI = GUICreate('GUICtrlOnEvent Example', 300, 200)

$iButton = GUICtrlCreateButton('Button', 20, 40, 60, 20)
_GUICtrlOnEvent_SetEvent($iButton, _Events, 'Button Param')

$iLabel = GUICtrlCreateLabel('Label', 20, 80, 60, 20)
_GUICtrlOnEvent_SetEvent($iLabel, _Events, 'Label Param')

$iInput = GUICtrlCreateInput('Input', 20, 120, 60, 20)
_GUICtrlOnEvent_SetEvent($iInput, _Events, 'Input Param')

Dim $aEventKeys[] = [$VK_LBUTTON, $VK_RETURN]
_GUICtrlOnEvent_SetEventKeys($aEventKeys)

GUISetState(@SW_SHOW, $hGUI)

While 1
    Switch GUIGetMsg()
        Case $GUI_EVENT_CLOSE
            Exit
    EndSwitch
WEnd

Func _Events($hWnd, $iCtrlID, $vParam)
    Switch $iCtrlID
        Case $iButton
            MsgBox(64, $vParam, 'Clicked Button ID: ' & $iCtrlID, 0, $hWnd)
        Case $iLabel
            MsgBox(64, $vParam, 'Clicked Label ID: ' & $iCtrlID, 0, $hWnd)
        Case $iInput
            MsgBox(64, $vParam, 'Clicked Input ID: ' & $iCtrlID, 0, $hWnd)
    EndSwitch
EndFunc

 

GUICtrlSetOnEventEx.zip

GUICtrlOnEvent_0.2.zip

Edited June 6, 2020 by MrCreatoR

[argumentum]

Thanks for sharing. Adding an Input control, it triggers non-stop  
( tested due to my need with Input control )

[MrCreatoR]

The question is, what is considered an event, if it's only a click, then the solution is simple.

[MrCreatoR]

Update...

Quote

v0.2

* UDF renamed to GUICtrlOnEvent.
* _GUICtrlSetOnEventEx renamed to _GUICtrlOnEvent_SetEvent.
+ Added _GUICtrlOnEvent_SetEventKeys function to set keys trigger.
* Removed $WM_COMMAND message registration.
* Fixed issue with constantly executed event.

 

Edited June 6, 2020 by MrCreatoR