3 Guis

1. offizieller Beitrag

    Haii Leute..

    Spoiler anzeigen
    [autoit]

    #include <ButtonConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <GUIListBox.au3>
    #include <WindowsConstants.au3>
    #include <StaticConstants.au3>
    #include <EditConstants.au3>

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

    GUI_Work()
    GUI_NewWork()
    GUI_Memo()

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

    Func GUI_Work()
    $Form1 = GUICreate("Aufgaben", 171, 277, 207, 128, -1, BitOR($WS_EX_TOOLWINDOW,$WS_EX_WINDOWEDGE))
    $List1 = GUICtrlCreateList("", 8, 8, 153, 212, 0)
    GUICtrlSetData(-1, "Computer 18:00:00|Hausaufgaben 15:00:00")
    $Button1 = GUICtrlCreateButton("Neue Aufgabe", 8, 232, 153, 33, $WS_GROUP)
    GUISetState(@SW_SHOW)
    EndFunc

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

    Func GUI_NewWork()
    $Form1 = GUICreate("New Work", 208, 95, 197, 130)
    $Input1 = GUICtrlCreateInput("", 80, 32, 121, 21)
    $Input2 = GUICtrlCreateInput("", 80, 8, 121, 21)
    $Label1 = GUICtrlCreateLabel("Aufgabe", 8, 8, 63, 22)
    GUICtrlSetFont(-1, 12, 400, 0, "Arial")
    $Label2 = GUICtrlCreateLabel("Uhrzeit", 8, 32, 52, 22)
    GUICtrlSetFont(-1, 12, 400, 0, "Arial")
    $Button1 = GUICtrlCreateButton("OK", 80, 64, 121, 25, $WS_GROUP)
    GUICtrlSetFont(-1, 10, 400, 0, "Arial")
    GUISetState(@SW_SHOW)
    EndFunc

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

    Func GUI_Memo()
    $Form3 = GUICreate("Memo", 230, 141, 393, 262)
    $Pic1 = GUICtrlCreatePic("C:\Users\Schwemmlein\Desktop\Erinnerung\notiz.jpg", -24, -16, 228, 140, BitOR($SS_NOTIFY,$WS_GROUP,$WS_CLIPSIBLINGS))
    GUISetState(@SW_SHOW)
    EndFunc

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

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit
    EndSwitch
    WEnd

    [/autoit]

    Ich möchte ein kleins erinerungs Programm schreiben..
    Die einzelne Func(GUI_Memo(),GUI_NewWork(),GUI_Work().) Sollen Später über ein Context Menü geöffne werden(das mache ich alles selber!)
    mEin Problem ist nur wie bekomme ich die msg der einzelen Gui raus???
    also das halt die einzelen msg raus kommen und ich dann mit case... usw .. ICh hoofe ihr versteht was ich meinne ;)

    MFG CF* Gaming

    Du kannst einfach in deiner While schleife die Buttons auch abfragen ^^
    Einfach mit den Bezeichnungen (Variablen) der Buttons arbeiten.
    Geht bei mir immer.

    • Offizieller Beitrag

    z.B. so:

    Spoiler anzeigen
    [autoit]

    Local $gui1, $gui2, $gui3, $gui4, $gui5, $btn1_1, $btn1_2, $btn1_3, $btn1_4, $btn2, $btn3, $btn4, $btn5, $msg

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

    $gui1 = GUICreate('GUI 1')
    $btn1_1 = GUICtrlCreateButton('Zeige GUI 2', 10, 20, 100, 20)
    $btn1_2 = GUICtrlCreateButton('Zeige GUI 3', 10, 50, 100, 20)
    $btn1_3 = GUICtrlCreateButton('Zeige GUI 4', 10, 80, 100, 20)
    $btn1_4 = GUICtrlCreateButton('Zeige GUI 5', 10, 110, 100, 20)

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

    $gui2 = GUICreate('GUI 2')
    $btn2 = GUICtrlCreateButton('Button 2', 10, 20, 100, 20)

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

    $gui3 = GUICreate('GUI 3')
    $btn3 = GUICtrlCreateButton('Button 3', 10, 20, 100, 20)

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

    $gui4 = GUICreate('GUI 4')
    $btn4 = GUICtrlCreateButton('Button 4', 10, 20, 100, 20)

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

    $gui5 = GUICreate('GUI 5')
    $btn5 = GUICtrlCreateButton('Button 5', 10, 20, 100, 20)

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

    GUISetState(@SW_SHOW, $gui1)

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

    While 1
    $msg = GUIGetMsg(1)
    Switch $msg[1] ; Window Handle
    Case $gui1
    Switch $msg[0] ; Event
    Case $GUI_EVENT_CLOSE
    ExitLoop
    Case $btn1_1
    GUISetState(@SW_HIDE, $gui1)
    GUISetState(@SW_SHOW, $gui2)
    Case $btn1_2
    GUISetState(@SW_HIDE, $gui1)
    GUISetState(@SW_SHOW, $gui3)
    Case $btn1_3
    GUISetState(@SW_HIDE, $gui1)
    GUISetState(@SW_SHOW, $gui4)
    Case $btn1_4
    GUISetState(@SW_HIDE, $gui1)
    GUISetState(@SW_SHOW, $gui5)
    EndSwitch
    Case $gui2
    Switch $msg[0]
    Case $GUI_EVENT_CLOSE
    GUISetState(@SW_SHOW, $gui1)
    GUISetState(@SW_HIDE, $gui2)
    Case $btn2
    MsgBox(0, '', 'Button 2 geklickt')
    EndSwitch
    Case $gui3
    Switch $msg[0]
    Case $GUI_EVENT_CLOSE
    GUISetState(@SW_SHOW, $gui1)
    GUISetState(@SW_HIDE, $gui3)
    Case $btn3
    MsgBox(0, '', 'Button 3 geklickt')
    EndSwitch
    Case $gui4
    Switch $msg[0]
    Case $GUI_EVENT_CLOSE
    GUISetState(@SW_SHOW, $gui1)
    GUISetState(@SW_HIDE, $gui4)
    Case $btn4
    MsgBox(0, '', 'Button 4 geklickt')
    EndSwitch
    Case $gui5
    Switch $msg[0]
    Case $GUI_EVENT_CLOSE
    GUISetState(@SW_SHOW, $gui1)
    GUISetState(@SW_HIDE, $gui5)
    Case $btn5
    MsgBox(0, '', 'Button 5 geklickt')
    EndSwitch
    EndSwitch
    WEnd

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

    GUIDelete($gui1)
    GUIDelete($gui2)
    GUIDelete($gui3)
    GUIDelete($gui4)
    GUIDelete($gui5)

    [/autoit]

    Ich hab das ganz einfach so herausgefunden, dass ich herum probiert habe.
    Das soll jetzt nicht heißen, dass du keine Fragen stellen sonst, sondern einfach ausprobieren.
    Man kann ja schließlich nichts kaputt machen.
    So hab ich mir all meine Fähigkeiten angeeignet.
    Und wie immer gilt: Fragen kostet nichts. :)