2 Gui ,Checkboxen lesen & aktivieren

1. offizieller Beitrag

    Hallo Leute ;)

    Ja ich bin es wieder ^^ Ich wollte es somachen,
    dass wenn man auf Settings klickt kommt ein 2.Gui dort sind Checkboxen, diese kann man aktivieren & klickt man auf Save soll er diese Funktion speichern (am besten keine Datei erstellen) und dann kommt wieder das Normale Gui ' $FORM2 '
    Dann ist man wieder FORM2 und die Funktion sollte aktiv sein , wie kann man sowas machen ;)

    Die *.ico sind im Anhang unten.

    Warum ich soviele Include's habe *Fragt mich nicht ;) Ich hab immer soviele ^^ lieber zuviel als zuwenig :)*

    Spoiler anzeigen
    [autoit]


    #include <GUIConstantsEx.au3 >
    #include <WindowsConstants.au3>
    #include <EditConstants.au3>
    #include <Date.au3>
    #include <ListViewConstants.au3>
    #include <WindowsConstants.au3>
    #include <ListviewConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <WindowsConstants.au3>
    #include <SliderConstants.au3>
    #Include <GuiListView.au3>
    #Include <Array.au3>
    #Include <File.au3>
    #Include <GuiListView.au3>
    #Include<StructureConstants.au3>
    #include<Constants.au3>
    #include <GUIConstantsEx.au3>
    #include <ButtonConstants.au3>

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

    HotkeySet("{END}","_exit")

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

    opt("GUIResizeMode",802)
    Opt("WinTitleMatchMode", 2)
    Opt("TrayMenuMode", 1)
    Opt("TrayOnEventMode", 1)

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

    $vVersion = "Version 2.1"

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

    If @Compiled = 0 Then
    TraySetIcon("Rubik-Pocket-Cube.ico")
    EndIf

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

    TraySetToolTip($vVersion)

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

    $BOLTEST = False
    $FORM1 = GUICreate("Tool " & $vVersion & " - by TuttiFrutti", 195, 15, -1, -1, $WS_POPUP, 0)
    GUISetBkColor(16777215)

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

    $Progress1 = GUICtrlCreateProgress(-1, -1, 198, 17)

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

    GUISetState(@SW_SHOW)
    For $i = 0 To 100 Step 5
    Sleep(60)
    GUICtrlSetData($Progress1, $i)

    Next
    ProgressOff()
    GUISetState(@SW_HIDE)

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

    ;=======================================================================================================

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

    $FORM2 = GUICreate("(C) " & $vVersion & "", 405, 235, -1, -1,$WS_POPUP + $WS_SIZEBOX +$WS_EX_TOOLWINDOW+$WS_EX_TOPMOST+$WS_EX_WINDOWEDGE + $WS_EX_TOPMOST + $WS_VISIBLE + $WS_CLIPSIBLINGS)

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

    ;====================================================

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

    $Info = GUICtrlCreateButton("F.A.Q", 370, 0, 35, 30 , $BS_ICON)
    GUICtrlSetImage(-1, @ScriptDir & "\Green-block.ico",1)

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

    $Settings = GUICtrlCreateButton("Settings", 330, 0, 35, 30 , $BS_ICON)
    GUICtrlSetImage(-1, @ScriptDir & "\Settings.ico",1)

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

    ;====================================================;====================================================

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

    $TAB1 = GUICtrlCreateTab(8, 8, 390, 225)
    GUICtrlSetResizing(-1, $GUI_DOCKWIDTH + $GUI_DOCKHEIGHT)
    $Tab = GUICtrlCreateTabItem("Allgemein")
    $Group1 = GUICtrlCreateGroup("", 20, 48, 145, 73)
    $Exit = GUICtrlCreateButton("Exit", 105, 129, 65, 31)
    $AllgemeinLabel = GUICtrlCreateLabel(" Made by:", 35, 64, 111, 18)
    $AllgemeinLabel2 = GUICtrlCreateLabel(" T u t t i _ F r u t t i", 35, 80, 105, 18)
    $AllgemeinLabel3 = GUICtrlCreateLabel(" " & $vVersion, 35, 97, 105, 18)
    GUICtrlCreateTabItem("")

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

    ;====================================================
    GUISetState(@SW_SHOW)

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

    While 1

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

    $MSG = GUIGetMsg(1)
    Switch $MSG[1]
    Case $FORM1
    If $BOLTEST = False Then

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

    For $i = 0 To 100 Step +1
    Sleep(5)
    GUICtrlSetData($Progress1, $i)
    Next
    GUISetState(@SW_HIDE, $FORM1)
    GUISetState(@SW_SHOW, $FORM2)
    $BOLTEST = True
    EndIf
    Case $FORM2

    Switch $MSG[0]

    Case $GUI_EVENT_CLOSE,$Exit
    Exit

    Case $Info
    MsgBox(0,"","Info ~ F.A.Q --- [Tutti_Frutti] (c) 2009 - 2010")

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

    Case $Settings
    Settings()

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

    EndSwitch
    EndSwitch
    WEnd

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

    Func Settings()
    Opt("GUIOnEventMode", 0)
    GUISetState(@SW_DISABLE, $FORM2)
    GUISetState(@SW_HIDE, $FORM2)

    $settinggui = GUICreate("Settings", 518, 190)
    $cancel = GUICtrlCreateButton("Exit", 263, 160, 247, 20, 0)
    $save = GUICtrlCreateButton("Save", 10, 160, 247, 20, 0)
    $groupdelays = GUICtrlCreateGroup("Keine Ahnung", 10, 10, 260, 91)
    GUICtrlCreateGroup("", -99, -99, 1, 1)
    $groupgeneral2 = GUICtrlCreateGroup("Info", 10, 105, 500, 50)
    $Label1 = GUICtrlCreateLabel("Copyright by T u t t i _ F r u t t i (C) 2009 - 2010 # ", 104, 128, 308, 19)
    GUICtrlSetFont(-1, 10, 800, 0, "Times New Roman")
    GUICtrlCreateGroup("", -99, -99, 1, 1)
    $FTP = GUICtrlCreateGroup("Einstellungen", 280, 10, 230, 91)
    $Checkbox2 = GUICtrlCreateCheckbox("Mit Windows starten", 295, 34, 121, 17)
    $Checkbox1 = GUICtrlCreateCheckbox("Immer im Vordergrund", 295, 65, 129, 17)
    GUICtrlCreateGroup("", -99, -99, 1, 1)

    GUISetState(@SW_SHOW, $settinggui)

    While 1
    Switch GUIGetMsg($settinggui)
    Case - 3
    ExitLoop

    Case $cancel
    ExitLoop

    Case $save
    MsgBox(0,"","Comming Soon...")
    ExitLoop
    ;Exit

    EndSwitch
    Sleep(10)
    WEnd

    GUIDelete($settinggui)
    Sleep(100)

    GUISetState(@SW_ENABLE, $FORM2)
    GUISetState(@SW_SHOW, $FORM2)
    GUISetState(@SW_ENABLE, $FORM1)
    EndFunc

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

    Func _exit()

    Exit
    EndFunc

    [/autoit]

    Bei meinem Editor habe ich es so gemacht:

    [autoit]

    Case $save
    If $Checkbox1 = $GUI_CHECKED Then
    $Vordergrund = True
    Else
    $Vordergrund = False
    EndIf
    If $Checkbox2 = $GUI_CHECKED Then
    $Autostart = True
    Else
    $Autostart = False
    EndIf
    ExitLoop

    [/autoit]

    Kannst du dann so abfragen:

    [autoit]

    If $Vordergrund = True Then ...

    [/autoit]

    (Ungetestet) MfG xXTobi93Xx

    So richtig bekomme ich das net hin ;)
    Wenn ich dann wieder auf FORM2 wechsel , dann ist da aber kein Häkchen drin =D
    Und bei Funktion abrufen im

    [autoit]


    Case $IRENDnenButton
    If $Vordergrund = True Then MsgBox(0,"","")

    [/autoit]

    Geht bei mir net =D

    Edit:     Bin nun weg kann erst morgen gucken :)

    So habs jetzt getestet so geht es:

    Spoiler anzeigen
    [autoit]

    Case $save
    If GUICtrlRead($Checkbox1) = $GUI_CHECKED Then
    Global $Vordergrund = True
    Else
    Global $Vordergrund = False
    EndIf
    If GUICtrlRead($Checkbox2) = $GUI_CHECKED Then
    Global $Autostart = True
    Else
    Global $Autostart = False
    EndIf

    [/autoit]

    Abfragen wie immer^^:

    Spoiler anzeigen
    [autoit]

    Case $Button
    If $Vordergrund = True Then
    MsgBox(64, "", "Es funktioniert =)")
    Else
    MsgBox(64, "", "Es funktioniert nicht =(")
    EndIf

    [/autoit]

    MfG xXTobi93Xx

    hm
    also ganz ohne Datei wüsste ich nicht wie es gehen soll.

    Hab auch so ein Script erstellt, wo ich Settings speichern kann. Dazu erstelle ich mir einfach an eine x-belibiege Location eine .ini Datei und frage den Status beim Aufruf der Settings ab.
    Wenn ich dann auf save klicke, wird der Wert in die ini geschrieben.

    Also z.B.:
    [Programm]
    Autostart = 1
    OnTop = 0

    Es könnte ohne Datei funktionieren, wenn du das Programm nie schließen würdest.

    Hierzu der Code:

    Spoiler anzeigen
    [autoit]

    #include <GUIConstantsEx.au3 >
    #include <WindowsConstants.au3>
    #include <EditConstants.au3>
    #include <Date.au3>
    #include <ListViewConstants.au3>
    #include <WindowsConstants.au3>
    #include <ListviewConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <WindowsConstants.au3>
    #include <SliderConstants.au3>
    #Include <GuiListView.au3>
    #Include <Array.au3>
    #Include <File.au3>
    #Include <GuiListView.au3>
    #Include<StructureConstants.au3>
    #include<Constants.au3>
    #include <GUIConstantsEx.au3>
    #include <ButtonConstants.au3>

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

    HotkeySet("{END}","_exit")
    Global $autostart = ""
    Global $OnTop = ""

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

    opt("GUIResizeMode",802)
    Opt("WinTitleMatchMode", 2)
    Opt("TrayMenuMode", 1)
    Opt("TrayOnEventMode", 1)

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

    $vVersion = "Version 2.1"

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

    If @Compiled = 0 Then
    TraySetIcon("Rubik-Pocket-Cube.ico")
    EndIf

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

    TraySetToolTip($vVersion)

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

    $BOLTEST = False
    $FORM1 = GUICreate("Tool " & $vVersion & " - by TuttiFrutti", 195, 15, -1, -1, $WS_POPUP, 0)
    GUISetBkColor(16777215)

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

    $Progress1 = GUICtrlCreateProgress(-1, -1, 198, 17)

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

    GUISetState(@SW_SHOW)
    For $i = 0 To 100 Step 5
    Sleep(60)
    GUICtrlSetData($Progress1, $i)

    Next
    ProgressOff()
    GUISetState(@SW_HIDE)

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

    ;=======================================================================================================

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

    $FORM2 = GUICreate("(C) " & $vVersion & "", 405, 235, -1, -1,$WS_POPUP + $WS_SIZEBOX +$WS_EX_TOOLWINDOW+$WS_EX_TOPMOST+$WS_EX_WINDOWEDGE + $WS_EX_TOPMOST + $WS_VISIBLE + $WS_CLIPSIBLINGS)

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

    ;====================================================

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

    $Info = GUICtrlCreateButton("F.A.Q", 370, 0, 35, 30 , $BS_ICON)
    GUICtrlSetImage(-1, @ScriptDir & "\Green-block.ico",1)

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

    $Settings = GUICtrlCreateButton("Settings", 330, 0, 35, 30 , $BS_ICON)
    GUICtrlSetImage(-1, @ScriptDir & "\Settings.ico",1)

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

    ;====================================================;====================================================

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

    $TAB1 = GUICtrlCreateTab(8, 8, 390, 225)
    GUICtrlSetResizing(-1, $GUI_DOCKWIDTH + $GUI_DOCKHEIGHT)
    $Tab = GUICtrlCreateTabItem("Allgemein")
    $Group1 = GUICtrlCreateGroup("", 20, 48, 145, 73)
    $Exit = GUICtrlCreateButton("Exit", 105, 129, 65, 31)
    $AllgemeinLabel = GUICtrlCreateLabel(" Made by:", 35, 64, 111, 18)
    $AllgemeinLabel2 = GUICtrlCreateLabel(" T u t t i _ F r u t t i", 35, 80, 105, 18)
    $AllgemeinLabel3 = GUICtrlCreateLabel(" " & $vVersion, 35, 97, 105, 18)
    GUICtrlCreateTabItem("")

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

    ;====================================================
    GUISetState(@SW_SHOW)

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

    While 1

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

    $MSG = GUIGetMsg(1)
    Switch $MSG[1]
    Case $FORM1
    If $BOLTEST = False Then

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

    For $i = 0 To 100 Step +1
    Sleep(5)
    GUICtrlSetData($Progress1, $i)
    Next
    GUISetState(@SW_HIDE, $FORM1)
    GUISetState(@SW_SHOW, $FORM2)
    $BOLTEST = True
    EndIf
    Case $FORM2

    Switch $MSG[0]

    Case $GUI_EVENT_CLOSE,$Exit
    Exit

    Case $Info
    MsgBox(0,"","Info ~ F.A.Q --- [Tutti_Frutti] (c) 2009 - 2010")

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

    Case $Settings
    Settings()

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

    EndSwitch
    EndSwitch
    WEnd

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

    Func Settings()

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

    Opt("GUIOnEventMode", 0)
    GUISetState(@SW_DISABLE, $FORM2)
    GUISetState(@SW_HIDE, $FORM2)

    $settinggui = GUICreate("Settings", 518, 190)
    $cancel = GUICtrlCreateButton("Exit", 263, 160, 247, 20, 0)
    $save = GUICtrlCreateButton("Save", 10, 160, 247, 20, 0)
    $groupdelays = GUICtrlCreateGroup("Keine Ahnung", 10, 10, 260, 91)
    GUICtrlCreateGroup("", -99, -99, 1, 1)
    $groupgeneral2 = GUICtrlCreateGroup("Info", 10, 105, 500, 50)
    $Label1 = GUICtrlCreateLabel("Copyright by T u t t i _ F r u t t i (C) 2009 - 2010 # ", 104, 128, 308, 19)
    GUICtrlSetFont(-1, 10, 800, 0, "Times New Roman")
    GUICtrlCreateGroup("", -99, -99, 1, 1)
    $FTP = GUICtrlCreateGroup("Einstellungen", 280, 10, 230, 91)
    $Checkbox2 = GUICtrlCreateCheckbox("Mit Windows starten", 295, 34, 121, 17)
    $Checkbox1 = GUICtrlCreateCheckbox("Immer im Vordergrund", 295, 65, 129, 17)
    If $autostart = "1" then GUICtrlSetState($Checkbox2, $GUI_CHECKED)
    If $OnTop = "1" then GUICtrlSetState($Checkbox1, $GUI_CHECKED)
    If $autostart = "0" then GUICtrlSetState($Checkbox2, $GUI_UNCHECKED)
    If $OnTop = "0" then GUICtrlSetState($Checkbox1, $GUI_UNCHECKED)
    GUICtrlCreateGroup("", -99, -99, 1, 1)

    GUISetState(@SW_SHOW, $settinggui)
    While 1
    $msg = GUIGetMsg()
    Select
    Case $msg = $GUI_EVENT_CLOSE
    GUIDelete()
    ExitLoop
    Case $msg = $cancel
    ExitLoop
    Case $msg = $Checkbox2 AND BitAnd(GUICtrlRead($Checkbox2), $GUI_CHECKED) = $GUI_CHECKED
    $autostart = "1"
    Case $msg = $Checkbox2 AND BitAnd(GUICtrlRead($Checkbox2), $GUI_UNCHECKED) = $GUI_UNCHECKED
    $autostart = "0"
    Case $msg = $Checkbox1 AND BitAnd(GUICtrlRead($Checkbox1), $GUI_CHECKED) = $GUI_CHECKED
    $OnTop = "1"
    Case $msg = $Checkbox1 AND BitAnd(GUICtrlRead($Checkbox1), $GUI_UNCHECKED) = $GUI_UNCHECKED
    $OnTop = "0"
    Case $msg = $save
    MsgBox(0,"","Comming Soon...")
    ExitLoop
    ;Exit

    EndSelect
    Sleep(10)
    WEnd

    GUIDelete($settinggui)
    Sleep(100)

    GUISetState(@SW_ENABLE, $FORM2)
    GUISetState(@SW_SHOW, $FORM2)
    GUISetState(@SW_ENABLE, $FORM1)
    EndFunc

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

    Func _exit()

    Exit
    EndFunc

    [/autoit]
    • Offizieller Beitrag
    Zitat

    Warum ich soviele Include's habe *Fragt mich nicht ;) Ich hab immer soviele ^^ lieber zuviel als zuwenig :)*

    Warum benutzt du nicht einfach OrganizeIncludes? http://www.autoitscript.com/forum/index.php?act=attach&type=post&id=20980

    Zitat von Raupi

    Warum benutzt du nicht einfach OrganizeIncludes? http://www.autoitscript.com/forum/index.php?act=attach&type=post&id=20980

    Habe ich nie lust zu :) Ich finde das schon gut so ^^


    Du hast mich auf eine Idea gebracht.
    Ich habs einfach mal so gemacht. ;)

    Klappen tut es bei mir =)

    Spoiler anzeigen
    [autoit]

    #include <GUIConstantsEx.au3 >
    #include <WindowsConstants.au3>
    #include <EditConstants.au3>
    #include <Date.au3>
    #include <ListViewConstants.au3>
    #include <WindowsConstants.au3>
    #include <ListviewConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <WindowsConstants.au3>
    #include <SliderConstants.au3>
    #Include <GuiListView.au3>
    #Include <Array.au3>
    #Include <File.au3>
    #Include <GuiListView.au3>
    #Include<StructureConstants.au3>
    #include<Constants.au3>
    #include <GUIConstantsEx.au3>
    #include <ButtonConstants.au3>

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

    HotkeySet("{END}","_exit")
    $INI= @ScriptDir & "\Data\Default.ini"

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

    opt("GUIResizeMode",802)
    Opt("WinTitleMatchMode", 2)
    Opt("TrayMenuMode", 1)
    Opt("TrayOnEventMode", 1)

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

    $runwindoof = IniRead($INI, "Windows", "Run", "")

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

    $ontop = IniRead($INI,"Window", "OnTop", "")

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

    If Not FileExists(@ScriptDir & "\Data\") Then
    DirCreate(@ScriptDir & "\Data\")
    EndIf

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

    If not fileexists($INI) Then
    Iniwrite($INI,"Default","Titel","(C) Tutti_Frutti 2009 - 2010")
    EndIf

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

    $vVersion = "Version 2.1"

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

    If @Compiled = 0 Then
    TraySetIcon("Rubik-Pocket-Cube.ico")
    EndIf

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

    TraySetToolTip($vVersion)

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

    $BOLTEST = False
    $FORM1 = GUICreate("Tool " & $vVersion & " - by TuttiFrutti", 195, 15, -1, -1, $WS_POPUP, 0)
    GUISetBkColor(16777215)

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

    $Progress1 = GUICtrlCreateProgress(-1, -1, 198, 17)

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

    GUISetState(@SW_SHOW)
    For $i = 0 To 100 Step 5
    Sleep(60)
    GUICtrlSetData($Progress1, $i)

    Next
    ProgressOff()
    GUISetState(@SW_HIDE)

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

    ;=======================================================================================================

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

    $FORM2 = GUICreate("(C) " & $vVersion & "", 405, 235, -1, -1,$WS_POPUP + $WS_SIZEBOX +$WS_EX_TOOLWINDOW+$WS_EX_TOPMOST+$WS_EX_WINDOWEDGE + $WS_EX_TOPMOST + $WS_VISIBLE + $WS_CLIPSIBLINGS)

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

    ;====================================================

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

    $Info = GUICtrlCreateButton("F.A.Q", 370, 0, 35, 30 , $BS_ICON)
    GUICtrlSetImage(-1, @ScriptDir & "\Green-block.ico",1)

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

    $Settings = GUICtrlCreateButton("Settings", 330, 0, 35, 30 , $BS_ICON)
    GUICtrlSetImage(-1, @ScriptDir & "\Settings.ico",1)

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

    ;====================================================;====================================================

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

    $TAB1 = GUICtrlCreateTab(8, 8, 390, 225)
    GUICtrlSetResizing(-1, $GUI_DOCKWIDTH + $GUI_DOCKHEIGHT)
    $Tab = GUICtrlCreateTabItem("Allgemein")
    $Group1 = GUICtrlCreateGroup("", 20, 48, 145, 73)
    $Exit = GUICtrlCreateButton("Exit", 105, 129, 65, 31)
    $AllgemeinLabel = GUICtrlCreateLabel(" Made by:", 35, 64, 111, 18)
    $AllgemeinLabel2 = GUICtrlCreateLabel(" T u t t i _ F r u t t i", 35, 80, 105, 18)
    $AllgemeinLabel3 = GUICtrlCreateLabel(" " & $vVersion, 35, 97, 105, 18)
    GUICtrlCreateTabItem("")

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

    ;====================================================
    GUISetState(@SW_SHOW)

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

    While 1

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

    $MSG = GUIGetMsg(1)
    Switch $MSG[1]
    Case $FORM1
    If $BOLTEST = False Then

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

    For $i = 0 To 100 Step +1
    Sleep(5)
    GUICtrlSetData($Progress1, $i)
    Next
    GUISetState(@SW_HIDE, $FORM1)
    GUISetState(@SW_SHOW, $FORM2)
    $BOLTEST = True
    EndIf
    Case $FORM2

    Switch $MSG[0]

    Case $GUI_EVENT_CLOSE,$Exit
    Exit

    Case $Info
    MsgBox(0,"","Info ~ F.A.Q --- [Tutti_Frutti] (c) 2009 - 2010")

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

    Case $Settings
    Settings()

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

    EndSwitch
    EndSwitch
    WEnd

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

    Func Settings()

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

    Opt("GUIOnEventMode", 0)
    GUISetState(@SW_DISABLE, $FORM2)
    GUISetState(@SW_HIDE, $FORM2)

    $settinggui = GUICreate("Settings", 518, 190)
    $cancel = GUICtrlCreateButton("Exit", 263, 160, 247, 20, 0)
    $save = GUICtrlCreateButton("Save", 10, 160, 247, 20, 0)
    $groupdelays = GUICtrlCreateGroup("Keine Ahnung", 10, 10, 260, 91)
    GUICtrlCreateGroup("", -99, -99, 1, 1)
    $groupgeneral2 = GUICtrlCreateGroup("Info", 10, 105, 500, 50)
    $Label1 = GUICtrlCreateLabel("Copyright by T u t t i _ F r u t t i (C) 2009 - 2010 # ", 104, 128, 308, 19)
    GUICtrlSetFont(-1, 10, 800, 0, "Times New Roman")
    GUICtrlCreateGroup("", -99, -99, 1, 1)
    $FTP = GUICtrlCreateGroup("Einstellungen", 280, 10, 230, 91)
    $Checkbox2 = GUICtrlCreateCheckbox("Mit Windows starten", 295, 34, 121, 17)
    If $runwindoof = "yes" Then GUICtrlSetState($Checkbox2, 1)

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

    $Checkbox1 = GUICtrlCreateCheckbox("Immer im Vordergrund", 295, 65, 129, 17)
    If $ontop = "yes" Then GUICtrlSetState($Checkbox1, 1)

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

    GUISetState(@SW_SHOW, $settinggui)

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



    While 1
    Switch GUIGetMsg($settinggui)
    Case - 3
    ExitLoop

    Case $cancel
    ExitLoop

    Case $save

    If GUICtrlRead($Checkbox2) = 1 Then
    IniWrite($INI, "Windows", "Run", "yes")
    $runwindoof = "yes"
    Else
    IniWrite($INI, "Windows", "Run", "no")
    $runwindoof = "no"
    EndIf

    If GUICtrlRead($Checkbox1) = 1 Then
    IniWrite($INI, "Window", "OnTop", "yes")
    $ontop = "yes"
    Else
    IniWrite($INI, "Window", "OnTop", "no")
    $ontop = "no"
    EndIf


    ExitLoop
    ;Exit

    EndSwitch
    Sleep(10)
    WEnd

    GUIDelete($settinggui)
    Sleep(100)

    GUISetState(@SW_ENABLE, $FORM2)
    GUISetState(@SW_SHOW, $FORM2)
    GUISetState(@SW_ENABLE, $FORM1)
    EndFunc

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

    Func _exit()

    Exit
    EndFunc

    [/autoit]