GUI erstellen mit Button, die Word Dokumente aufrufen.

  • Hey,

    ich möchte mit AutoIT einen GUI erstellen. Der 12Button besitzt und jeder Button(wenn man ihn klickt) ruft ein anderes Microsoft Word Dokument auf. Ich bin immoment so weit....(Ich bekomme es mit den aufrufen der Microsoft Word Dokument nicht hin und ich will nicht das wenn das wenn ich den Button klicke das sich haupt-programm schließt, es soll sich minimieren...)

    [autoit]

    #include <GuiConstants.au3>
    #include <Word.au3>

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

    ; GUI
    GuiCreate("bla", 400, 400)
    GuiSetIcon(@SystemDir & "\cmd.exe", 0)
    GUICtrlCreateLabel("blabla", 123,1)
    $Button1 = GUICtrlCreateButton("4-1 1", 1, 14, 75, 25, 0)
    $Button2 = GUICtrlCreateButton("4-2 1", 79, 14, 75, 25, 0)
    $Button3 = GUICtrlCreateButton("5-0 1", 1, 43, 75, 25, 0)
    $Button4 = GUICtrlCreateButton("6-2 1", 1, 72, 75, 25, 0)
    $Button5 = GUICtrlCreateButton("6-4 1", 79, 72, 75, 25, 0)
    $Button6 = GUICtrlCreateButton("7-2 1", 1, 101, 75, 25, 0)
    $Button7 = GUICtrlCreateButton("7-4 1", 79, 101, 75, 25, 0)
    $Button8 = GUICtrlCreateButton("7-5 1", 157, 101, 75, 25, 0)
    $Button9 = GUICtrlCreateButton("7-6 1", 235, 101, 75, 25, 0)
    $Button10 = GUICtrlCreateButton("8-2 1", 1, 130, 75, 25, 0)
    $Button11 = GUICtrlCreateButton("8-3 1", 79, 130, 75, 25, 0)
    $Button12 = GUICtrlCreateButton("8-5 1", 157, 130, 75, 25, 0)
    $contextMenu = GuiCtrlCreateContextMenu()
    GuiCtrlCreateMenuItem("Copyright ©blabla", $contextMenu)
    GuiCtrlCreateMenuItem("", $contextMenu) ;separatoru)
    GuiCtrlCreatePic("Logo.gif",120,315, 169,68)
    GuiCtrlSetColor(-1,0xffffff)
    GUICtrlCreateDate ( "", 1, 383, 399, 20)
    GUISetState(@SW_SHOW)

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

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit
    Case $Button1
    _Func1 ()
    Case $Button2
    _Func2 ()
    Case $Button3
    _Func3 ()
    Case $Button4
    _Func4 ()
    Case $Button5
    _Func5 ()
    Case $Button6
    _Func6 ()
    Case $Button7
    _Func7 ()
    Case $Button8
    _Func8 ()
    Case $Button9
    _Func9 ()
    Case $Button10
    _Func10 ()
    Case $Button11
    _Func11 ()
    Case $Button12
    _Func12 ()
    EndSwitch
    WEnd

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

    Func _Func1 ()

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

    MsgBox(0, "Minimiert", "Das Programm wird jetzt minimiert")
    Exit
    EndFunc

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


    Schon vorab Danke!

    Mfg

    andblood

    Einmal editiert, zuletzt von andblood (12. August 2008 um 15:00)

  • das hab ich schon probiert.....aber verstehe das net ganz mir ein bsp. geben wo er das word dokument öffnet was sich aufm dem desktop befindet und in ein ordner???

  • OK hab das jetzt,aber jetzt muss ich wissen was der befehl ist das programm(gui) sich minimiert.^^

    3 Mal editiert, zuletzt von andblood (12. August 2008 um 16:50)

  • So jetzt hab ich alles gemacht. Nun muss ich jez, dass machen das wenn ich en Button drücke das er zu den Ordner geht wo die verschiedenen Word Dokumente sind,denn ein Word Dokumente verteilt sich über mehrere Dokumente...

  • So evtl.?

    #include <GuiConstants.au3>
    #include <Word.au3>

    ; GUI
    GuiCreate("bla", 400, 400)
    GuiSetIcon(@SystemDir & "\cmd.exe", 0)
    GUICtrlCreateLabel("blabla", 123,1)
    $Button1 = GUICtrlCreateButton("TEST", 1, 14, 75, 25, 0)
    $Button2 = GUICtrlCreateButton("4-2 1", 79, 14, 75, 25, 0)
    $Button3 = GUICtrlCreateButton("5-0 1", 1, 43, 75, 25, 0)
    $Button4 = GUICtrlCreateButton("6-2 1", 1, 72, 75, 25, 0)
    $Button5 = GUICtrlCreateButton("6-4 1", 79, 72, 75, 25, 0)
    $Button6 = GUICtrlCreateButton("7-2 1", 1, 101, 75, 25, 0)
    $Button7 = GUICtrlCreateButton("7-4 1", 79, 101, 75, 25, 0)
    $Button8 = GUICtrlCreateButton("7-5 1", 157, 101, 75, 25, 0)
    $Button9 = GUICtrlCreateButton("7-6 1", 235, 101, 75, 25, 0)
    $Button10 = GUICtrlCreateButton("8-2 1", 1, 130, 75, 25, 0)
    $Button11 = GUICtrlCreateButton("8-3 1", 79, 130, 75, 25, 0)
    $Button12 = GUICtrlCreateButton("8-5 1", 157, 130, 75, 25, 0)
    $contextMenu = GuiCtrlCreateContextMenu()
    GuiCtrlCreateMenuItem("Copyright ©blabla", $contextMenu)
    GuiCtrlCreateMenuItem("", $contextMenu) ;separatoru)
    GuiCtrlCreatePic("Logo.gif",120,315, 169,68)
    GuiCtrlSetColor(-1,0xffffff)
    GUICtrlCreateDate ( "", 1, 383, 399, 20)
    GUISetState(@SW_SHOW)

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit
    Case $Button1
    ShellExecute('c:\doku0815.doc'); muss aber auch beim testen vorhanden sein ;)
    #cs
    _Func1 ()
    Case $Button2
    _Func2 ()
    Case $Button3
    _Func3 ()
    Case $Button4
    _Func4 ()
    Case $Button5
    _Func5 ()
    Case $Button6
    _Func6 ()
    Case $Button7
    _Func7 ()
    Case $Button8
    _Func8 ()
    Case $Button9
    _Func9 ()
    Case $Button10
    _Func10 ()
    Case $Button11
    _Func11 ()
    Case $Button12
    _Func12 ()
    #ce
    EndSwitch
    WEnd

    Func _Func1 ()

    MsgBox(0, "Minimiert", "Das Programm wird jetzt minimiert")
    Exit
    EndFunc

    LG, Crazy-A.

    Lieben Gruß,
    Alina

    ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

    Geheime Information: ;)
    OuBVU5ebLhHu5QvlnAyQB4A7SzBrvWulwL7RLl2BdH5tI6sIYspeMKeXMSXl

  • Hi,
    ist aber keiner drin ^^.

    Zitat

    ShellExecute('c:\doku0815.doc'); muss aber auch beim testen vorhanden sein ;)

    Das ist wahrscheinlich das Problem :D.
    Du musst den Pfad natürlich noch anpassen.