GUi schließt sich nicht

  • Hey hab hier meinen Code:

    [autoit]

    #include <GUIConstants.au3>
    While 1
    HotKeySet ("+a", "_123")
    Wend
    Func _123 ()
    MsgBox (_abfragebox ("Abfrage"))
    EndFunc
    Func _abfragebox ($sTitle)
    GUICreate($sTitle,150,100)

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

    $1 = GUICtrlCreateCheckbox("Sample löschen?",10,10)
    $2 = GUICtrlcreateCheckbox("2 CDs?",10,40)
    $ok = GUICtrlcreatebutton("OK",10,70,50,30)
    $exit = GUICtrlcreatebutton("Exit",70,70,50,30)
    GUISETState()

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

    ;schleife die dauerhaft läuft
    While 1
    $msg = GUIGETMSG()
    IF $msg = -3 Then
    Exit ;dann schliesen
    EndIf
    If $msg = $ok Then
    If GUICtrlRead($1) = $GUI_CHECKED THen
    Msgbox(0,"","Sample soll gelöscht werden")
    Endif
    If GUICtrlREad($2) = $GUI_CHECKED Then
    MsgBox(0,"","2 Cds sind vorhanden")
    Endif
    EndIf
    If $msg = $exit Then
    Exit
    EndIf
    WEnd
    ;ende der schliesen abfrage
    ;ende der endlos schleife
    EndFunc

    [/autoit]


    doch wenn ich auf OK drücke bleibt die GUI offen... was muss ich noch reinbringen das sich das beim klick auf OK schließt???

    MFG: Blacky911

    Kleiner AutoIt Lehrling :)

  • Hi,
    ich weis ja nicht was du vorhast, aber du könntest die GUI danach einfach wieder löschen ...

    Spoiler anzeigen
    [autoit]

    #include <GUIConstantsEx.au3>

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

    HotKeySet("+a", "_123")

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

    While 1
    Sleep(100)
    WEnd

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

    Func _123()
    HotKeySet("+a")
    _abfragebox("Abfrage")
    EndFunc ;==>_123

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

    Func _abfragebox($sTitle)
    $gui = GUICreate($sTitle, 150, 100)
    $1 = GUICtrlCreateCheckbox("Sample löschen?", 10, 10)
    $2 = GUICtrlCreateCheckbox("2 CDs?", 10, 40)
    $ok = GUICtrlCreateButton("OK", 10, 70, 50, 30)
    $exit = GUICtrlCreateButton("Exit", 70, 70, 50, 30)
    GUISetState()

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

    While 1
    $msg = GUIGetMsg()
    If $msg = -3 Then
    Exit ;dann schliesen
    EndIf
    If $msg = $ok Then
    If GUICtrlRead($1) = $GUI_CHECKED Then
    MsgBox(0, "", "Sample soll gelöscht werden")
    EndIf
    If GUICtrlRead($2) = $GUI_CHECKED Then
    MsgBox(0, "", "2 Cds sind vorhanden")
    EndIf
    HotKeySet("+a", "_123")
    GUIDelete($gui)
    EndIf
    If $msg = $exit Then
    Exit
    EndIf
    WEnd
    EndFunc ;==>_abfragebox

    [/autoit]