GUI timeout

[xah]

I want to set a timeout for the GUI, but I can't get it to work.

expandcollapse popup

#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <Timers.au3>

Local $doorgaan, $overslaan, $msg

$hGUI = GUICreate("AH-Tool", 190, 85)
GUISetStyle(BitOR($WS_CAPTION, $WS_POPUPWINDOW) )

GUICtrlCreateLabel("LOT01101", 10, 10)
$doorgaan = GUICtrlCreateButton("Doorgaan", 10, 30, 80, 20)
$overslaan = GUICtrlCreateButton("Overslaan", 100, 30, 80, 20)

GUISetState() ; display the GUI
_Timer_SetTimer($hGUI, 2000, "Quit"); create timer

While 1
    $msg = GUIGetMsg()
    Sleep(1000)
    Switch $msg
        Case $doorgaan
            GUIDelete()
            MsgBox(0, "Info", "$doorgaan")
            Exit
        Case $overslaan
            GUIDelete()
            MsgBox(0, "Info", "$overslaan")
            Exit
        Case $GUI_EVENT_CLOSE
            GUIDelete()
            Exit
    EndSwitch
WEnd

Func Quit()
    Exit
EndFunc

Help please, I just need this GUI to timeout and quit.

[KaFu]

The called func expects params.

expandcollapse popup

#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <Timers.au3>

Local $doorgaan, $overslaan, $msg

$hGUI = GUICreate("AH-Tool", 190, 85)
GUISetStyle(BitOR($WS_CAPTION, $WS_POPUPWINDOW) )

GUICtrlCreateLabel("LOT01101", 10, 10)
$doorgaan = GUICtrlCreateButton("Doorgaan", 10, 30, 80, 20)
$overslaan = GUICtrlCreateButton("Overslaan", 100, 30, 80, 20)

GUISetState() ; display the GUI
_Timer_SetTimer($hGUI, 2000, "Quit")

While 1
    $msg = GUIGetMsg()
    Sleep(10)
    Switch $msg
        Case $doorgaan
            GUIDelete()
            MsgBox(0, "Info", "$doorgaan")
            Exit
        Case $overslaan
            GUIDelete()
            MsgBox(0, "Info", "$overslaan")
            Exit
        Case $GUI_EVENT_CLOSE
            GUIDelete()
            Exit
    EndSwitch
WEnd

Func Quit($hWnd, $Msg, $iIDTimer, $dwTime)
    Exit
EndFunc

[xah]

Yes, that's what I was missing. Thanks!