shutdown mit timer

  • hallo
    habe eine gui erstellt wo er in einer inputbox nach einer zeit fragt
    und wenn man dann auf den ok button klickt
    soll er nach der angegebenen zeit den shutdown(1) befehl einfügen
    es funktioniert auch aber wenn ich das pogramm benden will und dann auf das rote x klicke
    bendet sich das pogramm aber er führt auch den shutdown(1) befehl aus

    Quelcode

    Spoiler anzeigen
    [autoit]

    #include <GUIConstantsEx.au3>
    GUICreate("Zählen", 320, 120)
    $anzahli = GUICtrlCreateInput("", 10, 5, 300, 20)
    $btn = GUICtrlCreateButton("Ok", 40, 75, 60, 20)
    $label = GUICtrlCreateLabel(" Zähler:", 0, 100 ,999,30)
    GUISetState()

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

    $msg = 0
    While $msg <> $GUI_EVENT_CLOSE
    $msg = GUIGetMsg()
    Select
    Case $msg = $btn
    $anzahl = GUICtrlRead($anzahli)
    $i = $anzahl
    $time = 60000*$i
    AdlibRegister("_Update",$time)
    EndSelect
    WEnd

    [/autoit] [autoit][/autoit] [autoit]

    Shutdown(1)
    Func _Update()
    ;~ MsgBox(0,"title","text")
    Shutdown(1)
    AdlibUnRegister("_Update")
    EndFunc

    [/autoit]


    wie mache ich das das das alles funktioniert
    MFG

  • Du hast ja auch nochmals Shutdown(1) am Ende des Skrips drin (Zeile 23)

    Spoiler anzeigen
    [autoit]

    #include <GUIConstantsEx.au3>
    GUICreate("Zählen", 320, 120)
    $anzahli = GUICtrlCreateInput("", 10, 5, 300, 20)
    $btn = GUICtrlCreateButton("Ok", 40, 75, 60, 20)
    $label = GUICtrlCreateLabel(" Zähler:", 0, 100, 999, 30)
    GUISetState()

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

    $msg = 0
    While $msg <> $GUI_EVENT_CLOSE
    $msg = GUIGetMsg()
    Select
    Case $msg = $btn
    $anzahl = GUICtrlRead($anzahli)
    $i = $anzahl
    $time = 60000 * $i
    AdlibRegister("_Update", $time)
    EndSelect
    WEnd

    [/autoit] [autoit][/autoit] [autoit]

    ;~ Shutdown(1)
    Func _Update()
    MsgBox(0, "title", "text")
    Shutdown(1)
    AdlibUnRegister("_Update")
    EndFunc ;==>_Update

    [/autoit]