Script soll "weitermachen"

  • tach,

    [autoit]

    #Region ### START Koda GUI section ### Form=
    $Form2 = GUICreate("Datei laden", 301, 89, 185, 188)
    $Input1 = GUICtrlCreateInput("", 40, 32, 121, 21)
    $Input2 = GUICtrlCreateInput("", 40, 60, 121, 21)
    $Button1 = GUICtrlCreateButton("Durchsuchen", 176, 32, 75, 25, 0)
    $Button2 = GUICtrlCreateButton("OK", 176, 60, 75, 25, 0)
    GUISetState(@SW_SHOW)
    #EndRegion ### END Koda GUI section ###
    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit
    Case $Button1
    $Datei = FileOpenDialog("Datei öffnen", @ScriptDir, 'Alle Dateien (*.*)')
    If @error Then ContinueCase
    GUICtrlSetData($Input1, StringLeft($Datei, StringInStr($Datei,'\', 0, -1)))
    GUICtrlSetData($Input2, StringTrimLeft($Datei, StringInStr($Datei,'\', 0, -1)))
    Case $Button2
    EndSwitch
    WEnd

    [/autoit]


    ich hab ein problem: ich möchte dass wenn ich auf button2 drücke das script weiterläuft und diese gui schliesst..

    leicer weiß ich nich wie ich das machen soll, kann mir da wer helfen?

    (Script ist von funkey)

    Einmal editiert, zuletzt von Marder 16 (4. Juli 2009 um 10:41)

  • [autoit]

    [autoit]#include <GuiConstants.au3>
    #Region ### START Koda GUI section ### Form=
    $Form2 = GUICreate("Datei laden", 301, 89, 185, 188)
    $Input1 = GUICtrlCreateInput("", 40, 32, 121, 21)
    $Input2 = GUICtrlCreateInput("", 40, 60, 121, 21)
    $Button1 = GUICtrlCreateButton("Durchsuchen", 176, 32, 75, 25, 0)
    $Button2 = GUICtrlCreateButton("OK", 176, 60, 75, 25, 0)
    GUISetState(@SW_SHOW)
    #EndRegion ### END Koda GUI section ###
    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    GUIDelete($Form2)
    ExitLoop
    Case $Button1
    $Datei = FileOpenDialog("Datei öffnen", @ScriptDir, 'Alle Dateien (*.*)')
    If @error Then ContinueCase
    GUICtrlSetData($Input1, StringLeft($Datei, StringInStr($Datei, '\', 0, -1)))
    GUICtrlSetData($Input2, StringTrimLeft($Datei, StringInStr($Datei, '\', 0, -1)))
    Case $Button2
    EndSwitch
    WEnd

    [/autoit]

    [/autoit]

    [autoit]

    [autoit]

    [/autoit]

    [/autoit]

    [autoit]

    [autoit]MsgBox(0, "", "hallo")

    [/autoit]

    [/autoit]

    [autoit]

    [autoit]

    [/autoit]

    [/autoit]

    [autoit]

    [autoit]While True
    Sleep(100)
    WEnd

    [/autoit]

    [/autoit]

  • thx blubbstar

    edit: die MSGBOX kommt nur wenn ich aufs kreuz drückeb, wie mach ich dass, das sie kommt wenn ich auf OK drücke?

  • Spoiler anzeigen
    [autoit]

    #include <GuiConstants.au3>
    #Region ### START Koda GUI section ### Form=
    $Form2 = GUICreate("Datei laden", 301, 89, 185, 188)
    $Input1 = GUICtrlCreateInput("", 40, 32, 121, 21)
    $Input2 = GUICtrlCreateInput("", 40, 60, 121, 21)
    $Button1 = GUICtrlCreateButton("Durchsuchen", 176, 32, 75, 25, 0)
    $Button2 = GUICtrlCreateButton("OK", 176, 60, 75, 25, 0)
    GUISetState(@SW_SHOW)
    #EndRegion ### END Koda GUI section ###
    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    GUIDelete($Form2)
    ExitLoop
    Case $Button1
    $Datei = FileOpenDialog("Datei öffnen", @ScriptDir, 'Alle Dateien (*.*)')
    If @error Then ContinueCase
    GUICtrlSetData($Input1, StringLeft($Datei, StringInStr($Datei, '\', 0, -1)))
    GUICtrlSetData($Input2, StringTrimLeft($Datei, StringInStr($Datei, '\', 0, -1)))
    Case $Button2
    MsgBox(0, "", "hallo")
    EndSwitch
    WEnd

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

    While True
    Sleep(100)
    WEnd

    [/autoit]
  • So sollte es der Aufgabenstellung entsprechen.

    Spoiler anzeigen
    [autoit]


    #include <GuiConstants.au3>
    #Region ### START Koda GUI section ### Form=
    $Form2 = GUICreate("Datei laden", 301, 89, 185, 188)
    $Input1 = GUICtrlCreateInput("", 40, 32, 121, 21)
    $Input2 = GUICtrlCreateInput("", 40, 60, 121, 21)
    $Button1 = GUICtrlCreateButton("Durchsuchen", 176, 32, 75, 25, 0)
    $Button2 = GUICtrlCreateButton("OK", 176, 60, 75, 25, 0)
    GUISetState(@SW_SHOW)
    #EndRegion ### END Koda GUI section ###
    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    GUIDelete($Form2)
    ExitLoop
    Case $Button1
    $Datei = FileOpenDialog("Datei öffnen", @ScriptDir, 'Alle Dateien (*.*)')
    If @error Then ContinueCase
    GUICtrlSetData($Input1, StringLeft($Datei, StringInStr($Datei, '\', 0, -1)))
    GUICtrlSetData($Input2, StringTrimLeft($Datei, StringInStr($Datei, '\', 0, -1)))
    Case $Button2
    GUIDelete($Form2)
    ExitLoop
    EndSwitch
    WEnd

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

    MsgBox(0, "", "hallo")

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

    While True
    Sleep(100)
    WEnd

    [/autoit]