1. Dashboard
  2. Mitglieder
    1. Letzte Aktivitäten
    2. Benutzer online
    3. Team
    4. Mitgliedersuche
  3. Forenregeln
  4. Forum
    1. Unerledigte Themen
  • Anmelden
  • Registrieren
  • Suche
Alles
  • Alles
  • Artikel
  • Seiten
  • Forum
  • Erweiterte Suche
  1. AutoIt.de - Das deutschsprachige Forum.
  2. Mitglieder
  3. autoBert

Beiträge von autoBert

  • Controls in (unsichtbare) Gruppe zusammenfassen

    • autoBert
    • 18. November 2010 um 01:44
    Zitat von m-obi

    Warum hast du denn GUICtrlCreateGroup zweimal drin?


    diese beiden Zeilen können natürlich entfernt werden

    [autoit]

    GUICtrlCreateGroup("", -99, -99, 1, 1)
    GUICtrlCreateGroup("", -99, -99, 1, 1)

    [/autoit]

    sind beim löschen aus einem anderen Beispiel von mir übrig geblieben. Zum Rest, meist mach ich meine eigenen Projekte aus Design-Gründen ähnlich wie NeMP3-P (siehe Signatur) also auch die MainGui im PopUp-Stil, da kann es nicht auftreten, deine Version ist aber besser.

    Zitat von m-obi

    Da wäre doch mal Zeit für eine neue Funktion.

    na Raupi hat sie ja schon gefunden, werde ich heute Mittag testen,

    mfg autoBert

  • Controls in (unsichtbare) Gruppe zusammenfassen

    • autoBert
    • 18. November 2010 um 00:24
    Zitat von ErrorKid

    Ist es iwie möglich, mehrere controls (buttons zb) in einer gruppe zusammen zu fassen, so dass man diese gruppe und alle enthaltenen controls mit einem "GuiCtrlSetState" ausblenden kann?


    BugFix , tklausl: sorry kann es sein dass ihr den 2. Teil der Frage nicht gelesen habt?

    ich lege dafür immer eine ChildGui an

    Spoiler anzeigen
    [autoit]

    #include <ButtonConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <WindowsConstants.au3>

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

    Dim $idRadio2[5]
    #region ### START Koda GUI section ### Form=

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

    $Form1 = GUICreate("Form1", 441, 241, 50, 69)
    $btnHide = GUICtrlCreateButton('&verstecken', 20, 50, 100, 21)
    GUICtrlSetResizing(-1, $GUI_DOCKSIZE + $GUI_DOCKLEFT + $GUI_DOCKTOP)

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

    $btnShow = GUICtrlCreateButton('&Zeigen', 20, 80, 100, 21)
    GUICtrlSetResizing(-1, $GUI_DOCKSIZE + $GUI_DOCKLEFT + $GUI_DOCKTOP)

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

    GUICtrlCreateGroup("", -99, -99, 1, 1)
    GUICtrlCreateGroup("", -99, -99, 1, 1)
    $hGroup2 = GUICreate("", 170, 170, 235, 25, $WS_POPUP, $WS_EX_MDICHILD, $Form1)
    For $i = 0 To 4
    $idRadio2[$i] = GUICtrlCreateRadio("Radio " & $i, 5, $i * 25, 60, 18)
    Next
    GUISetState(@SW_SHOW, $Form1)
    GUISetState(@SW_SHOW, $hGroup2)
    #endregion ### END Koda GUI section ###

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

    While 1
    $nMsg = GUIGetMsg(1)
    Switch $nMsg[0]
    Case $GUI_EVENT_CLOSE
    Exit
    Case $btnHide
    GUISetState(@SW_HIDE, $hGroup2)
    Case $btnShow
    GUISetState(@SW_SHOW, $hGroup2)
    EndSwitch
    WEnd

    [/autoit]

    mfg autoBert

  • Übersetzer

    • autoBert
    • 17. November 2010 um 23:28

    @Pingin94,

    lass mal dieses Testskript laufen:

    [autoit]

    $sText ="Hier ist eine tolle Implentierund des Cäsar-Chiffres http://www.autoit.de/index.php?page…6455#post196455 muss leider noch etwas angepasst werden"
    $sCrypted = _CharShift($sText,True)
    $sDeCrypted = _CharShift($sCrypted,False)
    ConsoleWrite($sText & @CRLF)
    ConsoleWrite($sDeCrypted & @CRLF)

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

    if $sDeCrypted = $sText Then
    MsgBox(0,"Bravo","Klappt")
    Else
    MsgBox(0,"Soryy","Klappt nicht")
    EndIf

    [/autoit]

    schau danach in die Console und du vertsehst warum ich gefragt habe ob du es schon versucht hast.

    Ps.: Die eigentliche Botschaft liegt im Teststring,

    mfg autoBert

  • _GUICtrlListView_GetItemTextArray

    • autoBert
    • 17. November 2010 um 22:20

    Hallo StayAwayKnight,

    Zitat von Hilfe

    Fehler: Array mit dem folgenden Format:
    [0] - Anzahl von Spalten im Array (0)

    dann wird wohl das ausgewählte (in deinem Fall das 1. Item nicht existieren) falls du das aktuell markierte möchtest musst du -1 nehmen bzw. den Parameter weglassen. Bedenke auch die Indices beginnen bei 0

    Edit: falls du das zuletzt erstellte möchtest musst du es so machen

    [autoit]

    $Y = _GUICtrlListView_GetItemTextArray($cObjektlist, _GUICtrlListView_GetItemCount($cObjektlist)-1)

    [/autoit]

    mfg autoBert

  • Übersetzer

    • autoBert
    • 17. November 2010 um 21:58

    @Pinguin94,

    hast du schon einmal probiert mit deiner Methode einen Text der einen Link enthalt zu ver- und auch wieder zu entschlüsseln? z.B.:

    Code
    Hier ist eine tolle Implentierund des Cäsar-Chiffres http://www.autoit.de/index.php?page=Thread&postID=196455#post196455 muss leider noch etwas angepasst werden

    Ich glabe du hast des Meister des Schlüssels ( Andy vergessen) Stichwort Steganographie) er versteckt in sogar noch,

    mfg autoBert

  • RegExp

    • autoBert
    • 17. November 2010 um 21:37

    Hallo Fr34k,

    dein Problem scheint ja jetzt gelöst zu sein,schön für dich. Schön wäre es allerdings auch wenn du den Thread auf gelöst setzt. Einfach 1. Beitrag bearbeiten, Präfix (nähe Überschrift) ändern und speichern (absenden)

    mfg autoBert

  • Neue GUI öffnet sich, alte schließt sich

    • autoBert
    • 17. November 2010 um 21:20

    Hallo cOraXx,

    so vielleicht?

    Spoiler anzeigen
    [autoit]

    #include <GUIConstantsEx.au3>
    #include<WindowsConstants.au3>

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

    Global $idGui1, $idGui2=-99, $idMsgBox, $idZurueck, $idbtnExit2
    _CreateGui2() ;entweder hier oder erst wenn benötigt ($idbtmToGui2 Klick)

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

    $idGui1 = GUICreate('GUI 1', 400, 280, 140, 150, BitOR($WS_MINIMIZEBOX, $WS_MAXIMIZEBOX, $WS_SIZEBOX))
    ;erzeugt eine GUI die zurückgebebene ID wird in der Variablen $idGui1 gespeichert
    ;die GUI hat BOXen für Mininmieren, Maximieren und ist in der Größe frei änderbar
    GUISetOnEvent($GUI_EVENT_CLOSE, '_End')

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

    $idbtnToGui2 = GUICtrlCreateButton('&Aufruf GUI 2', 20, 20, 100, 21)
    GUICtrlSetResizing(-1, $GUI_DOCKSIZE + $GUI_DOCKRIGHT + $GUI_DOCKTOP)
    ;verankert den Button "Afruf Gui 2" rechts und oben und fixiert die Größe
    ;beim Resizen bleibt es dadurch auf seiner Position am rechten Rand

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

    $idbtnICQ = GUICtrlCreateButton('&ICQ', 20, 50, 100, 21)
    GUICtrlSetResizing(-1, $GUI_DOCKSIZE + $GUI_DOCKRIGHT + $GUI_DOCKTOP)
    ;verankert den Button "ICQ" rechts und oben und fixiert die Größe
    ;beim Resizen bleibt es dadurch auf seiner Position am rechten Rand

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

    $idbtnExit1 = GUICtrlCreateButton('be&enden', 20, 80, 100, 21)
    GUICtrlSetResizing(-1, $GUI_DOCKSIZE + $GUI_DOCKRIGHT + $GUI_DOCKTOP)
    ;verankert den Button "Afruf Gui 2" rechts und oben und fixiert die Größe
    ;beim Resizen bleibt es dadurch auf seiner Position am rechten Rand

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

    GUISetState(@SW_SHOW, $idGui1)

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

    While 1
    $nMsg = GUIGetMsg(1) ;extended Modus wichtig!!
    Switch $nMsg[1] ;für welches Fenster ist die Message
    Case $idGui1 ;ab hier ist Gui 1 dran
    Switch $nMsg[0] ;welche Message wurde ausgelöst
    Case $idbtnToGui2
    GUISetState(@SW_Hide, $idGui1) ;Gui 1 verstecken, damit nur Gui2 sichtbar ist und bearbeitet werden kann
    ;If $idGui2 = -99 Then _CreateGui2() ;nur wenn nicht am Anfang bereits erzeugt nötig, dann auf Vorbelegung der Variable in Global achten)
    GUISetState(@SW_SHOW, $idGui2) ;Gui 2 anzeigen
    Case $idbtnICQ
    MsgBox(0,"","Jetzt würde ICQ gestartet")
    ;Run("C:\Program Files\ICQ7.0\ICQ.exe")
    Case $idbtnExit1, $GUI_EVENT_CLOSE
    _end()
    EndSwitch
    Case $idGui2 ;ab hier ist Gui 2 dran
    Switch $nMsg[0] ;welche Message wurde ausgelöst
    Case $idMsgBox
    MsgBox(0, 'Test', 'Test', 0, $idGui2)
    Case $idZurueck, $GUI_EVENT_CLOSE
    GUISetState(@SW_Show, $idGui1) ;Gui 1 wieder anzeigen
    GUISetState(@SW_HIDE, $idGui2) ;Gui 2 verstecken
    Case $idbtnExit2
    _end()
    EndSwitch
    EndSwitch
    WEnd

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

    Func _CreateGui2()
    $idGui2 = GUICreate('GUI 2', 500, 300, 200, 50, -1, -1, $idGui1) ;wichtig ist der letzte Parameter
    ;erzeugt eine GUI als Child von Gui1, die zurückgebebene ID wird in der Variablen $idGui2 gespeichert

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

    $idMsgBox = GUICtrlCreateButton('&MsgBox', 20, 20, 100, 21)
    GUICtrlSetResizing(-1, $GUI_DOCKSIZE + $GUI_DOCKRIGHT + $GUI_DOCKTOP)
    ;verankert den Button "MsgBox" rechts und oben und fixiert die Größe
    ;beim Resizen bleibt es dadurch auf seiner Position am rechten Rand

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

    $idZurueck = GUICtrlCreateButton('&Zurück zu GUI 1', 20, 50, 100, 21)
    GUICtrlSetResizing(-1, $GUI_DOCKSIZE + $GUI_DOCKRIGHT + $GUI_DOCKTOP)
    ;verankert den Button "zurück" rechts und oben und fixiert die Größe
    ;beim Resizen bleibt es dadurch auf seiner Position am rechten Rand

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

    $idbtnExit2 = GUICtrlCreateButton('be&enden', 20, 80, 100, 21)
    GUICtrlSetResizing(-1, $GUI_DOCKSIZE + $GUI_DOCKRIGHT + $GUI_DOCKTOP)
    ;verankert den Button "beenden" rechts und oben und fixiert die Größe
    ;beim Resizen bleibt es dadurch auf seiner Position am rechten Rand
    EndFunc ;==>_CreateGui2

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

    Func _end()
    GUIDelete($idGui2)
    GUIDelete($idGui1)
    Exit
    EndFunc ;==>_end

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

    [OT]heute zum dritten (diesmal leicht abgewandelt) dieses Beispiel gepostet [/OT]

    mfg autoBert

  • $Variable1 = GUICtrlCreateInput ?

    • autoBert
    • 17. November 2010 um 21:09

    Hallo cOraXx,

    Hallo ,

    herzlich willkommen im Forum und viel Spass mit AutoIt.

    Hier kannst du dir die Hilfe herunterladen.
    Hier gibt es ein AutoIt-Tutorial: http://wiki.autoit.de/wiki/index.php/TutorialSehr hilfreich ist auch das Buch von peethebee

    Und jetzt da du ja "Frischling" bist etwas zur Netiquete bzw. zum Umgang mit diesem Boards:

    • Man kann kann die eigenen Beiträge bearbeiten, dies sollte man auch tun solange noch kein anderer Beitrag nach dem eigenen eingestellt wurde
    • wenn das Problem gelöst ist wieder einfach 1. Beitrag bearbeiten, Präfix (nähe Überschrift) ändern und speichern (absenden)

    mfg autoBert

  • WinSetOnTop verschwindet

    • autoBert
    • 17. November 2010 um 20:54

    Hallo Ilse,

    hier ein allgemein gehaltenes Beispiel zum arbeiten mit 2 GUIs im Msg-Loop Modus:

    Spoiler anzeigen
    [autoit]

    #include <GUIConstantsEx.au3>
    #include<WindowsConstants.au3>

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

    Global $idGui1, $idGui2=-99, $idMsgBox, $idZurueck, $idbtnExit2
    _CreateGui2() ;entweder hier oder erst wenn benötigt ($idbtmToGui2 Klick)

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

    $idGui1 = GUICreate('GUI 1', 400, 280, 140, 150, BitOR($WS_MINIMIZEBOX, $WS_MAXIMIZEBOX, $WS_SIZEBOX))
    ;erzeugt eine GUI die zurückgebebene ID wird in der Variablen $idGui1 gespeichert
    ;die GUI hat BOXen für Mininmieren, Maximieren und ist in der Größe frei änderbar
    GUISetOnEvent($GUI_EVENT_CLOSE, '_End')

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

    $idbtnToGui2 = GUICtrlCreateButton('&Aufruf GUI 2', 20, 20, 100, 21)
    GUICtrlSetResizing(-1, $GUI_DOCKSIZE + $GUI_DOCKRIGHT + $GUI_DOCKTOP)
    ;verankert den Button "Afruf Gui 2" rechts und oben und fixiert die Größe
    ;beim Resizen bleibt es dadurch auf seiner Position am rechten Rand

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

    $idbtnICQ = GUICtrlCreateButton('&ICQ', 20, 50, 100, 21)
    GUICtrlSetResizing(-1, $GUI_DOCKSIZE + $GUI_DOCKRIGHT + $GUI_DOCKTOP)
    ;verankert den Button "ICQ" rechts und oben und fixiert die Größe
    ;beim Resizen bleibt es dadurch auf seiner Position am rechten Rand

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

    $idbtnExit1 = GUICtrlCreateButton('be&enden', 20, 80, 100, 21)
    GUICtrlSetResizing(-1, $GUI_DOCKSIZE + $GUI_DOCKRIGHT + $GUI_DOCKTOP)
    ;verankert den Button "Afruf Gui 2" rechts und oben und fixiert die Größe
    ;beim Resizen bleibt es dadurch auf seiner Position am rechten Rand

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

    GUISetState(@SW_SHOW, $idGui1)

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

    While 1
    $nMsg = GUIGetMsg(1) ;extended Modus wichtig!!
    Switch $nMsg[1] ;für welches Fenster ist die Message
    Case $idGui1 ;ab hier ist Gui 1 dran
    Switch $nMsg[0] ;welche Message wurde ausgelöst
    Case $idbtnToGui2
    GUISetState(@SW_DISABLE, $idGui1) ;Gui 1 disablen, damit nur Gui2 bearbeitet werden kann
    ;If $idGui2 = -99 Then _CreateGui2() ;nur wenn nicht am Anfang bereits erzeugt nötig, dann auf Vorbelegung der Variable in Global achten)
    GUISetState(@SW_SHOW, $idGui2) ;Gui 2 anzeigen
    Case $idbtnICQ
    MsgBox(0,"","Jetzt würde ICQ gestartet")
    ;Run("C:\Program Files\ICQ7.0\ICQ.exe")
    Case $idbtnExit1, $GUI_EVENT_CLOSE
    _end()
    EndSwitch
    Case $idGui2 ;ab hier ist Gui 2 dran
    Switch $nMsg[0] ;welche Message wurde ausgelöst
    Case $idMsgBox
    MsgBox(0, 'Test', 'Test', 0, $idGui2)
    Case $idZurueck, $GUI_EVENT_CLOSE
    GUISetState(@SW_ENABLE, $idGui1) ;Gui 1 für ensablen
    GUISetState(@SW_HIDE, $idGui2) ;Gui 2 verstecken
    Case $idbtnExit2
    _end()
    EndSwitch
    EndSwitch
    WEnd

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

    Func _CreateGui2()
    $idGui2 = GUICreate('GUI 2', 500, 300, 200, 50, -1, -1, $idGui1)
    ;erzeugt eine GUI als Child von Gui1, die zurückgebebene ID wird in der Variablen $idGui2 gespeichert

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

    $idMsgBox = GUICtrlCreateButton('&MsgBox', 20, 20, 100, 21)
    GUICtrlSetResizing(-1, $GUI_DOCKSIZE + $GUI_DOCKRIGHT + $GUI_DOCKTOP)
    ;verankert den Button "MsgBox" rechts und oben und fixiert die Größe
    ;beim Resizen bleibt es dadurch auf seiner Position am rechten Rand

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

    $idZurueck = GUICtrlCreateButton('&Zurück zu GUI 1', 20, 50, 100, 21)
    GUICtrlSetResizing(-1, $GUI_DOCKSIZE + $GUI_DOCKRIGHT + $GUI_DOCKTOP)
    ;verankert den Button "zurück" rechts und oben und fixiert die Größe
    ;beim Resizen bleibt es dadurch auf seiner Position am rechten Rand

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

    $idbtnExit2 = GUICtrlCreateButton('be&enden', 20, 80, 100, 21)
    GUICtrlSetResizing(-1, $GUI_DOCKSIZE + $GUI_DOCKRIGHT + $GUI_DOCKTOP)
    ;verankert den Button "beenden" rechts und oben und fixiert die Größe
    ;beim Resizen bleibt es dadurch auf seiner Position am rechten Rand
    EndFunc ;==>_CreateGui2

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

    Func _end()
    GUIDelete($idGui2)
    GUIDelete($idGui1)
    Exit
    EndFunc ;==>_end

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

    das ganze kommt ohne WinSetOnTop aus, das heist solange die Anwendung im Vordergrund ist wird auch das aktuelle Fenster im Vordergrund gehalten. Es gibt sicherlich noch andere Methoden, ich jedoch halte diese für die einfachste. Falls du es Im OnEvent-Modus benötigst, hier das gleiche:

    Spoiler anzeigen
    [autoit]

    #include <GUIConstantsEx.au3>
    #include<WindowsConstants.au3>

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

    Opt('GUIOnEventMode', 1)

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

    $cidGui1 = GUICreate('GUI 1', 400, 280, 140, 150, BitOR($WS_MINIMIZEBOX, $WS_MAXIMIZEBOX, $WS_SIZEBOX))
    ;erzeugt eine GUI die zurückgebebene ID wird in der Variablen $cidGui1 gespeichert
    ;die GUI hat BOXen für Mininmieren, Maximieren und ist in der Größe frei änderbar
    GUISetOnEvent($GUI_EVENT_CLOSE, '_End')

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

    $cidbtnToGui2 = GUICtrlCreateButton('&Aufruf GUI 2', 20, 20, 100, 21)
    GUICtrlSetResizing(-1, $GUI_DOCKSIZE + $GUI_DOCKRIGHT + $GUI_DOCKTOP)
    ;verankert den Button "Afruf Gui 2" rechts und oben und fixiert die Größe
    ;beim Resizen bleibt es dadurch auf seiner Position am rechten Rand
    GUICtrlSetOnEvent(-1, '_CallGui2')
    ;Beim Klicken des Buttons wird die Funktion _CallGui2 aufgerufen

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

    $cidbtnICQ = GUICtrlCreateButton('&ICQ', 20, 50, 100, 21)
    GUICtrlSetResizing(-1, $GUI_DOCKSIZE + $GUI_DOCKRIGHT + $GUI_DOCKTOP)
    ;verankert den Button "ICQ" rechts und oben und fixiert die Größe
    ;beim Resizen bleibt es dadurch auf seiner Position am rechten Rand
    GUICtrlSetOnEvent(-1, '_RunICQ')
    ;Beim Klicken des Buttons wird die Funktion _RunICQ aufgerufen

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

    $cidbtnExit1 = GUICtrlCreateButton('be&enden', 20, 80, 100, 21)
    GUICtrlSetResizing(-1, $GUI_DOCKSIZE + $GUI_DOCKRIGHT + $GUI_DOCKTOP)
    ;verankert den Button "Afruf Gui 2" rechts und oben und fixiert die Größe
    ;beim Resizen bleibt es dadurch auf seiner Position am rechten Rand
    GUICtrlSetOnEvent(-1, '_End')
    ;Beim Klicken des Buttons wird die Funktion _END aufgerufen

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

    $cidGui2 = GUICreate('GUI 2', 500, 300, 200, 50, -1, -1, $cidGui1)
    ;erzeugt eine GUI als Child von Gui1, die zurückgebebene ID wird in der Variablen $cidGui2 gespeichert
    GUISetOnEvent($GUI_EVENT_CLOSE, '_BackToGui1')

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

    $cidButton1 = GUICtrlCreateButton('&MsgBox', 20, 20, 100, 21)
    GUICtrlSetResizing(-1, $GUI_DOCKSIZE + $GUI_DOCKRIGHT + $GUI_DOCKTOP)
    ;verankert den Button "MsgBox" rechts und oben und fixiert die Größe
    ;beim Resizen bleibt es dadurch auf seiner Position am rechten Rand
    GUICtrlSetOnEvent(-1, '_MsgBox')
    ;Beim Klicken des Buttons wird die Funktion _MsgBox aufgerufen

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

    $cidButton2 = GUICtrlCreateButton('&Zurück zu GUI 1', 20, 50, 100, 21)
    GUICtrlSetResizing(-1, $GUI_DOCKSIZE + $GUI_DOCKRIGHT + $GUI_DOCKTOP)
    ;verankert den Button "zurück" rechts und oben und fixiert die Größe
    ;beim Resizen bleibt es dadurch auf seiner Position am rechten Rand
    GUICtrlSetOnEvent(-1, '_BackToGui1')
    ;Beim Klicken des Buttons wird die Funktion _BackToGui1 aufgerufen

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

    $cidbtnExit2 = GUICtrlCreateButton('be&enden', 20, 80, 100, 21)
    GUICtrlSetResizing(-1, $GUI_DOCKSIZE + $GUI_DOCKRIGHT + $GUI_DOCKTOP)
    ;verankert den Button "Afruf Gui 2" rechts und oben und fixiert die Größe
    ;beim Resizen bleibt es dadurch auf seiner Position am rechten Rand
    GUICtrlSetOnEvent(-1, '_End')
    ;Beim Klicken des Buttons wird die Funktion _END aufgerufen
    GUISetState(@SW_SHOW, $cidGui1)

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

    While 1
    Sleep(1000)
    WEnd

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

    Func _end()
    GUIDelete($cidGui2)
    GUIDelete($cidGui1)
    Exit
    EndFunc ;==>_end

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

    Func _CallGui2()
    GUISetState(@SW_DISABLE, $cidGui1)
    GUISetState(@SW_SHOW, $cidGui2)
    EndFunc ;==>_CallGui2

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

    Func _RunICQ()
    Run("C:\Program Files\ICQ7.0\ICQ.exe")
    EndFunc ;==>_RunICQ

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

    Func _BackToGui1()
    GUISetState(@SW_ENABLE, $cidGui1)
    GUISetState(@SW_HIDE, $cidGui2)
    EndFunc ;==>_BackToGui1

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

    Func _MsgBox()
    MsgBox(0, 'Test', 'Test', 0, $cidGui2)
    EndFunc ;==>_MsgBox

    [/autoit]

    mfg autoBert

  • Problem mit meinem Passwortsammel-Script

    • autoBert
    • 17. November 2010 um 14:09

    Hallo Fire,

    im MSG-Loop Modus solltest du [eingefügt] bei mehr als 1 GUI [/eingefügt] GuiGetMsg(1) verwenden: hier ein allgemeines Beispiel:

    [autoit]

    #include <GUIConstantsEx.au3>
    #include<WindowsConstants.au3>

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

    Global $idGui1, $idGui2=-99, $idMsgBox, $idZurueck, $idbtnExit2
    _CreateGui2() ;entweder hier oder erst wenn benötigt ($idbtmToGui2 Klick)

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

    $idGui1 = GUICreate('GUI 1', 400, 280, 140, 150, BitOR($WS_MINIMIZEBOX, $WS_MAXIMIZEBOX, $WS_SIZEBOX))
    ;erzeugt eine GUI die zurückgebebene ID wird in der Variablen $idGui1 gespeichert
    ;die GUI hat BOXen für Mininmieren, Maximieren und ist in der Größe frei änderbar
    GUISetOnEvent($GUI_EVENT_CLOSE, '_End')

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

    $idbtnToGui2 = GUICtrlCreateButton('&Aufruf GUI 2', 20, 20, 100, 21)
    GUICtrlSetResizing(-1, $GUI_DOCKSIZE + $GUI_DOCKRIGHT + $GUI_DOCKTOP)
    ;verankert den Button "Afruf Gui 2" rechts und oben und fixiert die Größe
    ;beim Resizen bleibt es dadurch auf seiner Position am rechten Rand

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

    $idbtnICQ = GUICtrlCreateButton('&ICQ', 20, 50, 100, 21)
    GUICtrlSetResizing(-1, $GUI_DOCKSIZE + $GUI_DOCKRIGHT + $GUI_DOCKTOP)
    ;verankert den Button "ICQ" rechts und oben und fixiert die Größe
    ;beim Resizen bleibt es dadurch auf seiner Position am rechten Rand

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

    $idbtnExit1 = GUICtrlCreateButton('be&enden', 20, 80, 100, 21)
    GUICtrlSetResizing(-1, $GUI_DOCKSIZE + $GUI_DOCKRIGHT + $GUI_DOCKTOP)
    ;verankert den Button "Afruf Gui 2" rechts und oben und fixiert die Größe
    ;beim Resizen bleibt es dadurch auf seiner Position am rechten Rand

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

    GUISetState(@SW_SHOW, $idGui1)

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

    While 1
    $nMsg = GUIGetMsg(1) ;extended Modus wichtig!!
    Switch $nMsg[1] ;für welches Fenster ist die Message
    Case $idGui1 ;ab hier ist Gui 1 dran
    Switch $nMsg[0] ;welche Message wurde ausgelöst
    Case $idbtnToGui2
    GUISetState(@SW_DISABLE, $idGui1) ;Gui 1 für disablen
    ;If $idGui2 = -99 Then _CreateGui2() ;nur wenn nicht am Anfang bereits erzeugt nötig, dann auf Vorbelegung der Variable in Global achten)
    GUISetState(@SW_SHOW, $idGui2) ;Gui 2 anzeigen
    Case $idbtnICQ
    MsgBox(0,"","Jetzt würde ICQ gestartet")
    ;Run("C:\Program Files\ICQ7.0\ICQ.exe")
    Case $idbtnExit1, $GUI_EVENT_CLOSE
    _end()
    EndSwitch
    Case $idGui2 ;ab hier ist Gui 2 dran
    Switch $nMsg[0] ;welche Message wurde ausgelöst
    Case $idMsgBox
    MsgBox(0, 'Test', 'Test', 0, $idGui2)
    Case $idZurueck, $GUI_EVENT_CLOSE
    GUISetState(@SW_ENABLE, $idGui1) ;Gui 1 für ensablen
    GUISetState(@SW_HIDE, $idGui2) ;Gui 2 verstecken
    Case $idbtnExit2
    _end()
    EndSwitch
    EndSwitch
    WEnd

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

    Func _CreateGui2()
    $idGui2 = GUICreate('GUI 2', 500, 300, 200, 50, -1, -1, $idGui1)
    ;erzeugt eine GUI als Child von Gui1, die zurückgebebene ID wird in der Variablen $idGui2 gespeichert

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

    $idMsgBox = GUICtrlCreateButton('&MsgBox', 20, 20, 100, 21)
    GUICtrlSetResizing(-1, $GUI_DOCKSIZE + $GUI_DOCKRIGHT + $GUI_DOCKTOP)
    ;verankert den Button "MsgBox" rechts und oben und fixiert die Größe
    ;beim Resizen bleibt es dadurch auf seiner Position am rechten Rand

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

    $idZurueck = GUICtrlCreateButton('&Zurück zu GUI 1', 20, 50, 100, 21)
    GUICtrlSetResizing(-1, $GUI_DOCKSIZE + $GUI_DOCKRIGHT + $GUI_DOCKTOP)
    ;verankert den Button "zurück" rechts und oben und fixiert die Größe
    ;beim Resizen bleibt es dadurch auf seiner Position am rechten Rand

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

    $idbtnExit2 = GUICtrlCreateButton('be&enden', 20, 80, 100, 21)
    GUICtrlSetResizing(-1, $GUI_DOCKSIZE + $GUI_DOCKRIGHT + $GUI_DOCKTOP)
    ;verankert den Button "beenden" rechts und oben und fixiert die Größe
    ;beim Resizen bleibt es dadurch auf seiner Position am rechten Rand
    EndFunc ;==>_CreateGui2

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

    Func _end()
    GUIDelete($idGui2)
    GUIDelete($idGui1)
    Exit
    EndFunc ;==>_end

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

    mfg autoBert

  • Script verbessern

    • autoBert
    • 17. November 2010 um 14:02

    Hallo ugt100,

    ja dieses Skript man gut kürzen, habe im Moment aber keine Zeit. Hier ein Beispiel:

    [autoit]

    Global $lblDate[8] ;Element 0 nicht besetzt
    for $i = 1 to 7
    $lblDate[$i] = GUICtrlCreateLabel("(" & IniRead(@ScriptDir & "\CDE_SWUpdater.ini", "UpdateDate", "$swupddate" & $i, "NichtGefunden") & ")", 143, 8 + $i * 20, 60, 20)
    GUICtrlSetFont(-1, 7)
    Next

    [/autoit]

    mfg autoBert

  • Link anklicken -> Funktion aufrufen ?

    • autoBert
    • 17. November 2010 um 11:17

    Wenn du in deinem Chatprogramm "Werner" kopieren kannst, könntest du auch mit ClipGet arbeiten, siehe dazu
    [ gelöst ] Dropbox für Links aus Browsern

    mfg autoBert

  • USB-Ports programmieren

    • autoBert
    • 17. November 2010 um 11:06
    Zitat von Scritch

    Hallo,

    wenn ich bei google nach k055 Autoit suche bekomme ich genau 2 Ergebnisse, wovon eine dieser Thread ist.


    Wenn ich die boardeigene Sufu verwende bekomme ich 15 Treffer, z.B.: [ offen ] K8055 Programmer?

    mfg autoBert

  • Größe Des Scirptes!

    • autoBert
    • 16. November 2010 um 23:59
    Zitat von [CF[*Gaming*]

    ja ich hab noch eine frage..wie kann ich die Icons verädner also ..eh das sind immer bei beiden sie selber falsch\bzw richtig

    einfach im folgenden Skript in Zeile 12 die 1 auf 0 abändern, dann kann aber auch folgendes passieren:
    Der Inhalt kann nicht angezeigt werden, da er nicht mehr verfügbar ist.
    das ein Spassvogel die beiden Icons vertauscht.

    Spoiler anzeigen
    [autoit]

    #Region ;**** Directives created by AutoIt3Wrapper_GUI ****
    #AutoIt3Wrapper_outfile=Ergebnis.exe
    #AutoIt3Wrapper_UseUpx=n
    #EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
    #include <ButtonConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <GuiStatusBar.au3>
    #include <StaticConstants.au3>
    #include <WindowsConstants.au3>
    #include <Date.au3>

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

    $NotChangeable = 1; wenn der Anwender sie sich selbst ändern können soll hier auf 0 setzen
    ;dann werden die beiden Datein nicht überschrieben, dass heisst der Anwender kann sich selbst
    ;Icons hinterlegen er muss nur die beiden Namen beachten

    FileInstall("C:\Programme\AutoIt3\Examples\Tests\CFGaming\Check.ico",@ScriptDir & "\Check.ico",$NotChangeable) ;diese Zeile evtl anpassen da die Icons bei dir ja woanders liegen
    FileInstall("C:\Programme\AutoIt3\Examples\Tests\CFGaming\UnCheck.ico",@ScriptDir & "\UnCheck.ico",$NotChangeable) ;diese Zeile evtl anpassen da die Icons bei dir ja woanders liegen

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

    Global $ilsErgebnisse[12], $lblLS_Erg[12], $lblZiel[12], $iconLS_Erg[12], $chkLS[12] ;Element 0 ist jeweils nicht besetzt zum besseren Verständnis
    Global $lblLaufErg[5], $lblLaufZiel[5], $ilaErgebnisse[5], $chkLauf[5], $iconLauf_Erg[5] ;Element 0 ebenso

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

    ;Global $label1, $label2, $label3, $label4, $label5, $label6, $label7, $label8, $label9, $label10, $label11, $label13, $label12, $label14, $label15, $label16, $label17, $label18, $label19, $label20, $label21, $label22, $label23, $label24, $label25, $label26, $label27, $label28, $label29, $label30
    #region ### START Koda GUI section ### Form=
    $Form1 = GUICreate("Checkliste", 185, 255, 231, 143)
    $StatusBar1 = _GUICtrlStatusBar_Create($Form1)
    Dim $StatusBar1_PartsWidth[1] = [-1]
    _GUICtrlStatusBar_SetParts($StatusBar1, $StatusBar1_PartsWidth)
    _GUICtrlStatusBar_SetText($StatusBar1, "Nächste Aufgabe um:", 0)
    _GUICtrlStatusBar_SetMinHeight($StatusBar1, 27)
    $Button1 = GUICtrlCreateButton("Laufen", 8, 8, 75, 25, $WS_GROUP)
    $Button2 = GUICtrlCreateButton("Liegestütze", 104, 8, 75, 25, $WS_GROUP)
    GUISetState(@SW_SHOW)
    #endregion ### END Koda GUI section ###
    If _NowTime() > "05:45:00" Then
    If _NowTime() > "14:15:00" Then
    If _NowTime() > "19:00:00" Then
    _GUICtrlStatusBar_SetText($StatusBar1, "Nächste Aufagbe um: 05:45:00")
    Else
    _GUICtrlStatusBar_SetText($StatusBar1, "Nächste Aufagbe um: 19:00:00")
    EndIf
    Else
    _GUICtrlStatusBar_SetText($StatusBar1, "Nächste Aufagbe um: 14:45:00")
    EndIf
    Else
    MsgBox(0, "", "Nächste Aufgabe um 05:45:00")
    EndIf
    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit
    Case $Button2
    _Liegestutze()
    Case $Button1
    _Laufen()
    EndSwitch
    WEnd

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

    Func _Liegestutze()
    For $i = 1 To 4
    GUICtrlDelete($lblLaufErg[$i])
    GUICtrlDelete($lblLaufZiel[$i])
    GUICtrlDelete($iconLauf_Erg[$i])
    Next
    For $i = 1 To 11
    GUICtrlDelete($iconLS_Erg[$i])
    GUICtrlDelete($lblLS_Erg[$i])
    GUICtrlDelete($lblZiel[$i])
    $ilsErgebnisse[$i] = IniRead("Data.txt", "ilsErgebnisse", $i, "-")
    $chkLS[$i] = IniRead("Data.txt", "ilsCheck", $i, "1")
    If $chkLS[$i] = 1 Then
    $iconLS_Erg[$i] = GUICtrlCreateIcon(@ScriptDir & "\unCheck.ico", -1, 88, 24 + $i * 16, 16, 16, BitOR($SS_NOTIFY, $WS_GROUP))
    Else
    $iconLS_Erg[$i] = GUICtrlCreateIcon(@ScriptDir & "\Check.ico", -1, 88, 24 + $i * 16, 16, 16, BitOR($SS_NOTIFY, $WS_GROUP))
    EndIf
    $lblLS_Erg[$i] = GUICtrlCreateLabel($ilsErgebnisse[$i], 112, 24 + $i * 16, 63, 17)
    $lblZiel[$i] = GUICtrlCreateLabel(($i + 1) * 5, 8, 24 + $i * 16, 64, 17)
    Next
    EndFunc ;==>_Liegestutze

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

    Func _Laufen()
    For $i = 1 To 11
    GUICtrlDelete($iconLS_Erg[$i])
    GUICtrlDelete($lblLS_Erg[$i])
    GUICtrlDelete($lblZiel[$i])
    Next
    For $i = 1 To 4
    GUICtrlDelete($lblLaufErg[$i])
    GUICtrlDelete($lblLaufZiel[$i])
    GUICtrlDelete($iconLauf_Erg[$i])
    $ilaErgebnisse[$i] = IniRead("Data.txt", "ilaErgebnisse", $i, "-")
    $chkLauf[$i] = IniRead("Data.txt", "ilaCheck", $i, "1")
    $lblLaufZiel[$i] = GUICtrlCreateLabel($i & "x Waldrand", 8, 24 + $i * 16, 64, 17)
    $lblLaufErg[$i] = GUICtrlCreateLabel($ilaErgebnisse[$i], 112, 24 + $i * 16, 63, 17)
    If $chkLauf[$i] = 1 Then
    $Icon1 = GUICtrlCreateIcon(@ScriptDir & "\unCheck.ico", -1, 88, 24 + $i * 16, 16, 16, BitOR($SS_NOTIFY, $WS_GROUP))
    Else
    $Icon1 = GUICtrlCreateIcon(@ScriptDir & "\Check.ico", -1, 88, 24 + $i * 16, 16, 16, BitOR($SS_NOTIFY, $WS_GROUP))
    EndIf
    Next
    EndFunc ;==>_Laufen

    [/autoit]

    ich habe FileInstall integriert um die beiden Icons auch mit der EXE weiterzugeben,

    mfg autoBert

    Bilder

    • 112_Checkliste.jpg
      • 36,55 kB
      • 192 × 288
  • Programm zu ende schreiben...

    • autoBert
    • 16. November 2010 um 23:07

    Hallo CFGaming,

    ich habe in [ gelöst ] Größe Des Scirptes! eine Lösung veröffentlicht, danach aber gesehen, dass du es nicht selbst fertigstellen möchtest. Falls du es als EXE weitergeben willst müssten nur noch die beiden Icons mit FileInstall eingebunden werden, das kann ich für dich machen bzw. ist recht einfach,

    mfg autoBert

  • Größe Des Scirptes!

    • autoBert
    • 16. November 2010 um 22:44

    Hallo CFGaming,

    ich habe dein Skript auf Arrays umgestellt, sehe aber dass du es nicht selbst weiter führen willst/kannst?

    Hier das Skript:

    Spoiler anzeigen
    [autoit]

    #include <ButtonConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <GuiStatusBar.au3>
    #include <StaticConstants.au3>
    #include <WindowsConstants.au3>
    #include <Date.au3>
    Global $ilsErgebnisse[12], $lblLS_Erg[12], $lblZiel[12], $iconLS_Erg[12], $chkLS[12] ;Element 0 ist nicht besetzt
    Global $lblLaufErg[5], $lblLaufZiel[5], $ilaErgebnisse[5], $chkLauf[5], $iconLauf_Erg[5] ;Element 0 ist nicht besetzt

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

    #region ### START Koda GUI section ### Form=
    $Form1 = GUICreate("Checkliste", 185, 255, 231, 143)
    $StatusBar1 = _GUICtrlStatusBar_Create($Form1)
    Dim $StatusBar1_PartsWidth[1] = [-1]
    _GUICtrlStatusBar_SetParts($StatusBar1, $StatusBar1_PartsWidth)
    _GUICtrlStatusBar_SetText($StatusBar1, "Nächste Aufgabe um:", 0)
    _GUICtrlStatusBar_SetMinHeight($StatusBar1, 27)
    $Button1 = GUICtrlCreateButton("Laufen", 8, 8, 75, 25, $WS_GROUP)
    $Button2 = GUICtrlCreateButton("Liegestütze", 104, 8, 75, 25, $WS_GROUP)
    GUISetState(@SW_SHOW)
    #endregion ### END Koda GUI section ###
    If _NowTime() > "05:45:00" Then
    If _NowTime() > "14:15:00" Then
    If _NowTime() > "19:00:00" Then
    _GUICtrlStatusBar_SetText($StatusBar1, "Nächste Aufagbe um: 05:45:00")
    Else
    _GUICtrlStatusBar_SetText($StatusBar1, "Nächste Aufagbe um: 19:00:00")
    EndIf
    Else
    _GUICtrlStatusBar_SetText($StatusBar1, "Nächste Aufagbe um: 14:45:00")
    EndIf
    Else
    MsgBox(0, "", "Nächste Aufgabe um 05:45:00")
    EndIf
    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit
    Case $Button2
    _Liegestutze()
    Case $Button1
    _Laufen()
    EndSwitch
    WEnd

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

    Func _Liegestutze()
    For $i = 1 To 4
    GUICtrlDelete($lblLaufErg[$i])
    GUICtrlDelete($lblLaufZiel[$i])
    GUICtrlDelete($iconLauf_Erg[$i])
    Next
    For $i = 1 To 11
    GUICtrlDelete($iconLS_Erg[$i])
    GUICtrlDelete($lblLS_Erg[$i])
    GUICtrlDelete($lblZiel[$i])
    $ilsErgebnisse[$i] = IniRead("Data.txt", "ilsErgebnisse", $i, "-")
    $chkLS[$i] = IniRead("Data.txt", "ilsCheck", $i, "1")
    If $chkLS[$i] = 1 Then
    $iconLS_Erg[$i] = GUICtrlCreateIcon("C:\Users\Schwemmlein\Desktop\unCheck.ico", -1, 88, 24 + $i * 16, 16, 16, BitOR($SS_NOTIFY, $WS_GROUP))
    Else
    $iconLS_Erg[$i] = GUICtrlCreateIcon("C:\Users\Schwemmlein\Desktop\Check.ico", -1, 88, 24 + $i * 16, 16, 16, BitOR($SS_NOTIFY, $WS_GROUP))
    EndIf
    $lblLS_Erg[$i] = GUICtrlCreateLabel($ilsErgebnisse[$i], 112, 24 + $i * 16, 63, 17)
    $lblZiel[$i] = GUICtrlCreateLabel(($i + 1) * 5, 8, 24 + $i * 16, 64, 17)
    Next
    EndFunc ;==>_Liegestutze

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

    Func _Laufen()
    For $i = 1 To 11
    GUICtrlDelete($iconLS_Erg[$i])
    GUICtrlDelete($lblLS_Erg[$i])
    GUICtrlDelete($lblZiel[$i])
    Next
    For $i = 1 To 4
    GUICtrlDelete($lblLaufErg[$i])
    GUICtrlDelete($lblLaufZiel[$i])
    GUICtrlDelete($iconLauf_Erg[$i])
    $ilaErgebnisse[$i] = IniRead("Data.txt", "ilaErgebnisse", $i, "-")
    $chkLauf[$i] = IniRead("Data.txt", "ilaCheck", $i, "1")
    $lblLaufZiel[$i] = GUICtrlCreateLabel($i & "x Waldrand", 8, 24 + $i * 16, 64, 17)
    $lblLaufErg[$i] = GUICtrlCreateLabel($ilaErgebnisse[$i], 112, 24 + $i * 16, 63, 17)
    If $chkLauf[$i] = 1 Then
    $Icon1 = GUICtrlCreateIcon("C:\Users\Schwemmlein\Desktop\unCheck.ico", -1, 88, 24 + $i * 16, 16, 16, BitOR($SS_NOTIFY, $WS_GROUP))
    Else
    $Icon1 = GUICtrlCreateIcon("C:\Users\Schwemmlein\Desktop\Check.ico", -1, 88, 24 + $i * 16, 16, 16, BitOR($SS_NOTIFY, $WS_GROUP))
    EndIf
    Next
    EndFunc ;==>_Laufen

    [/autoit]

    falls du doch daran weitermachen willst und etwas nicht verstehst kannst du hier (bitte keine PM) Fragen stellen,

    mfg autoBert

  • Combobox

    • autoBert
    • 16. November 2010 um 20:00

    Dietmar: das ganze geht auch bei Änderung der Combo

    @[CF[*Gaming*], schau dir noch einmal meinen vorherigen Post an, hab ihn editiert

    mfg autoBert

  • Combobox

    • autoBert
    • 16. November 2010 um 19:47

    Hallo [CF[*Gaming*],

    geht auch im Msg-Loop Modus, schau dir dazu [Beispiel] MiniUrl-Manager (kleiner Webseitenverwalter) er ist zu DEMO-Zwecken im Umgang von ComboBox und INI-Files geskriptet worden,

    Edit: und hier dein aktualisiertes Skript:

    Spoiler anzeigen
    [autoit]

    #include <ButtonConstants.au3>
    #include <ComboConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <WindowsConstants.au3>
    Global $Checkbox1, $Checkbox2 , $Checkbox3 , $Checkbox4 , $Checkbox5 ,$Checkbox6 , $Checkbox7, $Checkbox8, $Checkbox9, $Checkbox10, $Checkbox11, $Checkbox12
    #Region ### START Koda GUI section ### Form=
    $Form1 = GUICreate("Tranigsplan", 177, 212, 192, 124)
    $Combo1 = GUICtrlCreateCombo("", 8, 8, 145, 25)
    GUICtrlSetData(-1, "14:15 Laufen|19:00 Liegestütze|5:45 Liegstütze")
    $Button2 = GUICtrlCreateButton("Button1", 96, 160, 75, 25, $WS_GROUP)
    $Button1 = GUICtrlCreateButton("Button1", 88, 64, 75, 25, $WS_GROUP)
    GUISetState(@SW_SHOW)
    #EndRegion ### END Koda GUI section ###
    IniWrite("Data.txt", "Checkboxen", "1", ""); Valvue 1= unchecked 2= checked
    While 1
    $iCombo = Guictrlread($Combo1)
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit
    Case $Combo1
    $ToDo = GUICtrlRead($Combo1)
    Switch $ToDo
    Case "14:15 Laufen"
    _Laufen()
    Case "19:00 Liegestütze", "5:45 Liegstütze"
    _Liegestutze()
    EndSwitch
    EndSwitch
    WEnd

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

    Func _Liegestutze()
    GUICtrlDelete( $Checkbox8)
    GUICtrlDelete( $Checkbox9)
    GUICtrlDelete( $Checkbox10)
    GUICtrlDelete( $Checkbox11)
    GUICtrlDelete( $Checkbox12)
    $Checkbox1 = GUICtrlCreateCheckbox("10", 8, 40, 97, 17)
    $Checkbox2 = GUICtrlCreateCheckbox("15", 8, 64, 97, 17)
    $Checkbox3 = GUICtrlCreateCheckbox("20", 8, 88, 97, 17)
    $Checkbox4 = GUICtrlCreateCheckbox("25", 8, 112, 97, 17)
    $Checkbox5 = GUICtrlCreateCheckbox("30", 8, 136, 97, 17)
    $Checkbox6 = GUICtrlCreateCheckbox("35", 8, 160, 97, 17)
    $Checkbox7 = GUICtrlCreateCheckbox("40", 8, 184, 97, 17)
    EndFunc

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

    Func _Laufen()
    GUICtrlDelete( $Checkbox1)
    GUICtrlDelete( $Checkbox2)
    GUICtrlDelete( $Checkbox3)
    GUICtrlDelete( $Checkbox4)
    GUICtrlDelete( $Checkbox5)
    GUICtrlDelete( $Checkbox6)
    GUICtrlDelete( $Checkbox7)
    $Checkbox8 = GUICtrlCreateCheckbox("Waldrand(und zurück)", 8, 40, 97, 17)
    $Checkbox9 = GUICtrlCreateCheckbox("2x Waldrand(““)", 8, 64, 97, 17)
    $Checkbox10 = GUICtrlCreateCheckbox("3x ““", 8, 88, 97, 17)
    $Checkbox11 = GUICtrlCreateCheckbox("4x ““", 8, 112, 97, 17)
    $Checkbox12 = GUICtrlCreateCheckbox("In den Wald ", 8, 136, 97, 17)
    EndFunc

    [/autoit]

    mfg autoBert

  • Autoit Debugger Error

    • autoBert
    • 16. November 2010 um 19:09

    Den Author in Kenntnis setzen und bis zum BugFix wieder die alte Version installieren/benutzen

    mfg autoBert

  • Wie speichere ich Daten in einer .txt Datei, und rufe sie wieder ab?

    • autoBert
    • 16. November 2010 um 18:07

    misterspeed,

    ups hab ich total übersehen war auf das fehlende GuiCtrlRead fixiert. Eventuell sollte man auch noch den Modus bei FileOpen auf 2 setzen, damit immer nur ein (der aktuelle) User in der Datei steht,

    mfg autoBert

Spenden

Jeder Euro hilft uns, Euch zu helfen.

Download

AutoIt Tutorial
AutoIt Buch
Onlinehilfe
AutoIt Entwickler
  1. Datenschutzerklärung
  2. Impressum
  3. Shoutbox-Archiv
Community-Software: WoltLab Suite™