#include <GUIConstantsEx.au3>

Global $g_idUserDummy, $g_iState = 0, $bEndScript = False

Example()

Func Example()
    Opt("GUIOnEventMode", 1) ; Définit l'option GUIOnEventMode.

    GUICreate("GUISendToDummy", 220, 200, 100, 200)
    GUISetBkColor(0x00E0FFFF) ; Change la couleur du fond de la GUI.
    GUISetOnEvent($GUI_EVENT_CLOSE, "OnExit") ; Définit un événement pour appeler la fonction 'OnExit'.

    $g_idUserDummy = GUICtrlCreateDummy()
    GUICtrlSetOnEvent(-1, "OnDummy") ; Définit un événement pour appeler la fonction 'OnExit' lorsque ce contrôle est sélectionné.

    GUICtrlCreateButton("Click", 70, 170, 85, 25)
    GUICtrlSetOnEvent(-1, "OnClick") ; Définit un événement pour appeler la fonction 'OnClick' lorsque ce contrôle est sélectionné.

    GUICtrlSendToDummy($g_idUserDummy, 1) ; Définit l'état coché sur Onclick

    ; Affiche la GUI.
    GUISetState(@SW_SHOW)

    ; Boucle jusqu'à ce que l'utilisateur quitte.
    While not $bEndScript
        Sleep(100)
    WEnd
EndFunc   ;==>Example

Func OnClick()
    ; Envoie un message au contrôle Dummy que le bouton de fermeture a été sélectionné, et que la fonction 'OnExit' va être appelée.
    Return GUICtrlSendToDummy($g_idUserDummy)
EndFunc   ;==>OnClick

Func OnDummy()
    If GUICtrlRead($g_idUserDummy) Then
        GUISetBkColor(0x000000FF) ; Change la couleur de fond de la GUI sur l'état du Dummy
    Else
        $bEndScript = True
    EndIf
EndFunc   ;==>OnDummy

Func OnExit()
    $bEndScript = True ; Fin du script.
EndFunc   ;==>OnExit