Benötige Hilfe um mein Script zu vereinfachen

    Morgen Leute also bin dabie mir selbst eine Installation´s DVD zu erstellen.
    also hat wer ne Idee wie ich
    a) das script verkleiner (vereinfachen) kann
    b) eine Abfrage reinbekommen ob überhaupt eine checkbox gelickt wurde.

    Spoiler anzeigen

    #include <ButtonConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <StaticConstants.au3>
    #include <WindowsConstants.au3>
    #include <GuiToolbar.au3>
    #include <EditConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <Sound.au3>
    #RequireAdmin
    Opt("GUIOnEventMode", 1)
    #Region ### START Koda GUI section ### Form=
    $Form1 = GUICreate("Software Installer v3.1", 587, 530, -1, -1)
    GUISetIcon("Icons\My Computer.ico")

    GUISetBkColor(0x008080)
    GUISetOnEvent($GUI_EVENT_CLOSE, "Form1Close")
    GUISetOnEvent($GUI_EVENT_MINIMIZE, "Form1Minimize")
    GUISetOnEvent($GUI_EVENT_MAXIMIZE, "Form1Maximize")
    GUISetOnEvent($GUI_EVENT_RESTORE, "Form1Restore")

    $Group1 = GUICtrlCreateGroup("Silent Install", 16, 16, 185, 497)
    GUICtrlSetFont(-1, 14, 400, 0, "Old English Text MT")

    $Checkbox1 = GUICtrlCreateCheckbox("Vlc Media Player", 24, 40, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")

    GUICtrlSetOnEvent(-1, "Checkbox1Click")
    $Checkbox3 = GUICtrlCreateCheckbox("Xp AntiSpy", 24, 488, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")

    GUICtrlSetOnEvent(-1, "Checkbox3Click")
    $Checkbox5 = GUICtrlCreateCheckbox("Unlocker", 24, 56, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")

    GUICtrlSetOnEvent(-1, "Checkbox5Click")
    $Checkbox6 = GUICtrlCreateCheckbox("Checkbox6", 24, 72, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")

    GUICtrlSetOnEvent(-1, "Checkbox6Click")
    $Checkbox7 = GUICtrlCreateCheckbox("Checkbox7", 24, 88, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")

    GUICtrlSetOnEvent(-1, "Checkbox7Click")
    $Checkbox8 = GUICtrlCreateCheckbox("Checkbox8", 24, 104, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")

    GUICtrlSetOnEvent(-1, "Checkbox8Click")
    $Checkbox9 = GUICtrlCreateCheckbox("Checkbox9", 24, 120, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")

    GUICtrlSetOnEvent(-1, "Checkbox9Click")
    $Checkbox10 = GUICtrlCreateCheckbox("Checkbox10", 24, 136, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")

    GUICtrlSetOnEvent(-1, "Checkbox10Click")
    $Checkbox11 = GUICtrlCreateCheckbox("Checkbox11", 24, 152, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")

    GUICtrlSetOnEvent(-1, "Checkbox11Click")
    $Checkbox12 = GUICtrlCreateCheckbox("Checkbox12", 24, 168, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")

    GUICtrlSetOnEvent(-1, "Checkbox12Click")
    $Checkbox13 = GUICtrlCreateCheckbox("Checkbox13", 24, 184, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")

    GUICtrlSetOnEvent(-1, "Checkbox13Click")
    $Checkbox14 = GUICtrlCreateCheckbox("Checkbox14", 24, 200, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")

    GUICtrlSetOnEvent(-1, "Checkbox14Click")
    $Checkbox15 = GUICtrlCreateCheckbox("Checkbox15", 24, 216, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")

    GUICtrlSetOnEvent(-1, "Checkbox15Click")
    $Checkbox16 = GUICtrlCreateCheckbox("Checkbox16", 24, 232, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")

    GUICtrlSetOnEvent(-1, "Checkbox16Click")
    $Checkbox17 = GUICtrlCreateCheckbox("Checkbox17", 24, 248, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")

    GUICtrlSetOnEvent(-1, "Checkbox17Click")
    $Checkbox18 = GUICtrlCreateCheckbox("Checkbox18", 24, 264, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")

    GUICtrlSetOnEvent(-1, "Checkbox18Click")
    $Checkbox19 = GUICtrlCreateCheckbox("Checkbox19", 24, 280, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")

    GUICtrlSetOnEvent(-1, "Checkbox19Click")
    $Checkbox20 = GUICtrlCreateCheckbox("Checkbox20", 24, 296, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")

    GUICtrlSetOnEvent(-1, "Checkbox20Click")
    $Checkbox21 = GUICtrlCreateCheckbox("Checkbox21", 24, 312, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")

    GUICtrlSetOnEvent(-1, "Checkbox21Click")
    $Checkbox22 = GUICtrlCreateCheckbox("Checkbox22", 24, 328, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")

    GUICtrlSetOnEvent(-1, "Checkbox22Click")
    $Checkbox23 = GUICtrlCreateCheckbox("Checkbox23", 24, 344, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")

    GUICtrlSetOnEvent(-1, "Checkbox23Click")
    $Checkbox24 = GUICtrlCreateCheckbox("Checkbox24", 24, 360, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")

    GUICtrlSetOnEvent(-1, "Checkbox24Click")
    $Checkbox25 = GUICtrlCreateCheckbox("Checkbox25", 24, 376, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")

    GUICtrlSetOnEvent(-1, "Checkbox25Click")
    $Checkbox26 = GUICtrlCreateCheckbox("Checkbox26", 24, 392, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")

    GUICtrlSetOnEvent(-1, "Checkbox26Click")
    $Checkbox27 = GUICtrlCreateCheckbox("Checkbox27", 24, 408, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")

    GUICtrlSetOnEvent(-1, "Checkbox27Click")
    $Checkbox28 = GUICtrlCreateCheckbox("Checkbox28", 24, 424, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")

    GUICtrlSetOnEvent(-1, "Checkbox28Click")
    $Checkbox29 = GUICtrlCreateCheckbox("Checkbox29", 24, 440, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")

    GUICtrlSetOnEvent(-1, "Checkbox29Click")
    $Checkbox30 = GUICtrlCreateCheckbox("Checkbox30", 24, 456, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")

    GUICtrlSetOnEvent(-1, "Checkbox30Click")
    $Checkbox31 = GUICtrlCreateCheckbox("Checkbox31", 24, 472, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")

    GUICtrlSetOnEvent(-1, "Checkbox31Click")
    GUICtrlCreateGroup("", -99, -99, 1, 1)
    $Group2 = GUICtrlCreateGroup("User default", 200, 16, 185, 497)
    GUICtrlSetFont(-1, 14, 400, 0, "Old English Text MT")
    $Checkbox2 = GUICtrlCreateCheckbox("Vlc Media Player", 208, 40, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    GUICtrlSetOnEvent(-1, "Checkbox2Click")
    $Checkbox4 = GUICtrlCreateCheckbox("Xp AntiSpy", 208, 488, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    GUICtrlSetOnEvent(-1, "Checkbox4Click")
    $Checkbox32 = GUICtrlCreateCheckbox("Checkbox32", 208, 56, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")

    GUICtrlSetOnEvent(-1, "Checkbox32Click")
    $Checkbox33 = GUICtrlCreateCheckbox("Checkbox33", 208, 72, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")

    GUICtrlSetOnEvent(-1, "Checkbox33Click")
    $Checkbox34 = GUICtrlCreateCheckbox("Checkbox34", 208, 88, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")

    GUICtrlSetOnEvent(-1, "Checkbox34Click")
    $Checkbox35 = GUICtrlCreateCheckbox("Checkbox35", 208, 104, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")

    GUICtrlSetOnEvent(-1, "Checkbox35Click")
    $Checkbox36 = GUICtrlCreateCheckbox("Checkbox36", 208, 120, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")

    GUICtrlSetOnEvent(-1, "Checkbox36Click")
    $Checkbox37 = GUICtrlCreateCheckbox("Checkbox37", 208, 136, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")

    GUICtrlSetOnEvent(-1, "Checkbox37Click")
    $Checkbox38 = GUICtrlCreateCheckbox("Checkbox38", 208, 152, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")

    GUICtrlSetOnEvent(-1, "Checkbox38Click")
    $Checkbox39 = GUICtrlCreateCheckbox("Checkbox39", 208, 168, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")

    GUICtrlSetOnEvent(-1, "Checkbox39Click")
    $Checkbox40 = GUICtrlCreateCheckbox("Checkbox40", 208, 184, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")

    GUICtrlSetOnEvent(-1, "Checkbox40Click")
    $Checkbox41 = GUICtrlCreateCheckbox("Checkbox41", 208, 200, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")

    GUICtrlSetOnEvent(-1, "Checkbox41Click")
    $Checkbox42 = GUICtrlCreateCheckbox("Checkbox42", 208, 216, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")

    GUICtrlSetOnEvent(-1, "Checkbox42Click")
    $Checkbox43 = GUICtrlCreateCheckbox("Checkbox43", 208, 232, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")

    GUICtrlSetOnEvent(-1, "Checkbox43Click")
    $Checkbox44 = GUICtrlCreateCheckbox("Checkbox44", 208, 248, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")

    GUICtrlSetOnEvent(-1, "Checkbox44Click")
    $Checkbox45 = GUICtrlCreateCheckbox("Checkbox45", 208, 264, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")

    GUICtrlSetOnEvent(-1, "Checkbox45Click")
    $Checkbox46 = GUICtrlCreateCheckbox("Checkbox46", 208, 280, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")

    GUICtrlSetOnEvent(-1, "Checkbox46Click")
    $Checkbox47 = GUICtrlCreateCheckbox("Checkbox47", 208, 296, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")

    GUICtrlSetOnEvent(-1, "Checkbox47Click")
    $Checkbox48 = GUICtrlCreateCheckbox("Checkbox48", 208, 312, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")

    GUICtrlSetOnEvent(-1, "Checkbox48Click")
    $Checkbox49 = GUICtrlCreateCheckbox("Checkbox49", 208, 328, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")

    GUICtrlSetOnEvent(-1, "Checkbox49Click")
    $Checkbox50 = GUICtrlCreateCheckbox("Checkbox50", 208, 344, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")

    GUICtrlSetOnEvent(-1, "Checkbox50Click")
    $Checkbox51 = GUICtrlCreateCheckbox("Checkbox51", 208, 360, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")

    GUICtrlSetOnEvent(-1, "Checkbox51Click")
    $Checkbox52 = GUICtrlCreateCheckbox("Checkbox52", 208, 376, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")

    GUICtrlSetOnEvent(-1, "Checkbox52Click")
    $Checkbox53 = GUICtrlCreateCheckbox("Checkbox53", 208, 392, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")

    GUICtrlSetOnEvent(-1, "Checkbox53Click")
    $Checkbox54 = GUICtrlCreateCheckbox("Checkbox54", 208, 408, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")

    GUICtrlSetOnEvent(-1, "Checkbox54Click")
    $Checkbox55 = GUICtrlCreateCheckbox("Checkbox55", 208, 424, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")

    GUICtrlSetOnEvent(-1, "Checkbox55Click")
    $Checkbox56 = GUICtrlCreateCheckbox("Checkbox56", 208, 440, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")

    GUICtrlSetOnEvent(-1, "Checkbox56Click")
    $Checkbox57 = GUICtrlCreateCheckbox("Checkbox57", 208, 456, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")

    GUICtrlSetOnEvent(-1, "Checkbox57Click")
    $Checkbox58 = GUICtrlCreateCheckbox("Checkbox58", 208, 472, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")

    GUICtrlSetOnEvent(-1, "Checkbox58Click")

    GUICtrlCreateGroup("", -99, -99, 1, 1)
    $Group3 = GUICtrlCreateGroup("Portable Apps ", 384, 16, 185, 497)
    GUICtrlSetFont(-1, 14, 400, 0, "Old English Text MT")

    $Checkbox59 = GUICtrlCreateCheckbox("Firefox Portable 4", 392, 40, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")

    GUICtrlSetOnEvent(-1, "Checkbox59Click")
    $Checkbox60 = GUICtrlCreateCheckbox("VLC Media Player Portable", 392, 56, 163, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    GUICtrlSetOnEvent(-1, "Checkbox60Click")
    $Checkbox61 = GUICtrlCreateCheckbox("TeamViewer 6 Portable", 392, 72, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    GUICtrlSetOnEvent(-1, "Checkbox61Click")
    $Checkbox62 = GUICtrlCreateCheckbox("7-Zip Portable", 392, 88, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    GUICtrlSetOnEvent(-1, "Checkbox62Click")
    $Checkbox63 = GUICtrlCreateCheckbox("OpenOffice Portable", 392, 104, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    GUICtrlSetOnEvent(-1, "Checkbox63Click")
    $Checkbox64 = GUICtrlCreateCheckbox("Thunderbird Portable", 392, 120, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    GUICtrlSetOnEvent(-1, "Checkbox64Click")
    $Checkbox65 = GUICtrlCreateCheckbox("FoxitReader Portable", 392, 136, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    GUICtrlSetOnEvent(-1, "Checkbox65Click")
    $Checkbox66 = GUICtrlCreateCheckbox("FileZilla Portable", 392, 152, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    GUICtrlSetOnEvent(-1, "Checkbox66Click")
    $Checkbox67 = GUICtrlCreateCheckbox("Spybot Portable", 392, 168, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    GUICtrlSetOnEvent(-1, "Checkbox67Click")
    ;$Checkbox68 = GUICtrlCreateCheckbox("Checkbox68", 392, 184, 153, 17)
    ;GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    ;GUICtrlSetOnEvent(-1, "Checkbox68Click")
    ;$Checkbox69 = GUICtrlCreateCheckbox("Checkbox69", 392, 200, 153, 17)
    ;GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    ;GUICtrlSetOnEvent(-1, "Checkbox69Click")
    ;$Checkbox70 = GUICtrlCreateCheckbox("Checkbox70", 392, 216, 153, 17)
    ;GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    ;GUICtrlSetOnEvent(-1, "Checkbox70Click")

    $Button5 = GUICtrlCreateButton("Install selected", 392, 480, 83, 25, $WS_GROUP)
    GUICtrlSetFont(-1, 9, 400, 0, "Myriad Web Pro")
    GUICtrlSetOnEvent(-1, "Button5Click")
    $Button6 = GUICtrlCreateButton("Exit", 480, 480, 75, 25, $WS_GROUP)
    GUICtrlSetFont(-1, 9, 400, 0, "Myriad Web Pro")
    GUICtrlSetOnEvent(-1, "Button6Click")


    $UncheckInstalled = 1
    GUISetState(@SW_SHOW)
    #EndRegion ### END Koda GUI section ###

    While 1
    Sleep(100)
    WEnd

    Func Button5Click()
    $Msg = MsgBox(4, "Install/Abbruch", "Wollen Sie mit den Installationen nun beginnen?")
    If $Msg = 7 Then
    ConsoleWrite("Abbruch!" & @CRLF)
    Else

    EndIf
    Sleep(1000)
    If GUICtrlRead($Checkbox1)=1 then
    if FileExists (@ProgramFilesDir & "\VLC\vlc.exe") then
    MsgBox(48,"Fehler","Programm VLC Media Player ist schon vorhanden."& @CR & _
    "Bitte deinstalliere erst die alte Version!!",3)
    elseif FileExists (@ProgramFilesDir & "\VideoLAN\VLC\vlc.exe") then
    MsgBox(48,"Fehler","Programm VLC Media Player ist schon vorhanden."& @CR & _
    "Bitte deinstalliere erst die alte Version!!",3)
    else
    MsgBox(1,"Programmauswahl","!Programm wurde zur Installationsliste hinzugefügt!",2)
    RunWait(@ScriptDir & "\Software\vlc\vlc.exe")
    MsgBox(1,"Fertig","Vlc wurde erfolgreich installiert",2)
    endif
    If $UncheckInstalled = 1 Then GuiCtrlSetState($Checkbox1, $GUI_UNCHECKED)
    Sleep(1000)
    endif

    If GUICtrlRead($Checkbox5)=1 then
    if FileExists (@ProgramFilesDir & "\unlocker\unlocker.exe") then
    MsgBox(48,"Fehler","Programm Unlocker ist schon vorhanden."& @CR & _
    "Bitte deinstalliere erst die alte Version!!",3)
    else
    MsgBox(1,"Programmauswahl","!Programm wurde zur Installationsliste hinzugefügt!",2)
    RunWait(@ScriptDir & "\Software\unlocker\Unlocker.exe")
    MsgBox(1,"Erfolg","Unlocker wurde erfolgreich installiert",2)
    endif
    If $UncheckInstalled = 1 Then GuiCtrlSetState($Checkbox1, $GUI_UNCHECKED)
    Sleep(1000)
    endif

    If GUICtrlRead($Checkbox59)=1 then
    MsgBox(64,"Ordner erstellen","Es wird nun ein Desktop Ordner für PortableApps erstellt",5)
    DirCreate(@DesktopDir & "\PortableApps\FirefoxPortable\")
    sleep(500)
    DirCopy(@ScriptDir & "\PortableApps\FirefoxPortable", @DesktopDir & "\PortableApps\FirefoxPortable",1)
    MsgBox(1,"PortableApps","Programm FirefoxPortable wurde in den PortableApps Ordner integriert",3)
    endif
    If GUICtrlRead($Checkbox60)=1 then
    DirCreate(@DesktopDir & "\PortableApps\VLCPortable\")
    sleep(500)
    DirCopy(@ScriptDir & "\PortableApps\VLCPortable", @DesktopDir & "\PortableApps\VLCPortable",1)
    MsgBox(1,"PortableApps","Programm Vlc Media Player Portable wurde in den PortableApps Ordner integriert",3)
    endif

    If GUICtrlRead($Checkbox61)=1 then
    DirCreate(@DesktopDir & "\PortableApps\TeamViewerPortable\")
    sleep(500)
    DirCopy(@ScriptDir & "\PortableApps\TeamViewerPortable", @DesktopDir & "\PortableApps\TeamViewerPortable",1)
    MsgBox(1,"PortableApps","Programm TeamViewer Portable wurde in den PortableApps Ordner integriert",3)
    endif

    If GUICtrlRead($Checkbox62)=1 then
    DirCreate(@DesktopDir & "\PortableApps\7-ZipPortable\")
    sleep(500)
    DirCopy(@ScriptDir & "\PortableApps\7-ZipPortable", @DesktopDir & "\PortableApps\7-ZipPortable",1)
    MsgBox(1,"PortableApps","Programm 7-Zip Portable wurde in den PortableApps Ordner integriert",3)
    endif

    If GUICtrlRead($Checkbox63)=1 then
    DirCreate(@DesktopDir & "\PortableApps\OpenOfficePortable\")
    sleep(500)
    DirCopy(@ScriptDir & "\PortableApps\OpenOfficePortable", @DesktopDir & "\PortableApps\OpenOfficePortable",1)
    MsgBox(1,"PortableApps","Programm OpenOffice Portable wurde in den PortableApps Ordner integriert",3)
    endif

    If GUICtrlRead($Checkbox64)=1 then
    DirCreate(@DesktopDir & "\PortableApps\ThunderbirdPortable\")
    sleep(500)
    DirCopy(@ScriptDir & "\PortableApps\ThunderbirdPortable", @DesktopDir & "\PortableApps\ThunderbirdPortable",1)
    MsgBox(1,"PortableApps","Programm Thunderbird Portable wurde in den PortableApps Ordner integriert",3)
    endif

    If GUICtrlRead($Checkbox65)=1 then
    DirCreate(@DesktopDir & "\PortableApps\FoxitReaderPortable\")
    sleep(500)
    DirCopy(@ScriptDir & "\PortableApps\FoxitReaderPortable", @DesktopDir & "\PortableApps\FoxitReaderPortable",1)
    MsgBox(1,"PortableApps","Programm FoxitReader Portable wurde in den PortableApps Ordner integriert",3)
    endif

    If GUICtrlRead($Checkbox66)=1 then
    DirCreate(@DesktopDir & "\PortableApps\FileZillaPortable\")
    sleep(500)
    DirCopy(@ScriptDir & "\PortableApps\FileZillaPortable", @DesktopDir & "\PortableApps\FileZillaPortable",1)
    MsgBox(1,"PortableApps","Programm FileZilla Portable wurde in den PortableApps Ordner integriert",3)
    endif

    If GUICtrlRead($Checkbox67)=1 then
    DirCreate(@DesktopDir & "\PortableApps\SpybotPortable\")
    sleep(500)
    DirCopy(@ScriptDir & "\PortableApps\SpybotPortable", @DesktopDir & "\PortableApps\SpybotPortable",1)
    MsgBox(1,"PortableApps","Programm Spybot Portable wurde in den PortableApps Ordner integriert",3)
    endif


    EndFunc


    Func Button6Click()
    $chk = MsgBox(1, "Verlassen", "Wollen Sie den Installer nun verlassen?")
    If $chk = 1 Then
    exit
    Else
    ConsoleWrite("Abbruch!" & @CRLF)
    EndIf
    EndFunc


    Func Form1Close()
    exit
    EndFunc
    Func Form1Maximize()

    EndFunc
    Func Form1Minimize()

    EndFunc
    Func Form1Restore()

    EndFunc


    gruß Osiris

    P.s bin noch Anfänger mit AutoIt :whistling:

    Einmal editiert, zuletzt von Osiris (14. Mai 2011 um 20:52)

    Ich würde mir mal array´s anschauen.

    Das finden von Rechtschreibfehlern muss sofort und unverzüglich dem Autor gemeldet werden. Das eigennützige Verwenden dieser Rechtschreibfehler ist strengstens untersagt und kann mit Freiheitsenzug bestraft werden.

    StringRegExpTo2DArray

    schaue ich mir grad an aber so wirklich check ich array´s noch nicht , aber danke für den tip

    Hi Osiris,

    hier mal ein paar Hinweise:

    Spoiler anzeigen
    [autoit]


    #region ;**** Directives created by AutoIt3Wrapper_GUI ****
    #AutoIt3Wrapper_icon=DeinIcon.ico ;i#################### DeinIcon.ico #########################
    #AutoIt3Wrapper_outfile=OSI.exe
    #AutoIt3Wrapper_Res_Description=Osiris Software Installer
    #AutoIt3Wrapper_Res_Fileversion=3.1
    #AutoIt3Wrapper_Res_LegalCopyright=© 2011 by Osiris
    #AutoIt3Wrapper_Res_Language=1031
    #AutoIt3Wrapper_Res_Field=AutoIt Version|%AutoItVer%
    #AutoIt3Wrapper_Res_Field=Compiled by|Osiris
    #AutoIt3Wrapper_Res_Field=Original Name|Osiris Software Installer
    #AutoIt3Wrapper_Res_Field=Build|%date%
    #AutoIt3Wrapper_AU3Check_Parameters=-d -w 1 -w 2 -w 3 -w 4 -w 5 -w 6
    #AutoIt3Wrapper_Run_Tidy=y
    #AutoIt3Wrapper_Run_Obfuscator=y
    #Obfuscator_Parameters=/striponly
    #endregion ;**** Directives created by AutoIt3Wrapper_GUI ****
    #region - TimeStamp
    ; 2011-05-12 12:22:18
    #endregion - TimeStamp

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

    #include <GUIConstantsEx.au3>
    #RequireAdmin

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

    ;~ $GUI_EVENT_MINIMIZE —> GUIConstantsEx.au3
    ;~ $GUI_EVENT_MAXIMIZE —> GUIConstantsEx.au3
    ;~ $GUI_EVENT_RESTORE —> GUIConstantsEx.au3
    ;~ $GUI_UNCHECKED —> GUIConstantsEx.au3
    ;~ $WS_GROUP —> WindowsConstants.au3 ;! Wozu ist $WS_GROUP hier nötig?

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

    Opt("GUIOnEventMode", 1) ;i Eine Gute Wahl

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

    #region ### START Koda GUI section ### Form=
    GUICreate("Software Installer v3.1", 590, 530)
    ;i GUISetIcon("Icons\My Computer.ico") ;i siehe Zeile zwei - DeinIcon.ico -

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

    GUISetBkColor(0x008080)
    GUISetOnEvent($GUI_EVENT_CLOSE, "Form1Close")
    GUISetOnEvent($GUI_EVENT_MINIMIZE, "Form1Minimize")
    GUISetOnEvent($GUI_EVENT_MAXIMIZE, "Form1Maximize")
    GUISetOnEvent($GUI_EVENT_RESTORE, "Form1Restore")

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

    GUICtrlCreateGroup("Silent Install", 16, 16, 185, 497)
    GUICtrlSetFont(-1, 14, 400, 0, "Old English Text MT")
    $Checkbox1 = GUICtrlCreateCheckbox("Vlc Media Player", 24, 40, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    GUICtrlSetOnEvent(-1, "Checkbox1Click")
    $Checkbox3 = GUICtrlCreateCheckbox("Xp AntiSpy", 24, 488, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    GUICtrlSetOnEvent(-1, "Checkbox3Click")
    $Checkbox5 = GUICtrlCreateCheckbox("Unlocker", 24, 56, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    GUICtrlSetOnEvent(-1, "Checkbox5Click")
    $Checkbox6 = GUICtrlCreateCheckbox("Checkbox6", 24, 72, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    GUICtrlSetOnEvent(-1, "Checkbox6Click")
    $Checkbox7 = GUICtrlCreateCheckbox("Checkbox7", 24, 88, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    GUICtrlSetOnEvent(-1, "Checkbox7Click")
    $Checkbox8 = GUICtrlCreateCheckbox("Checkbox8", 24, 104, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    GUICtrlSetOnEvent(-1, "Checkbox8Click")
    $Checkbox9 = GUICtrlCreateCheckbox("Checkbox9", 24, 120, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    GUICtrlSetOnEvent(-1, "Checkbox9Click")
    $Checkbox10 = GUICtrlCreateCheckbox("Checkbox10", 24, 136, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    GUICtrlSetOnEvent(-1, "Checkbox10Click")
    $Checkbox11 = GUICtrlCreateCheckbox("Checkbox11", 24, 152, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    GUICtrlSetOnEvent(-1, "Checkbox11Click")
    $Checkbox12 = GUICtrlCreateCheckbox("Checkbox12", 24, 168, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    GUICtrlSetOnEvent(-1, "Checkbox12Click")
    $Checkbox13 = GUICtrlCreateCheckbox("Checkbox13", 24, 184, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    GUICtrlSetOnEvent(-1, "Checkbox13Click")
    $Checkbox14 = GUICtrlCreateCheckbox("Checkbox14", 24, 200, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    GUICtrlSetOnEvent(-1, "Checkbox14Click")
    $Checkbox15 = GUICtrlCreateCheckbox("Checkbox15", 24, 216, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    GUICtrlSetOnEvent(-1, "Checkbox15Click")
    $Checkbox16 = GUICtrlCreateCheckbox("Checkbox16", 24, 232, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    GUICtrlSetOnEvent(-1, "Checkbox16Click")
    $Checkbox17 = GUICtrlCreateCheckbox("Checkbox17", 24, 248, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    GUICtrlSetOnEvent(-1, "Checkbox17Click")
    $Checkbox18 = GUICtrlCreateCheckbox("Checkbox18", 24, 264, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    GUICtrlSetOnEvent(-1, "Checkbox18Click")
    $Checkbox19 = GUICtrlCreateCheckbox("Checkbox19", 24, 280, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    GUICtrlSetOnEvent(-1, "Checkbox19Click")
    $Checkbox20 = GUICtrlCreateCheckbox("Checkbox20", 24, 296, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    GUICtrlSetOnEvent(-1, "Checkbox20Click")
    $Checkbox21 = GUICtrlCreateCheckbox("Checkbox21", 24, 312, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    GUICtrlSetOnEvent(-1, "Checkbox21Click")
    $Checkbox22 = GUICtrlCreateCheckbox("Checkbox22", 24, 328, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    GUICtrlSetOnEvent(-1, "Checkbox22Click")
    $Checkbox23 = GUICtrlCreateCheckbox("Checkbox23", 24, 344, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    GUICtrlSetOnEvent(-1, "Checkbox23Click")
    $Checkbox24 = GUICtrlCreateCheckbox("Checkbox24", 24, 360, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    GUICtrlSetOnEvent(-1, "Checkbox24Click")
    $Checkbox25 = GUICtrlCreateCheckbox("Checkbox25", 24, 376, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    GUICtrlSetOnEvent(-1, "Checkbox25Click")
    $Checkbox26 = GUICtrlCreateCheckbox("Checkbox26", 24, 392, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    GUICtrlSetOnEvent(-1, "Checkbox26Click")
    $Checkbox27 = GUICtrlCreateCheckbox("Checkbox27", 24, 408, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    GUICtrlSetOnEvent(-1, "Checkbox27Click")
    $Checkbox28 = GUICtrlCreateCheckbox("Checkbox28", 24, 424, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    GUICtrlSetOnEvent(-1, "Checkbox28Click")
    $Checkbox29 = GUICtrlCreateCheckbox("Checkbox29", 24, 440, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    GUICtrlSetOnEvent(-1, "Checkbox29Click")
    $Checkbox30 = GUICtrlCreateCheckbox("Checkbox30", 24, 456, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    GUICtrlSetOnEvent(-1, "Checkbox30Click")
    $Checkbox31 = GUICtrlCreateCheckbox("Checkbox31", 24, 472, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    GUICtrlSetOnEvent(-1, "Checkbox31Click")
    GUICtrlCreateGroup("", -99, -99, 1, 1)

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

    GUICtrlCreateGroup("User default", 200, 16, 185, 497)
    GUICtrlSetFont(-1, 14, 400, 0, "Old English Text MT")
    $Checkbox2 = GUICtrlCreateCheckbox("Vlc Media Player", 208, 40, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    GUICtrlSetOnEvent(-1, "Checkbox2Click")
    $Checkbox4 = GUICtrlCreateCheckbox("Xp AntiSpy", 208, 488, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    GUICtrlSetOnEvent(-1, "Checkbox4Click")
    $Checkbox32 = GUICtrlCreateCheckbox("Checkbox32", 208, 56, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    GUICtrlSetOnEvent(-1, "Checkbox32Click")
    $Checkbox33 = GUICtrlCreateCheckbox("Checkbox33", 208, 72, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    GUICtrlSetOnEvent(-1, "Checkbox33Click")
    $Checkbox34 = GUICtrlCreateCheckbox("Checkbox34", 208, 88, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    GUICtrlSetOnEvent(-1, "Checkbox34Click")
    $Checkbox35 = GUICtrlCreateCheckbox("Checkbox35", 208, 104, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    GUICtrlSetOnEvent(-1, "Checkbox35Click")
    $Checkbox36 = GUICtrlCreateCheckbox("Checkbox36", 208, 120, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    GUICtrlSetOnEvent(-1, "Checkbox36Click")
    $Checkbox37 = GUICtrlCreateCheckbox("Checkbox37", 208, 136, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    GUICtrlSetOnEvent(-1, "Checkbox37Click")
    $Checkbox38 = GUICtrlCreateCheckbox("Checkbox38", 208, 152, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    GUICtrlSetOnEvent(-1, "Checkbox38Click")
    $Checkbox39 = GUICtrlCreateCheckbox("Checkbox39", 208, 168, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    GUICtrlSetOnEvent(-1, "Checkbox39Click")
    $Checkbox40 = GUICtrlCreateCheckbox("Checkbox40", 208, 184, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    GUICtrlSetOnEvent(-1, "Checkbox40Click")
    $Checkbox41 = GUICtrlCreateCheckbox("Checkbox41", 208, 200, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    GUICtrlSetOnEvent(-1, "Checkbox41Click")
    $Checkbox42 = GUICtrlCreateCheckbox("Checkbox42", 208, 216, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    GUICtrlSetOnEvent(-1, "Checkbox42Click")
    $Checkbox43 = GUICtrlCreateCheckbox("Checkbox43", 208, 232, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    GUICtrlSetOnEvent(-1, "Checkbox43Click")
    $Checkbox44 = GUICtrlCreateCheckbox("Checkbox44", 208, 248, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    GUICtrlSetOnEvent(-1, "Checkbox44Click")
    $Checkbox45 = GUICtrlCreateCheckbox("Checkbox45", 208, 264, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    GUICtrlSetOnEvent(-1, "Checkbox45Click")
    $Checkbox46 = GUICtrlCreateCheckbox("Checkbox46", 208, 280, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    GUICtrlSetOnEvent(-1, "Checkbox46Click")
    $Checkbox47 = GUICtrlCreateCheckbox("Checkbox47", 208, 296, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    GUICtrlSetOnEvent(-1, "Checkbox47Click")
    $Checkbox48 = GUICtrlCreateCheckbox("Checkbox48", 208, 312, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    GUICtrlSetOnEvent(-1, "Checkbox48Click")
    $Checkbox49 = GUICtrlCreateCheckbox("Checkbox49", 208, 328, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    GUICtrlSetOnEvent(-1, "Checkbox49Click")
    $Checkbox50 = GUICtrlCreateCheckbox("Checkbox50", 208, 344, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    GUICtrlSetOnEvent(-1, "Checkbox50Click")
    $Checkbox51 = GUICtrlCreateCheckbox("Checkbox51", 208, 360, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    GUICtrlSetOnEvent(-1, "Checkbox51Click")
    $Checkbox52 = GUICtrlCreateCheckbox("Checkbox52", 208, 376, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    GUICtrlSetOnEvent(-1, "Checkbox52Click")
    $Checkbox53 = GUICtrlCreateCheckbox("Checkbox53", 208, 392, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    GUICtrlSetOnEvent(-1, "Checkbox53Click")
    $Checkbox54 = GUICtrlCreateCheckbox("Checkbox54", 208, 408, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    GUICtrlSetOnEvent(-1, "Checkbox54Click")
    $Checkbox55 = GUICtrlCreateCheckbox("Checkbox55", 208, 424, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    GUICtrlSetOnEvent(-1, "Checkbox55Click")
    $Checkbox56 = GUICtrlCreateCheckbox("Checkbox56", 208, 440, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    GUICtrlSetOnEvent(-1, "Checkbox56Click")
    $Checkbox57 = GUICtrlCreateCheckbox("Checkbox57", 208, 456, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    GUICtrlSetOnEvent(-1, "Checkbox57Click")
    $Checkbox58 = GUICtrlCreateCheckbox("Checkbox58", 208, 472, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    GUICtrlSetOnEvent(-1, "Checkbox58Click")
    GUICtrlCreateGroup("", -99, -99, 1, 1)

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

    GUICtrlCreateGroup("Portable Apps ", 384, 16, 185, 497)
    GUICtrlSetFont(-1, 14, 400, 0, "Old English Text MT")
    $Checkbox59 = GUICtrlCreateCheckbox("Firefox Portable 4", 392, 40, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    GUICtrlSetOnEvent(-1, "Checkbox59Click")
    $Checkbox60 = GUICtrlCreateCheckbox("VLC Media Player Portable", 392, 56, 163, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    GUICtrlSetOnEvent(-1, "Checkbox60Click")
    $Checkbox61 = GUICtrlCreateCheckbox("TeamViewer 6 Portable", 392, 72, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    GUICtrlSetOnEvent(-1, "Checkbox61Click")
    $Checkbox62 = GUICtrlCreateCheckbox("7-Zip Portable", 392, 88, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    GUICtrlSetOnEvent(-1, "Checkbox62Click")
    $Checkbox63 = GUICtrlCreateCheckbox("OpenOffice Portable", 392, 104, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    GUICtrlSetOnEvent(-1, "Checkbox63Click")
    $Checkbox64 = GUICtrlCreateCheckbox("Thunderbird Portable", 392, 120, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    GUICtrlSetOnEvent(-1, "Checkbox64Click")
    $Checkbox65 = GUICtrlCreateCheckbox("FoxitReader Portable", 392, 136, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    GUICtrlSetOnEvent(-1, "Checkbox65Click")
    $Checkbox66 = GUICtrlCreateCheckbox("FileZilla Portable", 392, 152, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    GUICtrlSetOnEvent(-1, "Checkbox66Click")
    $Checkbox67 = GUICtrlCreateCheckbox("Spybot Portable", 392, 168, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    GUICtrlSetOnEvent(-1, "Checkbox67Click")
    ;$Checkbox68 = GUICtrlCreateCheckbox("Checkbox68", 392, 184, 153, 17)
    ;GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    ;GUICtrlSetOnEvent(-1, "Checkbox68Click")
    ;$Checkbox69 = GUICtrlCreateCheckbox("Checkbox69", 392, 200, 153, 17)
    ;GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    ;GUICtrlSetOnEvent(-1, "Checkbox69Click")
    ;$Checkbox70 = GUICtrlCreateCheckbox("Checkbox70", 392, 216, 153, 17)
    ;GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    ;GUICtrlSetOnEvent(-1, "Checkbox70Click")
    GUICtrlCreateGroup("", -99, -99, 1, 1) ;i GUICtrlCreateGroup("", -99, -99, 1, 1) ;i Gruppe schliessen, hat gefehlt !!

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

    $bnInstall = GUICtrlCreateButton("Install", 392, 480, 83, 22) ;i zu viele Worte für die ButtonBreite
    GUICtrlSetFont(-1, 9, 400, 0, "Myriad Web Pro")
    GUICtrlSetOnEvent(-1, "Button5Click")
    $bnExit = GUICtrlCreateButton("Exit", 480, 480, 75, 22)
    GUICtrlSetFont(-1, 9, 400, 0, "Myriad Web Pro")
    GUICtrlSetOnEvent(-1, "Form1Close") ;i verwechselt mit Button5Click

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

    $UncheckInstalled = 1
    GUISetState(@SW_SHOW)
    #endregion ### END Koda GUI section ###

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

    While 1
    Sleep(100)
    WEnd

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

    Func Button5Click()
    If MsgBox(32 + 4, "Installation", "Soll mit der Installation begonnen werden ?" & @TAB) = 7 Then ConsoleWrite("Abbruch!" & @CRLF)

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

    Sleep(1000)
    If GUICtrlRead($Checkbox1) = 1 Then
    If FileExists(@ProgramFilesDir & "\VLC\vlc.exe") Then
    MsgBox(48, "Fehler", "Programm VLC Media Player ist schon vorhanden." & @CR & _
    "Bitte deinstalliere erst die alte Version!!", 3)
    ElseIf FileExists(@ProgramFilesDir & "\VideoLAN\VLC\vlc.exe") Then
    MsgBox(48, "Fehler", "Programm VLC Media Player ist schon vorhanden." & @CR & _
    "Bitte deinstalliere erst die alte Version!!", 3)
    Else
    MsgBox(1, "Programmauswahl", "!Programm wurde zur Installationsliste hinzugefügt!", 2)
    RunWait(@ScriptDir & "\Software\vlc\vlc.exe")
    MsgBox(1, "Fertig", "Vlc wurde erfolgreich installiert", 2)
    EndIf
    If $UncheckInstalled = 1 Then GUICtrlSetState($Checkbox1, $GUI_UNCHECKED)
    Sleep(1000)
    EndIf

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

    If GUICtrlRead($Checkbox5) = 1 Then
    If FileExists(@ProgramFilesDir & "\unlocker\unlocker.exe") Then
    MsgBox(48, "Fehler", "Programm Unlocker ist schon vorhanden." & @CR & _
    "Bitte deinstalliere erst die alte Version!!", 3)
    Else
    MsgBox(1, "Programmauswahl", "!Programm wurde zur Installationsliste hinzugefügt!", 2)
    RunWait(@ScriptDir & "\Software\unlocker\Unlocker.exe")
    MsgBox(1, "Erfolg", "Unlocker wurde erfolgreich installiert", 2)
    EndIf
    If $UncheckInstalled = 1 Then GUICtrlSetState($Checkbox1, $GUI_UNCHECKED)
    Sleep(1000)
    EndIf

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

    If GUICtrlRead($Checkbox59) = 1 Then
    MsgBox(64, "Ordner erstellen", "Es wird nun ein Desktop Ordner für PortableApps erstellt", 5)
    DirCreate(@DesktopDir & "\PortableApps\FirefoxPortable\")
    Sleep(500)
    DirCopy(@ScriptDir & "\PortableApps\FirefoxPortable", @DesktopDir & "\PortableApps\FirefoxPortable", 1)
    MsgBox(1, "PortableApps", "Programm FirefoxPortable wurde in den PortableApps Ordner integriert", 3)
    EndIf
    If GUICtrlRead($Checkbox60) = 1 Then
    DirCreate(@DesktopDir & "\PortableApps\VLCPortable\")
    Sleep(500)
    DirCopy(@ScriptDir & "\PortableApps\VLCPortable", @DesktopDir & "\PortableApps\VLCPortable", 1)
    MsgBox(1, "PortableApps", "Programm Vlc Media Player Portable wurde in den PortableApps Ordner integriert", 3)
    EndIf

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

    If GUICtrlRead($Checkbox61) = 1 Then
    DirCreate(@DesktopDir & "\PortableApps\TeamViewerPortable\")
    Sleep(500)
    DirCopy(@ScriptDir & "\PortableApps\TeamViewerPortable", @DesktopDir & "\PortableApps\TeamViewerPortable", 1)
    MsgBox(1, "PortableApps", "Programm TeamViewer Portable wurde in den PortableApps Ordner integriert", 3)
    EndIf

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

    If GUICtrlRead($Checkbox62) = 1 Then
    DirCreate(@DesktopDir & "\PortableApps\7-ZipPortable\")
    Sleep(500)
    DirCopy(@ScriptDir & "\PortableApps\7-ZipPortable", @DesktopDir & "\PortableApps\7-ZipPortable", 1)
    MsgBox(1, "PortableApps", "Programm 7-Zip Portable wurde in den PortableApps Ordner integriert", 3)
    EndIf

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

    If GUICtrlRead($Checkbox63) = 1 Then
    DirCreate(@DesktopDir & "\PortableApps\OpenOfficePortable\")
    Sleep(500)
    DirCopy(@ScriptDir & "\PortableApps\OpenOfficePortable", @DesktopDir & "\PortableApps\OpenOfficePortable", 1)
    MsgBox(1, "PortableApps", "Programm OpenOffice Portable wurde in den PortableApps Ordner integriert", 3)
    EndIf

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

    If GUICtrlRead($Checkbox64) = 1 Then
    DirCreate(@DesktopDir & "\PortableApps\ThunderbirdPortable\")
    Sleep(500)
    DirCopy(@ScriptDir & "\PortableApps\ThunderbirdPortable", @DesktopDir & "\PortableApps\ThunderbirdPortable", 1)
    MsgBox(1, "PortableApps", "Programm Thunderbird Portable wurde in den PortableApps Ordner integriert", 3)
    EndIf

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

    If GUICtrlRead($Checkbox65) = 1 Then
    DirCreate(@DesktopDir & "\PortableApps\FoxitReaderPortable\")
    Sleep(500)
    DirCopy(@ScriptDir & "\PortableApps\FoxitReaderPortable", @DesktopDir & "\PortableApps\FoxitReaderPortable", 1)
    MsgBox(1, "PortableApps", "Programm FoxitReader Portable wurde in den PortableApps Ordner integriert", 3)
    EndIf

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

    If GUICtrlRead($Checkbox66) = 1 Then
    DirCreate(@DesktopDir & "\PortableApps\FileZillaPortable\")
    Sleep(500)
    DirCopy(@ScriptDir & "\PortableApps\FileZillaPortable", @DesktopDir & "\PortableApps\FileZillaPortable", 1)
    MsgBox(1, "PortableApps", "Programm FileZilla Portable wurde in den PortableApps Ordner integriert", 3)
    EndIf

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

    If GUICtrlRead($Checkbox67) = 1 Then
    DirCreate(@DesktopDir & "\PortableApps\SpybotPortable\")
    Sleep(500)
    DirCopy(@ScriptDir & "\PortableApps\SpybotPortable", @DesktopDir & "\PortableApps\SpybotPortable", 1)
    MsgBox(1, "PortableApps", "Programm Spybot Portable wurde in den PortableApps Ordner integriert", 3)
    EndIf
    EndFunc ;==>Button5Click

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

    Func Button6Click()
    $Msg = MsgBox(32, "Verlassen", "Wollen Sie den Installer nun verlassen?" & @TAB)
    If $Msg = 7 Then
    ConsoleWrite("Abbruch!" & @CRLF)
    Else
    ; [...]
    EndIf
    EndFunc ;==>Button6Click

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

    Func Form1Close()
    Exit
    EndFunc ;==>Form1Close

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

    #cs
    Func Form1Maximize()
    ;### ???
    EndFunc ;==>Form1Maximize

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

    Func Form1Minimize()
    ;### ???
    EndFunc ;==>Form1Minimize

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

    Func Form1Restore()
    ;### ???
    EndFunc ;==>Form1Restore
    #ce

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

    ; Ende

    [/autoit]

    @ RR04 erst einmal großes Danke für Deine Bemühung. :thumbup:
    Bin schon dabei das Ganze zu verstehen um es dann auch in Zukunft richtig unzusetzen.
    Von Tag zu Tag komme ich mehr Erfahrung

    Ok danke aber ich muss mir erstmal die Addons laden wie z.b. AutoIt3Wrapper :whistling:
    danach mache ich mich dann sofort dran und versuche esmit den Array´s, mal sehen ob ich es rihtig umsetzen kann
    denn erlich gesagt habe ich die Array´s noch net ganz gerafft , aber dass kommt dann auch noch
    Bin ja alter Mann da darf das dann länger dauern :rofl:

    ... vielleicht kannst Du ja hier weiter machen:

    Spoiler anzeigen
    [autoit]


    #region ;**** Directives created by AutoIt3Wrapper_GUI ****
    #AutoIt3Wrapper_icon=DeinIcon.ico ;i#################### DeinIcon.ico #########################
    #AutoIt3Wrapper_outfile=OSI.exe
    #AutoIt3Wrapper_Res_Description=Osiris Software Installer
    #AutoIt3Wrapper_Res_Fileversion=3.1
    #AutoIt3Wrapper_Res_LegalCopyright=© 2011 by Osiris
    #AutoIt3Wrapper_Res_Language=1031
    #AutoIt3Wrapper_Res_Field=AutoIt Version|%AutoItVer%
    #AutoIt3Wrapper_Res_Field=Compiled by|Osiris
    #AutoIt3Wrapper_Res_Field=Original Name|Osiris Software Installer
    #AutoIt3Wrapper_Res_Field=Build|%date%
    #AutoIt3Wrapper_AU3Check_Parameters=-d -w 1 -w 2 -w 3 -w 4 -w 5 -w 6
    #AutoIt3Wrapper_Run_Tidy=y
    #AutoIt3Wrapper_Run_Obfuscator=y
    #Obfuscator_Parameters=/striponly
    #endregion ;**** Directives created by AutoIt3Wrapper_GUI ****
    #region - TimeStamp
    ; 2011-05-12 14:48:17
    #endregion - TimeStamp

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

    #include <GUIConstantsEx.au3>
    #RequireAdmin

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

    ;~ $GUI_EVENT_MINIMIZE —> GUIConstantsEx.au3
    ;~ $GUI_EVENT_MAXIMIZE —> GUIConstantsEx.au3
    ;~ $GUI_EVENT_RESTORE —> GUIConstantsEx.au3
    ;~ $GUI_UNCHECKED —> GUIConstantsEx.au3

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

    Opt("GUIOnEventMode", 1) ;i Eine Gute Wahl -> mehr Macros, leichtere Fenstertechnik

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

    #region ### START Koda GUI section ### Form=
    GUICreate("Software Installer v3.1", 590, 530)
    GUISetBkColor(0x008080)
    GUISetOnEvent($GUI_EVENT_CLOSE, "Form1Close")
    GUISetOnEvent($GUI_EVENT_MINIMIZE, "Form1Minimize")
    GUISetOnEvent($GUI_EVENT_MAXIMIZE, "Form1Maximize")
    GUISetOnEvent($GUI_EVENT_RESTORE, "Form1Restore")

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

    GUICtrlCreateGroup("Silent Install", 16, 16, 185, 500)
    GUICtrlSetFont(-1, 14, 400, 0, "Old English Text MT")
    ;i#### Start Checkboxarray für 25 Checkboxen ##########################################################################
    Global $aLBckb[25] = ["1", "2", "3", "4", "5", "6", "7", "8", "9", "10", _
    "11", "12", "13", "14", "15", "16", "17", "18", "19", "20", _
    "21", "22", "23", "24", "25"] ;i zur Beschriftung der Labels
    ;i a- Array + Label-LB + Checkbox-ckb
    Global $aCkb[25] ;i ArrayVariablen (kl. a am Anfang) erstellen der Controls
    ;i a- Array + Checkbox-ckb
    For $i = 0 To 24 ;i statisch kein Ubound - erstellen von 0 - 24 = 25 Checkboxen
    $aCkb[$i] = GUICtrlCreateCheckbox($aLBckb[$i], 24, 40 + $i * 19, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    ; create 25x Checkbox
    Next
    ;i#### Ende Checkboxarray #############################################################################################
    GUICtrlCreateGroup("", -99, -99, 1, 1) ;i Gruppe schliessen

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

    GUICtrlCreateGroup("User default", 200, 16, 185, 497)
    GUICtrlSetFont(-1, 14, 400, 0, "Old English Text MT")
    ; [...]
    GUICtrlCreateGroup("", -99, -99, 1, 1) ;i Gruppe schliessen

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

    GUICtrlCreateGroup("Portable Apps ", 384, 16, 185, 497)
    GUICtrlSetFont(-1, 14, 400, 0, "Old English Text MT")
    ; [...]
    GUICtrlCreateGroup("", -99, -99, 1, 1) ;i Gruppe schliessen

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

    Global $bnInstall = GUICtrlCreateButton("Install", 392, 480, 83, 22)
    GUICtrlSetFont(-1, 9, 400, 0, "Myriad Web Pro")
    GUICtrlSetOnEvent(-1, "Button5Click")
    Global $bnExit = GUICtrlCreateButton("Exit", 480, 480, 75, 22)
    GUICtrlSetFont(-1, 9, 400, 0, "Myriad Web Pro")
    GUICtrlSetOnEvent(-1, "Form1Close")

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

    ;$UncheckInstalled = 1
    GUISetState(@SW_SHOW)
    #endregion ### END Koda GUI section ###

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

    While 1
    Sleep(100)
    WEnd

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

    Func Button5Click()
    If MsgBox(32 + 4, "Installation", "Soll mit der Installation begonnen werden ?" & @TAB) = 7 Then ConsoleWrite("Abbruch!" & @CRLF)

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

    Sleep(1000)
    #cs ### Variablen stimmen vorerst nicht mehr!!!
    If GUICtrlRead($Checkbox1) = 1 Then
    If FileExists(@ProgramFilesDir & "\VLC\vlc.exe") Then
    MsgBox(48, "Fehler", "Programm VLC Media Player ist schon vorhanden." & @CR & _
    "Bitte deinstalliere erst die alte Version!!", 3)
    ElseIf FileExists(@ProgramFilesDir & "\VideoLAN\VLC\vlc.exe") Then
    MsgBox(48, "Fehler", "Programm VLC Media Player ist schon vorhanden." & @CR & _
    "Bitte deinstalliere erst die alte Version!!", 3)
    Else
    MsgBox(1, "Programmauswahl", "!Programm wurde zur Installationsliste hinzugefügt!", 2)
    RunWait(@ScriptDir & "\Software\vlc\vlc.exe")
    MsgBox(1, "Fertig", "Vlc wurde erfolgreich installiert", 2)
    EndIf
    If $UncheckInstalled = 1 Then GUICtrlSetState($Checkbox1, $GUI_UNCHECKED)
    Sleep(1000)
    EndIf

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

    If GUICtrlRead($Checkbox5) = 1 Then
    If FileExists(@ProgramFilesDir & "\unlocker\unlocker.exe") Then
    MsgBox(48, "Fehler", "Programm Unlocker ist schon vorhanden." & @CR & _
    "Bitte deinstalliere erst die alte Version!!", 3)
    Else
    MsgBox(1, "Programmauswahl", "!Programm wurde zur Installationsliste hinzugefügt!", 2)
    RunWait(@ScriptDir & "\Software\unlocker\Unlocker.exe")
    MsgBox(1, "Erfolg", "Unlocker wurde erfolgreich installiert", 2)
    EndIf
    If $UncheckInstalled = 1 Then GUICtrlSetState($Checkbox1, $GUI_UNCHECKED)
    Sleep(1000)
    EndIf

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

    If GUICtrlRead($Checkbox59) = 1 Then
    MsgBox(64, "Ordner erstellen", "Es wird nun ein Desktop Ordner für PortableApps erstellt", 5)
    DirCreate(@DesktopDir & "\PortableApps\FirefoxPortable\")
    Sleep(500)
    DirCopy(@ScriptDir & "\PortableApps\FirefoxPortable", @DesktopDir & "\PortableApps\FirefoxPortable", 1)
    MsgBox(1, "PortableApps", "Programm FirefoxPortable wurde in den PortableApps Ordner integriert", 3)
    EndIf
    If GUICtrlRead($Checkbox60) = 1 Then
    DirCreate(@DesktopDir & "\PortableApps\VLCPortable\")
    Sleep(500)
    DirCopy(@ScriptDir & "\PortableApps\VLCPortable", @DesktopDir & "\PortableApps\VLCPortable", 1)
    MsgBox(1, "PortableApps", "Programm Vlc Media Player Portable wurde in den PortableApps Ordner integriert", 3)
    EndIf

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

    If GUICtrlRead($Checkbox61) = 1 Then
    DirCreate(@DesktopDir & "\PortableApps\TeamViewerPortable\")
    Sleep(500)
    DirCopy(@ScriptDir & "\PortableApps\TeamViewerPortable", @DesktopDir & "\PortableApps\TeamViewerPortable", 1)
    MsgBox(1, "PortableApps", "Programm TeamViewer Portable wurde in den PortableApps Ordner integriert", 3)
    EndIf

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

    If GUICtrlRead($Checkbox62) = 1 Then
    DirCreate(@DesktopDir & "\PortableApps\7-ZipPortable\")
    Sleep(500)
    DirCopy(@ScriptDir & "\PortableApps\7-ZipPortable", @DesktopDir & "\PortableApps\7-ZipPortable", 1)
    MsgBox(1, "PortableApps", "Programm 7-Zip Portable wurde in den PortableApps Ordner integriert", 3)
    EndIf

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

    If GUICtrlRead($Checkbox63) = 1 Then
    DirCreate(@DesktopDir & "\PortableApps\OpenOfficePortable\")
    Sleep(500)
    DirCopy(@ScriptDir & "\PortableApps\OpenOfficePortable", @DesktopDir & "\PortableApps\OpenOfficePortable", 1)
    MsgBox(1, "PortableApps", "Programm OpenOffice Portable wurde in den PortableApps Ordner integriert", 3)
    EndIf

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

    If GUICtrlRead($Checkbox64) = 1 Then
    DirCreate(@DesktopDir & "\PortableApps\ThunderbirdPortable\")
    Sleep(500)
    DirCopy(@ScriptDir & "\PortableApps\ThunderbirdPortable", @DesktopDir & "\PortableApps\ThunderbirdPortable", 1)
    MsgBox(1, "PortableApps", "Programm Thunderbird Portable wurde in den PortableApps Ordner integriert", 3)
    EndIf

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

    If GUICtrlRead($Checkbox65) = 1 Then
    DirCreate(@DesktopDir & "\PortableApps\FoxitReaderPortable\")
    Sleep(500)
    DirCopy(@ScriptDir & "\PortableApps\FoxitReaderPortable", @DesktopDir & "\PortableApps\FoxitReaderPortable", 1)
    MsgBox(1, "PortableApps", "Programm FoxitReader Portable wurde in den PortableApps Ordner integriert", 3)
    EndIf

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

    If GUICtrlRead($Checkbox66) = 1 Then
    DirCreate(@DesktopDir & "\PortableApps\FileZillaPortable\")
    Sleep(500)
    DirCopy(@ScriptDir & "\PortableApps\FileZillaPortable", @DesktopDir & "\PortableApps\FileZillaPortable", 1)
    MsgBox(1, "PortableApps", "Programm FileZilla Portable wurde in den PortableApps Ordner integriert", 3)
    EndIf

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

    If GUICtrlRead($Checkbox67) = 1 Then
    DirCreate(@DesktopDir & "\PortableApps\SpybotPortable\")
    Sleep(500)
    DirCopy(@ScriptDir & "\PortableApps\SpybotPortable", @DesktopDir & "\PortableApps\SpybotPortable", 1)
    MsgBox(1, "PortableApps", "Programm Spybot Portable wurde in den PortableApps Ordner integriert", 3)
    EndIf
    #ce
    EndFunc ;==>Button5Click

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

    Func Button6Click()
    Local $Msg = MsgBox(32, "Verlassen", "Wollen Sie den Installer nun verlassen?" & @TAB)
    If $Msg = 7 Then
    ConsoleWrite("Abbruch!" & @CRLF)
    Else
    ; [...]
    EndIf
    EndFunc ;==>Button6Click

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

    Func Form1Close()
    Exit
    EndFunc ;==>Form1Close

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

    Func Form1Maximize()
    ; [...]
    EndFunc ;==>Form1Maximize

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

    Func Form1Minimize()
    ; [...]
    EndFunc ;==>Form1Minimize

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

    Func Form1Restore()
    ; [...]
    EndFunc ;==>Form1Restore

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

    ; Ende

    [/autoit]


    ... ;)

    ok Klasse denke jetzt werde ich es umsetzen können, so ist es verständlicher für mich.
    nochmals danke für Dekne Hilfe und guten Tip´s :thumbup: :thumbup:
    melde mich wieder wenn ich weiter gekommen bin, oder iwo hänge :?:
    gruß Osiris

    also ich bin immernoch am lesen mit den array´s also deine hilfe ist schon hilfreich nur
    A) bin ich mir noch nicht sicher wie ich die abfrage mache und
    B) wenn ich die checkboxen ins feld 2 und 3 setze (was ich im mom schon habe) dann muss ich ja für die Felder Neue install Button setzen, da es ja sonst mit er Abfrage nicht hinhaut .
    Ich setze ja in Feld1 25 checkboxen ebenso wie in feld 2 und 3 nur wenn ich For $i = 0 To 24 mache hätte ich ja 3 mal die selbe zuweisung.
    damit kämpfe ich grad, aber wird schon.
    also auch wenn´s noch nicht ganz stimmt kommeich denke ich dank deiner hilfe voran

    Spoiler anzeigen

    #region ;**** Directives created by AutoIt3Wrapper_GUI ****
    #AutoIt3Wrapper_icon=DeinIcon.ico ;i#################### DeinIcon.ico #########################
    #AutoIt3Wrapper_outfile=OSI.exe
    #AutoIt3Wrapper_Res_Description=Osiris Software Installer
    #AutoIt3Wrapper_Res_Fileversion=3.1
    #AutoIt3Wrapper_Res_LegalCopyright=© 2011 by Osiris
    #AutoIt3Wrapper_Res_Language=1031
    #AutoIt3Wrapper_Res_Field=AutoIt Version|%AutoItVer%
    #AutoIt3Wrapper_Res_Field=Compiled by|Osiris
    #AutoIt3Wrapper_Res_Field=Original Name|Osiris Software Installer
    #AutoIt3Wrapper_Res_Field=Build|%date%
    #AutoIt3Wrapper_AU3Check_Parameters=-d -w 1 -w 2 -w 3 -w 4 -w 5 -w 6
    #AutoIt3Wrapper_Run_Tidy=y
    #AutoIt3Wrapper_Run_Obfuscator=y
    #Obfuscator_Parameters=/striponly
    #endregion ;**** Directives created by AutoIt3Wrapper_GUI ****
    #region - TimeStamp
    ; 2011-05-12 13:48:13
    #endregion - TimeStamp

    #include <GUIConstantsEx.au3>
    #RequireAdmin

    ;~ $GUI_EVENT_MINIMIZE —> GUIConstantsEx.au3
    ;~ $GUI_EVENT_MAXIMIZE —> GUIConstantsEx.au3
    ;~ $GUI_EVENT_RESTORE —> GUIConstantsEx.au3
    ;~ $GUI_UNCHECKED —> GUIConstantsEx.au3
    ;~ $WS_GROUP —> WindowsConstants.au3 ;! Wozu ist $WS_GROUP hier nötig?

    Opt("GUIOnEventMode", 1) ;i Eine Gute Wahl -> mehr Macros, leichtere Fenstertechnik

    #region ### START Koda GUI section ### Form=
    GUICreate("Software Installer v3.1", 590, 530)
    GUISetBkColor(0x008080)
    GUISetOnEvent($GUI_EVENT_CLOSE, "Form1Close")
    GUISetOnEvent($GUI_EVENT_MINIMIZE, "Form1Minimize")
    GUISetOnEvent($GUI_EVENT_MAXIMIZE, "Form1Maximize")
    GUISetOnEvent($GUI_EVENT_RESTORE, "Form1Restore")

    GUICtrlCreateGroup("Silent Install", 16, 16, 185, 500)
    GUICtrlSetFont(-1, 14, 400, 0, "Old English Text MT")

    ;i#### Start Checkboxarray ################################################################################################
    Global $aLBckb[25] = ["Vlc Media Player", "2", "3", "4", "5", "6", "7", "8", "9", "10", "11", "12", _
    "13", "14", "15", "16", "17", "18", "19", "20", "21", "22", "23", "24", "25"] ;i zur Beschriftung der Labels
    ;i a- Array + Label-LB + Checkbox-ckb
    Global $aCkb[25] ;i ArrayVariablen (kl. a am Anfang) erstellen der Controls
    ;i a- Array + Checkbox-ckb
    For $i = 0 To 24 ;i statisch kein Ubound - erstellt von 0 - 24 = 25 Checkboxen
    $aCkb[$i] = GUICtrlCreateCheckbox($aLBckb[$i], 24, 40 + $i * 19, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    GUICtrlSetOnEvent(-1, "Checkbox1Click")
    ; create 25x Checkbox
    Next
    ;i#### Ende Checkboxarray ################################################################################################
    GUICtrlCreateGroup("", -99, -99, 1, 1)


    GUICtrlCreateGroup("User default", 200, 16, 185, 500)
    GUICtrlSetFont(-1, 14, 400, 0, "Old English Text MT")
    ; [...]
    ;i#### Start Checkboxarray ################################################################################################
    Global $aLBckb[25] = ["1", "2", "3", "4", "5", "6", "7", "8", "9", "10", "11", "12", _
    "13", "14", "15", "16", "17", "18", "19", "20", "21", "22", "23", "24", "25"] ;i zur Beschriftung der Labels
    ;i a- Array + Label-LB + Checkbox-ckb
    Global $aCkb[25] ;i ArrayVariablen (kl. a am Anfang) erstellen der Controls
    ;i a- Array + Checkbox-ckb
    For $i = 0 To 24 ;i statisch kein Ubound - erstellt von 0 - 24 = 25 Checkboxen
    $aCkb[$i] = GUICtrlCreateCheckbox($aLBckb[$i], 210, 40 + $i * 19, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    GUICtrlSetOnEvent(-1, "Checkbox1Click")
    ; create 25x Checkbox
    Next
    ;i#### Ende Checkboxarray ################################################################################################
    GUICtrlCreateGroup("", -99, -99, 1, 1)


    GUICtrlCreateGroup("Portable Apps ", 384, 16, 185, 500)
    GUICtrlSetFont(-1, 14, 400, 0, "Old English Text MT")
    ; [...]
    ;i#### Start Checkboxarray ################################################################################################
    Global $aLBckb[15] = ["1", "2", "3", "4", "5", "6", "7", "8", "9", "10", "11", "12", _
    "13", "14", "15"] ;i zur Beschriftung der Labels
    ;i a- Array + Label-LB + Checkbox-ckb
    Global $aCkb[15] ;i ArrayVariablen (kl. a am Anfang) erstellen der Controls
    ;i a- Array + Checkbox-ckb
    For $i = 0 To 14 ;i statisch kein Ubound - erstellt von 0 - 24 = 25 Checkboxen
    $aCkb[$i] = GUICtrlCreateCheckbox($aLBckb[$i], 400, 40 + $i * 19, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    GUICtrlSetOnEvent(-1, "Checkbox1Click")
    ; create 25x Checkbox
    Next
    ;i#### Ende Checkboxarray ################################################################################################
    GUICtrlCreateGroup("", -99, -99, 1, 1)


    Global $bnInstall = GUICtrlCreateButton("Install", 392, 480, 83, 22) ;i zu viele Worte für die ButtonBreite
    GUICtrlSetFont(-1, 9, 400, 0, "Myriad Web Pro")
    GUICtrlSetOnEvent(-1, "Button5Click")
    Global $bnExit = GUICtrlCreateButton("Exit", 480, 480, 75, 22)
    GUICtrlSetFont(-1, 9, 400, 0, "Myriad Web Pro")
    GUICtrlSetOnEvent(-1, "Form1Close") ;i verwechselt mit Button5Click

    ;$UncheckInstalled = 1
    GUISetState(@SW_SHOW)
    #endregion ### END Koda GUI section ###

    While 1
    Sleep(100)
    WEnd

    Func Button5Click()
    If MsgBox(32 + 4, "Installation", "Soll mit der Installation begonnen werden ?" & @TAB) = 7 Then ConsoleWrite("Abbruch!" & @CRLF)

    Sleep(1000)


    If GUICtrlRead() = 1 Then
    If FileExists(@ProgramFilesDir & "\VLC\vlc.exe") Then
    MsgBox(48, "Fehler", "Programm VLC Media Player ist schon vorhanden." & @CR & _
    "Bitte deinstalliere erst die alte Version!!", 3)
    ElseIf FileExists(@ProgramFilesDir & "\VideoLAN\VLC\vlc.exe") Then
    MsgBox(48, "Fehler", "Programm VLC Media Player ist schon vorhanden." & @CR & _
    "Bitte deinstalliere erst die alte Version!!", 3)
    Else
    MsgBox(1, "Programmauswahl", "!Programm wurde zur Installationsliste hinzugefügt!", 2)
    RunWait(@ScriptDir & "\Software\vlc\vlc.exe")
    MsgBox(1, "Fertig", "Vlc wurde erfolgreich installiert", 2)
    EndIf
    If $UncheckInstalled = 1 Then GUICtrlSetState($Checkbox1, $GUI_UNCHECKED)
    Sleep(1000)
    EndIf
    #cs ### Variablen stimmen vorerst nicht mehr!!!
    If GUICtrlRead($Checkbox5) = 1 Then
    If FileExists(@ProgramFilesDir & "\unlocker\unlocker.exe") Then
    MsgBox(48, "Fehler", "Programm Unlocker ist schon vorhanden." & @CR & _
    "Bitte deinstalliere erst die alte Version!!", 3)
    Else
    MsgBox(1, "Programmauswahl", "!Programm wurde zur Installationsliste hinzugefügt!", 2)
    RunWait(@ScriptDir & "\Software\unlocker\Unlocker.exe")
    MsgBox(1, "Erfolg", "Unlocker wurde erfolgreich installiert", 2)
    EndIf
    If $UncheckInstalled = 1 Then GUICtrlSetState($Checkbox1, $GUI_UNCHECKED)
    Sleep(1000)
    EndIf

    If GUICtrlRead($Checkbox59) = 1 Then
    MsgBox(64, "Ordner erstellen", "Es wird nun ein Desktop Ordner für PortableApps erstellt", 5)
    DirCreate(@DesktopDir & "\PortableApps\FirefoxPortable\")
    Sleep(500)
    DirCopy(@ScriptDir & "\PortableApps\FirefoxPortable", @DesktopDir & "\PortableApps\FirefoxPortable", 1)
    MsgBox(1, "PortableApps", "Programm FirefoxPortable wurde in den PortableApps Ordner integriert", 3)
    EndIf
    If GUICtrlRead($Checkbox60) = 1 Then
    DirCreate(@DesktopDir & "\PortableApps\VLCPortable\")
    Sleep(500)
    DirCopy(@ScriptDir & "\PortableApps\VLCPortable", @DesktopDir & "\PortableApps\VLCPortable", 1)
    MsgBox(1, "PortableApps", "Programm Vlc Media Player Portable wurde in den PortableApps Ordner integriert", 3)
    EndIf

    If GUICtrlRead($Checkbox61) = 1 Then
    DirCreate(@DesktopDir & "\PortableApps\TeamViewerPortable\")
    Sleep(500)
    DirCopy(@ScriptDir & "\PortableApps\TeamViewerPortable", @DesktopDir & "\PortableApps\TeamViewerPortable", 1)
    MsgBox(1, "PortableApps", "Programm TeamViewer Portable wurde in den PortableApps Ordner integriert", 3)
    EndIf

    If GUICtrlRead($Checkbox62) = 1 Then
    DirCreate(@DesktopDir & "\PortableApps\7-ZipPortable\")
    Sleep(500)
    DirCopy(@ScriptDir & "\PortableApps\7-ZipPortable", @DesktopDir & "\PortableApps\7-ZipPortable", 1)
    MsgBox(1, "PortableApps", "Programm 7-Zip Portable wurde in den PortableApps Ordner integriert", 3)
    EndIf

    If GUICtrlRead($Checkbox63) = 1 Then
    DirCreate(@DesktopDir & "\PortableApps\OpenOfficePortable\")
    Sleep(500)
    DirCopy(@ScriptDir & "\PortableApps\OpenOfficePortable", @DesktopDir & "\PortableApps\OpenOfficePortable", 1)
    MsgBox(1, "PortableApps", "Programm OpenOffice Portable wurde in den PortableApps Ordner integriert", 3)
    EndIf

    If GUICtrlRead($Checkbox64) = 1 Then
    DirCreate(@DesktopDir & "\PortableApps\ThunderbirdPortable\")
    Sleep(500)
    DirCopy(@ScriptDir & "\PortableApps\ThunderbirdPortable", @DesktopDir & "\PortableApps\ThunderbirdPortable", 1)
    MsgBox(1, "PortableApps", "Programm Thunderbird Portable wurde in den PortableApps Ordner integriert", 3)
    EndIf

    If GUICtrlRead($Checkbox65) = 1 Then
    DirCreate(@DesktopDir & "\PortableApps\FoxitReaderPortable\")
    Sleep(500)
    DirCopy(@ScriptDir & "\PortableApps\FoxitReaderPortable", @DesktopDir & "\PortableApps\FoxitReaderPortable", 1)
    MsgBox(1, "PortableApps", "Programm FoxitReader Portable wurde in den PortableApps Ordner integriert", 3)
    EndIf

    If GUICtrlRead($Checkbox66) = 1 Then
    DirCreate(@DesktopDir & "\PortableApps\FileZillaPortable\")
    Sleep(500)
    DirCopy(@ScriptDir & "\PortableApps\FileZillaPortable", @DesktopDir & "\PortableApps\FileZillaPortable", 1)
    MsgBox(1, "PortableApps", "Programm FileZilla Portable wurde in den PortableApps Ordner integriert", 3)
    EndIf

    If GUICtrlRead($Checkbox67) = 1 Then
    DirCreate(@DesktopDir & "\PortableApps\SpybotPortable\")
    Sleep(500)
    DirCopy(@ScriptDir & "\PortableApps\SpybotPortable", @DesktopDir & "\PortableApps\SpybotPortable", 1)
    MsgBox(1, "PortableApps", "Programm Spybot Portable wurde in den PortableApps Ordner integriert", 3)
    EndIf
    #ce
    EndFunc ;==>Button5Click

    Func Button6Click()
    Local $Msg = MsgBox(32, "Verlassen", "Wollen Sie den Installer nun verlassen?" & @TAB)
    If $Msg = 7 Then
    ConsoleWrite("Abbruch!" & @CRLF)
    Else
    ; [...]
    EndIf
    EndFunc ;==>Button6Click

    Func Form1Close()
    Exit
    EndFunc ;==>Form1Close

    #cs
    Func Form1Maximize()
    ;### ???
    EndFunc ;==>Form1Maximize

    Func Form1Minimize()
    ;### ???
    EndFunc ;==>Form1Minimize

    Func Form1Restore()
    ;### ???
    EndFunc ;==>Form1Restore
    #ce

    ; Ende


    Ich kämpfe mich durch :D

    damit weise ich dem array ein prog zu
    $arr[0]="Element 1"


    denke damit führe ich den array aus
    If IsArray($arr) Then
    ; array arbeiten lassen
    EndIf


    Also das mit den Array´s ist mir dann doch zu hoch ich steig nicht dahinter, iwie komm i net aufs zuweisen und auch net aufs abfragen
    ich muss da nen groben denkfehler haben

    2 Mal editiert, zuletzt von osoris (12. Mai 2011 um 16:41)

    hi,
    ich schau es mir mal an, inzwischen kannst Du ja mal das Neue ansehen. Ich habe auch weiter gemacht.
    PS: Benutze bitte den kl. Autoit-Button, dann wird es gleich übersichtlicher. ;)

    Spoiler anzeigen
    [autoit]


    #region ;**** Directives created by AutoIt3Wrapper_GUI ****
    #AutoIt3Wrapper_icon=DeinIcon.ico ;i#################### DeinIcon.ico #########################
    #AutoIt3Wrapper_outfile=OSI.exe
    #AutoIt3Wrapper_Res_Description=Osiris Software Installer
    #AutoIt3Wrapper_Res_Fileversion=3.1
    #AutoIt3Wrapper_Res_LegalCopyright=© 2011 by Osiris
    #AutoIt3Wrapper_Res_Language=1031
    #AutoIt3Wrapper_Res_Field=AutoIt Version|%AutoItVer%
    #AutoIt3Wrapper_Res_Field=Compiled by|Osiris
    #AutoIt3Wrapper_Res_Field=Original Name|Osiris Software Installer
    #AutoIt3Wrapper_Res_Field=Build|%date%
    #AutoIt3Wrapper_AU3Check_Parameters=-d -w 1 -w 2 -w 3 -w 4 -w 5 -w 6
    #AutoIt3Wrapper_Run_Tidy=y
    #AutoIt3Wrapper_Run_Obfuscator=y
    #Obfuscator_Parameters=/striponly
    #endregion ;**** Directives created by AutoIt3Wrapper_GUI ****
    #region - TimeStamp
    ; 2011-05-12 16:35:17
    #endregion - TimeStamp

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

    #include <GUIConstantsEx.au3>
    #RequireAdmin

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

    ;~ $GUI_EVENT_MINIMIZE —> GUIConstantsEx.au3
    ;~ $GUI_EVENT_MAXIMIZE —> GUIConstantsEx.au3
    ;~ $GUI_EVENT_RESTORE —> GUIConstantsEx.au3
    ;~ $GUI_UNCHECKED —> GUIConstantsEx.au3

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

    Opt("GUIOnEventMode", 1) ;i Eine Gute Wahl -> mehr Macros, leichtere Fenstertechnik

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

    #region ### START Koda GUI section ### Form=
    GUICreate("Software Installer v3.1", 590, 530)
    GUISetBkColor(0x008080)
    GUISetOnEvent($GUI_EVENT_CLOSE, "_close")
    GUISetOnEvent($GUI_EVENT_MINIMIZE, "Form1Minimize")
    GUISetOnEvent($GUI_EVENT_MAXIMIZE, "Form1Maximize")
    GUISetOnEvent($GUI_EVENT_RESTORE, "Form1Restore")

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

    GUICtrlCreateGroup("Silent Install", 16, 16, 185, 500)
    GUICtrlSetFont(-1, 14, 400, 0, "Old English Text MT")
    ;i#### Start Checkboxarray für 25 Checkboxen ##########################################################################
    Global $aLBckb[25] = ["1", "2", "3", "4", "5", "6", "7", "8", "9", "10", _
    "11", "12", "13", "14", "15", "16", "17", "18", "19", "20", _
    "21", "22", "23", "24", "25"] ;i zur Beschriftung der Labels
    ;i a- Array + Label-LB + Checkbox-ckb
    Global $aCkb[25] ;i ArrayVariablen (kl. a am Anfang) erstellen der Controls
    ;i a- Array + Checkbox-ckb
    For $i = 0 To 24 ;i statisch kein Ubound - erstellen von 0 - 24 = 25 Checkboxen
    $aCkb[$i] = GUICtrlCreateCheckbox($aLBckb[$i], 24, 40 + $i * 19, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    ; create 25x Checkbox
    Next
    ;i#### Ende Checkboxarray #############################################################################################
    GUICtrlCreateGroup("", -99, -99, 1, 1) ;i Gruppe schliessen

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

    GUICtrlCreateGroup("User default", 200, 16, 185, 497)
    GUICtrlSetFont(-1, 14, 400, 0, "Old English Text MT")
    ; [...]
    GUICtrlCreateGroup("", -99, -99, 1, 1) ;i Gruppe schliessen

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

    GUICtrlCreateGroup("Portable Apps ", 384, 16, 185, 497)
    GUICtrlSetFont(-1, 14, 400, 0, "Old English Text MT")
    ; [...]
    GUICtrlCreateGroup("", -99, -99, 1, 1) ;i Gruppe schliessen

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

    Global $bnInstall = GUICtrlCreateButton("Install", 392, 480, 83, 22)
    GUICtrlSetFont(-1, 9, 400, 0, "Myriad Web Pro")
    GUICtrlSetOnEvent(-1, "_start")
    Global $bnExit = GUICtrlCreateButton("Exit", 480, 480, 75, 22)
    GUICtrlSetFont(-1, 9, 400, 0, "Myriad Web Pro")
    GUICtrlSetOnEvent(-1, "_close")

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

    GUISetState(@SW_SHOW)
    #endregion ### END Koda GUI section ###

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

    While 1
    Sleep(100)
    WEnd

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

    Func _start()
    Local $Msg = MsgBox(32 + 4, "Installation", "Soll mit der Installation begonnen werden ?" & @TAB)
    If $Msg = 7 Then
    ConsoleWrite("Abbruch durch den Nutzer !" & @CRLF)
    Else
    _install()
    EndIf
    EndFunc ;==>_start

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

    Func _install()
    MsgBox(0, "", "Installation ...") ;i zur Prüfung der Funktion, also ein Dummy
    #cs ### Variablen stimmen vorerst nicht mehr!!!
    If GUICtrlRead($Checkbox1) = 1 Then
    If FileExists(@ProgramFilesDir & "\VLC\vlc.exe") Then
    MsgBox(48, "Fehler", "Programm VLC Media Player ist schon vorhanden." & @CR & _
    "Bitte deinstalliere erst die alte Version!!", 3)
    ElseIf FileExists(@ProgramFilesDir & "\VideoLAN\VLC\vlc.exe") Then
    MsgBox(48, "Fehler", "Programm VLC Media Player ist schon vorhanden." & @CR & _
    "Bitte deinstalliere erst die alte Version!!", 3)
    Else
    MsgBox(1, "Programmauswahl", "!Programm wurde zur Installationsliste hinzugefügt!", 2)
    RunWait(@ScriptDir & "\Software\vlc\vlc.exe")
    MsgBox(1, "Fertig", "Vlc wurde erfolgreich installiert", 2)
    EndIf
    If $UncheckInstalled = 1 Then GUICtrlSetState($Checkbox1, $GUI_UNCHECKED)
    Sleep(1000)
    EndIf

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

    If GUICtrlRead($Checkbox5) = 1 Then
    If FileExists(@ProgramFilesDir & "\unlocker\unlocker.exe") Then
    MsgBox(48, "Fehler", "Programm Unlocker ist schon vorhanden." & @CR & _
    "Bitte deinstalliere erst die alte Version!!", 3)
    Else
    MsgBox(1, "Programmauswahl", "!Programm wurde zur Installationsliste hinzugefügt!", 2)
    RunWait(@ScriptDir & "\Software\unlocker\Unlocker.exe")
    MsgBox(1, "Erfolg", "Unlocker wurde erfolgreich installiert", 2)
    EndIf
    If $UncheckInstalled = 1 Then GUICtrlSetState($Checkbox1, $GUI_UNCHECKED)
    Sleep(1000)
    EndIf

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

    If GUICtrlRead($Checkbox59) = 1 Then
    MsgBox(64, "Ordner erstellen", "Es wird nun ein Desktop Ordner für PortableApps erstellt", 5)
    DirCreate(@DesktopDir & "\PortableApps\FirefoxPortable\")
    Sleep(500)
    DirCopy(@ScriptDir & "\PortableApps\FirefoxPortable", @DesktopDir & "\PortableApps\FirefoxPortable", 1)
    MsgBox(1, "PortableApps", "Programm FirefoxPortable wurde in den PortableApps Ordner integriert", 3)
    EndIf
    If GUICtrlRead($Checkbox60) = 1 Then
    DirCreate(@DesktopDir & "\PortableApps\VLCPortable\")
    Sleep(500)
    DirCopy(@ScriptDir & "\PortableApps\VLCPortable", @DesktopDir & "\PortableApps\VLCPortable", 1)
    MsgBox(1, "PortableApps", "Programm Vlc Media Player Portable wurde in den PortableApps Ordner integriert", 3)
    EndIf

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

    If GUICtrlRead($Checkbox61) = 1 Then
    DirCreate(@DesktopDir & "\PortableApps\TeamViewerPortable\")
    Sleep(500)
    DirCopy(@ScriptDir & "\PortableApps\TeamViewerPortable", @DesktopDir & "\PortableApps\TeamViewerPortable", 1)
    MsgBox(1, "PortableApps", "Programm TeamViewer Portable wurde in den PortableApps Ordner integriert", 3)
    EndIf

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

    If GUICtrlRead($Checkbox62) = 1 Then
    DirCreate(@DesktopDir & "\PortableApps\7-ZipPortable\")
    Sleep(500)
    DirCopy(@ScriptDir & "\PortableApps\7-ZipPortable", @DesktopDir & "\PortableApps\7-ZipPortable", 1)
    MsgBox(1, "PortableApps", "Programm 7-Zip Portable wurde in den PortableApps Ordner integriert", 3)
    EndIf

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

    If GUICtrlRead($Checkbox63) = 1 Then
    DirCreate(@DesktopDir & "\PortableApps\OpenOfficePortable\")
    Sleep(500)
    DirCopy(@ScriptDir & "\PortableApps\OpenOfficePortable", @DesktopDir & "\PortableApps\OpenOfficePortable", 1)
    MsgBox(1, "PortableApps", "Programm OpenOffice Portable wurde in den PortableApps Ordner integriert", 3)
    EndIf

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

    If GUICtrlRead($Checkbox64) = 1 Then
    DirCreate(@DesktopDir & "\PortableApps\ThunderbirdPortable\")
    Sleep(500)
    DirCopy(@ScriptDir & "\PortableApps\ThunderbirdPortable", @DesktopDir & "\PortableApps\ThunderbirdPortable", 1)
    MsgBox(1, "PortableApps", "Programm Thunderbird Portable wurde in den PortableApps Ordner integriert", 3)
    EndIf

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

    If GUICtrlRead($Checkbox65) = 1 Then
    DirCreate(@DesktopDir & "\PortableApps\FoxitReaderPortable\")
    Sleep(500)
    DirCopy(@ScriptDir & "\PortableApps\FoxitReaderPortable", @DesktopDir & "\PortableApps\FoxitReaderPortable", 1)
    MsgBox(1, "PortableApps", "Programm FoxitReader Portable wurde in den PortableApps Ordner integriert", 3)
    EndIf

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

    If GUICtrlRead($Checkbox66) = 1 Then
    DirCreate(@DesktopDir & "\PortableApps\FileZillaPortable\")
    Sleep(500)
    DirCopy(@ScriptDir & "\PortableApps\FileZillaPortable", @DesktopDir & "\PortableApps\FileZillaPortable", 1)
    MsgBox(1, "PortableApps", "Programm FileZilla Portable wurde in den PortableApps Ordner integriert", 3)
    EndIf

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

    If GUICtrlRead($Checkbox67) = 1 Then
    DirCreate(@DesktopDir & "\PortableApps\SpybotPortable\")
    Sleep(500)
    DirCopy(@ScriptDir & "\PortableApps\SpybotPortable", @DesktopDir & "\PortableApps\SpybotPortable", 1)
    MsgBox(1, "PortableApps", "Programm Spybot Portable wurde in den PortableApps Ordner integriert", 3)
    EndIf
    #ce
    MsgBox(64, "Installation", "Die Installation ist abgeschlossen !" & @TAB)
    EndFunc ;==>_install

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

    Func _close()
    Exit
    EndFunc ;==>_close

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

    Func Form1Maximize()
    ; [...]
    EndFunc ;==>Form1Maximize

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

    Func Form1Minimize()
    ; [...]
    EndFunc ;==>Form1Minimize

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

    Func Form1Restore()
    ; [...]
    EndFunc ;==>Form1Restore

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

    ; Ende

    [/autoit]

    wow danke ist ja schonmal um einiges besser als meines
    frage welchen kleinen AutoIt Button meinst Du?

    Welcher Button?
    Befor Du Deinen Beitrag eintippst in der Leiste darüber oder Du setzt Deinen Quellcode in

    [autoit]

    [autoit]Quellcode

    [/autoit]

    [/autoit].

    Das Einfügen war schon gut, nur Variablen dürfen nicht doppelt verwendet werden.
    So nun weiter:

    Spoiler anzeigen
    [autoit]


    #region ;**** Directives created by AutoIt3Wrapper_GUI ****
    #AutoIt3Wrapper_icon=DeinIcon.ico ;i#################### DeinIcon.ico #########################
    #AutoIt3Wrapper_outfile=OSI.exe
    #AutoIt3Wrapper_Res_Description=Osiris Software Installer
    #AutoIt3Wrapper_Res_Fileversion=3.1
    #AutoIt3Wrapper_Res_LegalCopyright=© 2011 by Osiris
    #AutoIt3Wrapper_Res_Language=1031
    #AutoIt3Wrapper_Res_Field=AutoIt Version|%AutoItVer%
    #AutoIt3Wrapper_Res_Field=Compiled by|Osiris
    #AutoIt3Wrapper_Res_Field=Original Name|Osiris Software Installer
    #AutoIt3Wrapper_Res_Field=Build|%date%
    #AutoIt3Wrapper_AU3Check_Parameters=-d -w 1 -w 2 -w 3 -w 4 -w 5 -w 6
    #AutoIt3Wrapper_Run_Tidy=y
    #AutoIt3Wrapper_Run_Obfuscator=y
    #Obfuscator_Parameters=/striponly
    #endregion ;**** Directives created by AutoIt3Wrapper_GUI ****
    #region - TimeStamp
    ; 2011-05-12 17:16:15
    #endregion - TimeStamp

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

    #include <GUIConstantsEx.au3>
    #RequireAdmin

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

    ;~ $GUI_EVENT_MINIMIZE —> GUIConstantsEx.au3
    ;~ $GUI_EVENT_MAXIMIZE —> GUIConstantsEx.au3
    ;~ $GUI_EVENT_RESTORE —> GUIConstantsEx.au3
    ;~ $GUI_UNCHECKED —> GUIConstantsEx.au3

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

    Opt("GUIOnEventMode", 1) ;i Eine Gute Wahl -> mehr Macros, leichtere Fenstertechnik

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

    #region ### START Koda GUI section ###
    GUICreate("Software Installer v3.1", 590, 560)
    GUISetBkColor(0x008080)
    GUISetOnEvent($GUI_EVENT_CLOSE, "_close")
    GUISetOnEvent($GUI_EVENT_MINIMIZE, "Form1Minimize")
    GUISetOnEvent($GUI_EVENT_MAXIMIZE, "Form1Maximize")
    GUISetOnEvent($GUI_EVENT_RESTORE, "Form1Restore")

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

    GUICtrlCreateGroup("Silent Install", 16, 16, 185, 500)
    GUICtrlSetFont(-1, 14, 400, 0, "Old English Text MT")
    ;i#### Start Checkboxarray für 25 Checkboxen ##########################################################################
    Global $aLBckbColumn1[25] = ["1", "2", "3", "4", "5", "6", "7", "8", "9", "10", _
    "11", "12", "13", "14", "15", "16", "17", "18", "19", "20", _
    "21", "22", "23", "24", "25"] ;i zur Beschriftung der Labels
    ;i a- Array + Label-LB + Checkbox-ckb
    Global $aCkbColumn1[25] ;i ArrayVariablen (kl. a am Anfang) erstellen der Controls
    ;i a- Array + Checkbox-ckb
    For $i = 0 To 24 ;i statisch kein Ubound - erstellen von 0 - 24 = 25 Checkboxen
    $aCkbColumn1[$i] = GUICtrlCreateCheckbox($aLBckbColumn1[$i], 24, 40 + $i * 19, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    ; create 25x Checkbox
    Next
    ;i#### Ende Checkboxarray #############################################################################################
    GUICtrlCreateGroup("", -99, -99, 1, 1) ;i Gruppe schliessen

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

    GUICtrlCreateGroup("User default", 200, 16, 185, 500)
    GUICtrlSetFont(-1, 14, 400, 0, "Old English Text MT")
    ;i#### Start Checkboxarray für 25 Checkboxen ##########################################################################
    Global $aLBckbColumn2[25] = ["1", "2", "3", "4", "5", "6", "7", "8", "9", "10", _
    "11", "12", "13", "14", "15", "16", "17", "18", "19", "20", _
    "21", "22", "23", "24", "25"] ;i zur Beschriftung der Labels
    ;i a- Array + Label-LB + Checkbox-ckb
    Global $aCkbColumn2[25] ;i ArrayVariablen (kl. a am Anfang) erstellen der Controls
    ;i a- Array + Checkbox-ckb
    For $i = 0 To 24 ;i statisch kein Ubound - erstellen von 0 - 24 = 25 Checkboxen
    $aCkbColumn2[$i] = GUICtrlCreateCheckbox($aLBckbColumn2[$i], 210, 40 + $i * 19, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    ; create 25x Checkbox
    Next
    ;i#### Ende Checkboxarray #############################################################################################
    GUICtrlCreateGroup("", -99, -99, 1, 1) ;i Gruppe schliessen

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

    GUICtrlCreateGroup("Portable Apps ", 384, 16, 185, 500)
    GUICtrlSetFont(-1, 14, 400, 0, "Old English Text MT")
    ;i#### Start Checkboxarray für 25 Checkboxen ##########################################################################
    Global $aLBckbColumn3[25] = ["1", "2", "3", "4", "5", "6", "7", "8", "9", "10", _
    "11", "12", "13", "14", "15", "16", "17", "18", "19", "20", _
    "21", "22", "23", "24", "25"] ;i zur Beschriftung der Labels
    ;i a- Array + Label-LB + Checkbox-ckb
    Global $aCkbColumn3[25] ;i ArrayVariablen (kl. a am Anfang) erstellen der Controls
    ;i a- Array + Checkbox-ckb
    For $i = 0 To 24 ;i statisch kein Ubound - erstellen von 0 - 24 = 25 Checkboxen
    $aCkbColumn3[$i] = GUICtrlCreateCheckbox($aLBckbColumn3[$i], 400, 40 + $i * 19, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    ; create 25x Checkbox
    Next
    ;i#### Ende Checkboxarray #############################################################################################
    GUICtrlCreateGroup("", -99, -99, 1, 1) ;i Gruppe schliessen

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

    Global $bnInstall = GUICtrlCreateButton("Install", 392, 526, 83, 22)
    GUICtrlSetFont(-1, 9, 400, 0, "Myriad Web Pro")
    GUICtrlSetOnEvent(-1, "_start")
    Global $bnExit = GUICtrlCreateButton("Exit", 480, 526, 75, 22)
    GUICtrlSetFont(-1, 9, 400, 0, "Myriad Web Pro")
    GUICtrlSetOnEvent(-1, "_close")

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

    GUISetState(@SW_SHOW)
    #endregion ### END Koda GUI section ###

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

    While 1
    Sleep(100)
    WEnd

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

    Func _start()
    Local $Msg = MsgBox(32 + 4, "Installation", "Soll mit der Installation begonnen werden ?" & @TAB)
    If $Msg = 7 Then
    ConsoleWrite("Abbruch durch den Nutzer !" & @CRLF)
    Else
    _install()
    EndIf
    EndFunc ;==>_start

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

    Func _install()
    MsgBox(0, "", "Installation ...") ;i zur Prüfung der Funktion, also ein Dummy
    #cs ### Variablen stimmen vorerst nicht mehr!!!
    If GUICtrlRead($Checkbox1) = 1 Then
    If FileExists(@ProgramFilesDir & "\VLC\vlc.exe") Then
    MsgBox(48, "Fehler", "Programm VLC Media Player ist schon vorhanden." & @CR & _
    "Bitte deinstalliere erst die alte Version!!", 3)
    ElseIf FileExists(@ProgramFilesDir & "\VideoLAN\VLC\vlc.exe") Then
    MsgBox(48, "Fehler", "Programm VLC Media Player ist schon vorhanden." & @CR & _
    "Bitte deinstalliere erst die alte Version!!", 3)
    Else
    MsgBox(1, "Programmauswahl", "!Programm wurde zur Installationsliste hinzugefügt!", 2)
    RunWait(@ScriptDir & "\Software\vlc\vlc.exe")
    MsgBox(1, "Fertig", "Vlc wurde erfolgreich installiert", 2)
    EndIf
    If $UncheckInstalled = 1 Then GUICtrlSetState($Checkbox1, $GUI_UNCHECKED)
    Sleep(1000)
    EndIf

    If GUICtrlRead($Checkbox5) = 1 Then
    If FileExists(@ProgramFilesDir & "\unlocker\unlocker.exe") Then
    MsgBox(48, "Fehler", "Programm Unlocker ist schon vorhanden." & @CR & _
    "Bitte deinstalliere erst die alte Version!!", 3)
    Else
    MsgBox(1, "Programmauswahl", "!Programm wurde zur Installationsliste hinzugefügt!", 2)
    RunWait(@ScriptDir & "\Software\unlocker\Unlocker.exe")
    MsgBox(1, "Erfolg", "Unlocker wurde erfolgreich installiert", 2)
    EndIf
    If $UncheckInstalled = 1 Then GUICtrlSetState($Checkbox1, $GUI_UNCHECKED)
    Sleep(1000)
    EndIf

    If GUICtrlRead($Checkbox59) = 1 Then
    MsgBox(64, "Ordner erstellen", "Es wird nun ein Desktop Ordner für PortableApps erstellt", 5)
    DirCreate(@DesktopDir & "\PortableApps\FirefoxPortable\")
    Sleep(500)
    DirCopy(@ScriptDir & "\PortableApps\FirefoxPortable", @DesktopDir & "\PortableApps\FirefoxPortable", 1)
    MsgBox(1, "PortableApps", "Programm FirefoxPortable wurde in den PortableApps Ordner integriert", 3)
    EndIf
    If GUICtrlRead($Checkbox60) = 1 Then
    DirCreate(@DesktopDir & "\PortableApps\VLCPortable\")
    Sleep(500)
    DirCopy(@ScriptDir & "\PortableApps\VLCPortable", @DesktopDir & "\PortableApps\VLCPortable", 1)
    MsgBox(1, "PortableApps", "Programm Vlc Media Player Portable wurde in den PortableApps Ordner integriert", 3)
    EndIf

    If GUICtrlRead($Checkbox61) = 1 Then
    DirCreate(@DesktopDir & "\PortableApps\TeamViewerPortable\")
    Sleep(500)
    DirCopy(@ScriptDir & "\PortableApps\TeamViewerPortable", @DesktopDir & "\PortableApps\TeamViewerPortable", 1)
    MsgBox(1, "PortableApps", "Programm TeamViewer Portable wurde in den PortableApps Ordner integriert", 3)
    EndIf

    If GUICtrlRead($Checkbox62) = 1 Then
    DirCreate(@DesktopDir & "\PortableApps\7-ZipPortable\")
    Sleep(500)
    DirCopy(@ScriptDir & "\PortableApps\7-ZipPortable", @DesktopDir & "\PortableApps\7-ZipPortable", 1)
    MsgBox(1, "PortableApps", "Programm 7-Zip Portable wurde in den PortableApps Ordner integriert", 3)
    EndIf

    If GUICtrlRead($Checkbox63) = 1 Then
    DirCreate(@DesktopDir & "\PortableApps\OpenOfficePortable\")
    Sleep(500)
    DirCopy(@ScriptDir & "\PortableApps\OpenOfficePortable", @DesktopDir & "\PortableApps\OpenOfficePortable", 1)
    MsgBox(1, "PortableApps", "Programm OpenOffice Portable wurde in den PortableApps Ordner integriert", 3)
    EndIf

    If GUICtrlRead($Checkbox64) = 1 Then
    DirCreate(@DesktopDir & "\PortableApps\ThunderbirdPortable\")
    Sleep(500)
    DirCopy(@ScriptDir & "\PortableApps\ThunderbirdPortable", @DesktopDir & "\PortableApps\ThunderbirdPortable", 1)
    MsgBox(1, "PortableApps", "Programm Thunderbird Portable wurde in den PortableApps Ordner integriert", 3)
    EndIf

    If GUICtrlRead($Checkbox65) = 1 Then
    DirCreate(@DesktopDir & "\PortableApps\FoxitReaderPortable\")
    Sleep(500)
    DirCopy(@ScriptDir & "\PortableApps\FoxitReaderPortable", @DesktopDir & "\PortableApps\FoxitReaderPortable", 1)
    MsgBox(1, "PortableApps", "Programm FoxitReader Portable wurde in den PortableApps Ordner integriert", 3)
    EndIf

    If GUICtrlRead($Checkbox66) = 1 Then
    DirCreate(@DesktopDir & "\PortableApps\FileZillaPortable\")
    Sleep(500)
    DirCopy(@ScriptDir & "\PortableApps\FileZillaPortable", @DesktopDir & "\PortableApps\FileZillaPortable", 1)
    MsgBox(1, "PortableApps", "Programm FileZilla Portable wurde in den PortableApps Ordner integriert", 3)
    EndIf

    If GUICtrlRead($Checkbox67) = 1 Then
    DirCreate(@DesktopDir & "\PortableApps\SpybotPortable\")
    Sleep(500)
    DirCopy(@ScriptDir & "\PortableApps\SpybotPortable", @DesktopDir & "\PortableApps\SpybotPortable", 1)
    MsgBox(1, "PortableApps", "Programm Spybot Portable wurde in den PortableApps Ordner integriert", 3)
    EndIf
    #ce
    MsgBox(64, "Installation", "Die Installation ist abgeschlossen !" & @TAB)
    EndFunc ;==>_install

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

    Func _close()
    Exit
    EndFunc ;==>_close

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

    Func Form1Maximize()
    ; [...]
    EndFunc ;==>Form1Maximize

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

    Func Form1Minimize()
    ; [...]
    EndFunc ;==>Form1Minimize

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

    Func Form1Restore()
    ; [...]
    EndFunc ;==>Form1Restore

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

    ; Ende

    [/autoit]

    ok werde ich mir merken
    mit dem Button

    Ah ok wegen der Array´s in den 3 Columnem hab den Unterschied zu meinem gesehn , wenn man es mal weiss dann is es logisch

    das habe ich am anfang leich gemerkt dann findet man nix mehr bzw nur noch sehr schwer
    das mit den $var leuchtet ja soweit alles ein

    Meine erste SoftwareInstallation:

    Spoiler anzeigen
    [autoit]


    #region ;**** Directives created by AutoIt3Wrapper_GUI ****
    #AutoIt3Wrapper_icon=DeinIcon.ico ;i#################### DeinIcon.ico #########################
    #AutoIt3Wrapper_outfile=OSI.exe
    #AutoIt3Wrapper_Res_Description=Osiris Software Installer
    #AutoIt3Wrapper_Res_Fileversion=3.1
    #AutoIt3Wrapper_Res_LegalCopyright=© 2011 by Osiris
    #AutoIt3Wrapper_Res_Language=1031
    #AutoIt3Wrapper_Res_Field=AutoIt Version|%AutoItVer%
    #AutoIt3Wrapper_Res_Field=Compiled by|Osiris
    #AutoIt3Wrapper_Res_Field=Original Name|Osiris Software Installer
    #AutoIt3Wrapper_Res_Field=Build|%date%
    #AutoIt3Wrapper_AU3Check_Parameters=-d -w 1 -w 2 -w 3 -w 4 -w 5 -w 6
    #AutoIt3Wrapper_Run_Tidy=y
    #AutoIt3Wrapper_Run_Obfuscator=y
    #Obfuscator_Parameters=/striponly
    #endregion ;**** Directives created by AutoIt3Wrapper_GUI ****
    #region - TimeStamp
    ; 2011-05-12 18:03:03
    #endregion - TimeStamp

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

    #include <GUIConstantsEx.au3>
    #RequireAdmin

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

    ;~ $GUI_EVENT_MINIMIZE —> GUIConstantsEx.au3
    ;~ $GUI_EVENT_MAXIMIZE —> GUIConstantsEx.au3
    ;~ $GUI_EVENT_RESTORE —> GUIConstantsEx.au3
    ;~ $GUI_UNCHECKED —> GUIConstantsEx.au3

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

    Opt("GUIOnEventMode", 1) ;i Eine Gute Wahl -> mehr Macros, leichtere Fenstertechnik

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

    #region ### START Koda GUI section ###
    GUICreate("Software Installer v3.1", 590, 560)
    GUISetBkColor(0x008080)
    GUISetOnEvent($GUI_EVENT_CLOSE, "_close")
    GUISetOnEvent($GUI_EVENT_MINIMIZE, "Form1Minimize")
    GUISetOnEvent($GUI_EVENT_MAXIMIZE, "Form1Maximize")
    GUISetOnEvent($GUI_EVENT_RESTORE, "Form1Restore")

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

    GUICtrlCreateGroup("Silent Install", 16, 16, 185, 500)
    GUICtrlSetFont(-1, 14, 400, 0, "Old English Text MT")
    ;i#### Start Checkboxarray für 25 Checkboxen ##########################################################################
    Global $aLBckbColumn1[25] = ["V L C", "2", "3", "4", "5", "6", "7", "8", "9", "10", _
    "11", "12", "13", "14", "15", "16", "17", "18", "19", "20", _
    "21", "22", "23", "24", "25"] ;i zur Beschriftung der Labels
    ;i a- Array + Label-LB + Checkbox-ckb
    Global $aCkbColumn1[25] ;i ArrayVariablen (kl. a am Anfang) erstellen der Controls
    ;i a- Array + Checkbox-ckb
    For $i = 0 To 24 ;i statisch kein Ubound - erstellen von 0 - 24 = 25 Checkboxen
    $aCkbColumn1[$i] = GUICtrlCreateCheckbox($aLBckbColumn1[$i], 24, 40 + $i * 19, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    ; create 25x Checkbox
    Next
    ;i#### Ende Checkboxarray #############################################################################################
    GUICtrlCreateGroup("", -99, -99, 1, 1) ;i Gruppe schliessen

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

    GUICtrlCreateGroup("User default", 200, 16, 185, 500)
    GUICtrlSetFont(-1, 14, 400, 0, "Old English Text MT")
    ;i#### Start Checkboxarray für 25 Checkboxen ##########################################################################
    Global $aLBckbColumn2[25] = ["1", "2", "3", "4", "5", "6", "7", "8", "9", "10", _
    "11", "12", "13", "14", "15", "16", "17", "18", "19", "20", _
    "21", "22", "23", "24", "25"] ;i zur Beschriftung der Labels
    ;i a- Array + Label-LB + Checkbox-ckb
    Global $aCkbColumn2[25] ;i ArrayVariablen (kl. a am Anfang) erstellen der Controls
    ;i a- Array + Checkbox-ckb
    For $i = 0 To 24 ;i statisch kein Ubound - erstellen von 0 - 24 = 25 Checkboxen
    $aCkbColumn2[$i] = GUICtrlCreateCheckbox($aLBckbColumn2[$i], 210, 40 + $i * 19, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    ; create 25x Checkbox
    Next
    ;i#### Ende Checkboxarray #############################################################################################
    GUICtrlCreateGroup("", -99, -99, 1, 1) ;i Gruppe schliessen

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

    GUICtrlCreateGroup("Portable Apps ", 384, 16, 185, 500)
    GUICtrlSetFont(-1, 14, 400, 0, "Old English Text MT")
    ;i#### Start Checkboxarray für 25 Checkboxen ##########################################################################
    Global $aLBckbColumn3[25] = ["1", "2", "3", "4", "5", "6", "7", "8", "9", "10", _
    "11", "12", "13", "14", "15", "16", "17", "18", "19", "20", _
    "21", "22", "23", "24", "25"] ;i zur Beschriftung der Labels
    ;i a- Array + Label-LB + Checkbox-ckb
    Global $aCkbColumn3[25] ;i ArrayVariablen (kl. a am Anfang) erstellen der Controls
    ;i a- Array + Checkbox-ckb
    For $i = 0 To 24 ;i statisch kein Ubound - erstellen von 0 - 24 = 25 Checkboxen
    $aCkbColumn3[$i] = GUICtrlCreateCheckbox($aLBckbColumn3[$i], 400, 40 + $i * 19, 153, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    ; create 25x Checkbox
    Next
    ;i#### Ende Checkboxarray #############################################################################################
    GUICtrlCreateGroup("", -99, -99, 1, 1) ;i Gruppe schliessen

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

    Global $bnInstall = GUICtrlCreateButton("Install", 392, 526, 83, 22)
    GUICtrlSetFont(-1, 9, 400, 0, "Myriad Web Pro")
    GUICtrlSetOnEvent(-1, "_start")
    Global $bnExit = GUICtrlCreateButton("Exit", 480, 526, 75, 22)
    GUICtrlSetFont(-1, 9, 400, 0, "Myriad Web Pro")
    GUICtrlSetOnEvent(-1, "_close")

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

    GUISetState(@SW_SHOW)
    #endregion ### END Koda GUI section ###

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

    While 1
    Sleep(100)
    WEnd

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

    Func _start()
    Local $Msg = MsgBox(32 + 4, "Installation", "Soll mit der Installation begonnen werden ?" & @TAB)
    If $Msg = 7 Then
    ConsoleWrite("Abbruch durch den Nutzer !" & @CRLF)
    Else
    _install()
    EndIf
    EndFunc ;==>_start

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

    Func _install()
    ;i MsgBox(0, "", "Installation ...") ;i zur Prüfung der Funktion, also ein Dummy
    _softwareInstall_01()
    MsgBox(64, "Installation", "Die Installation ist abgeschlossen !" & @TAB) ;i Erfolgsmeldung!
    Exit ;i Beenden
    EndFunc ;==>_install

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

    Func _softwareInstall_01()
    If BitAND(GUICtrlRead($aCkbColumn1[0]), $GUI_CHECKED) = $GUI_CHECKED Then
    MsgBox(1, "Programm", "Programm wird installiert !", 2)
    RunWait(@ScriptDir & "\Software\vlc\vlc.exe")
    EndIf
    EndFunc ;==>_softwareInstall_01

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

    Func _close()
    Exit
    EndFunc ;==>_close

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

    Func Form1Maximize()
    ; [...]
    EndFunc ;==>Form1Maximize

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

    Func Form1Minimize()
    ; [...]
    EndFunc ;==>Form1Minimize

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

    Func Form1Restore()
    ; [...]
    EndFunc ;==>Form1Restore

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

    ; Ende

    [/autoit]