Benötige hilfe bei checked (checkboxen)

  • kann mir bitte einer helfen warum er zwar in ie func geht aber die checkboxen nicht auf checked setzt?
    also der label als button funzt er geht auch bis in zeile 171

    Spoiler anzeigen


    #RequireAdmin
    #Region ;**** Directives created by AutoIt3Wrapper_GUI ****
    #AutoIt3Wrapper_Icon=osiris.ico
    #AutoIt3Wrapper_Outfile=OSIRISv2.exe
    #AutoIt3Wrapper_Compression=4
    #AutoIt3Wrapper_UseX64=n
    #AutoIt3Wrapper_Res_Comment=
    #AutoIt3Wrapper_Res_Description=Osiris Software Installer
    #AutoIt3Wrapper_Res_Fileversion=2.1.0.3
    #AutoIt3Wrapper_Res_FileVersion_AutoIncrement=y
    #AutoIt3Wrapper_Res_LegalCopyright=© 2011 by Osiris
    #AutoIt3Wrapper_Res_SaveSource=y
    #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_Res_File_Add=
    #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 ****
    #include <ButtonConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <StaticConstants.au3>
    #include <TabConstants.au3>
    #include <WindowsConstants.au3>
    #include <Constants.au3>
    Opt('MustDeclareVars', 1)
    Opt("GUIOnEventMode", 1) ;i Eine Gute Wahl -> mehr Macros, leichtere Fenstertechnik
    If Not FileExists(@ScriptDir & "\8-3.jpg") Then FileInstall('8-3.jpg', @ScriptDir & "\8-3.jpg", 1)
    #Region ### START Koda GUI section ### Form=
    GUICreate("Software Installer", 775, 570, -1, -1, -1, BitOR($WS_EX_TRANSPARENT, $WS_EX_WINDOWEDGE))
    GUISetState(@SW_SHOW)

    GUISetOnEvent($GUI_EVENT_CLOSE, "_ende")
    GUISetBkColor(0x808080)
    GUICtrlCreateTab(-1, -1, 780, 580, BitOR($TCS_BUTTONS, $WS_BORDER))
    GUICtrlSetResizing(-1, $GUI_DOCKWIDTH + $GUI_DOCKHEIGHT)
    Global $bnInstall = GUICtrlCreateLabel("Install", 620, 5, 75, 22)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    GUICtrlSetBkColor(-1, $GUI_BKCOLOR_TRANSPARENT)
    GUICtrlSetOnEvent(-1, "_start")
    Global $bnExit = GUICtrlCreateLabel("Exit", 700, 5, 75, 22)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    GUICtrlSetBkColor(-1, $GUI_BKCOLOR_TRANSPARENT)
    GUICtrlSetOnEvent(-1, "_ende")
    GUICtrlCreateTabItem("64 Bit Programme")
    GUICtrlCreatePic(@ScriptDir & "\8-3.jpg", 7, 31, 756, 528)
    GUICtrlSetState(-1, $GUI_DISABLE)
    GUICtrlCreateLabel("Select all", 500, 10, 75, 22, -1)
    GUICtrlSetOnEvent(-1, "_allx64")
    GUISetState(@SW_SHOW)

    ;i #### Start Checkboxarray für 25 Checkboxen ###
    Global $aLBckbColumn1[10] = ["7-Zip", "AIO runtimes", "Paragon Backup", "GIMP 268", "SpeedCommander", "Teamspeak 3", "UltraDefrag 4.4", "UltraVNC", "VirtualDub", _
    "Winrar 4"] ;i zur Beschriftung der ;i a- Array + Label-LB + Checkbox-ckb
    Global $aCkbColumn1[10], $aLBColumn1[25] ;i ArrayVariablen (kl. a am Anfang) erstellen der Controls
    ;i a- Array + Checkbox-ckb
    For $i = 0 To 9 ;i statisch kein Ubound - erstellen von 0 - 24 = 25 Checkboxen
    $aCkbColumn1[$i] = GUICtrlCreateCheckbox($aLBckbColumn1[$i], 178, 80 + $i * 19, 13, 13)
    $aLBColumn1[$i] = GUICtrlCreateLabel($aLBckbColumn1[$i], 200, 80 + $i * 19, 120, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    GUICtrlSetColor(-1, 0xffffff)
    GUICtrlSetBkColor(-1, $GUI_BKCOLOR_TRANSPARENT)
    Next
    GUICtrlCreateTabItem("x86 Programme")
    GUICtrlCreatePic(@ScriptDir & "\8-3.jpg", 7, 31, 756, 528)
    GUICtrlSetState(-1, $GUI_DISABLE)
    ;i #### Start Checkboxarray für 25 Checkboxen ###
    Global $aLBckbColumn2[21] = ["7-Zip", "Audiograbber 1.83", "CC_Cleaner", "CloneDVD2", "Damn_NFO_Viewer", "Daemon_Tools_Lite", "DVDShrink 3.2", "FileZilla 3.5", "Firefox 3.6.17", "Firefox 4.0", _
    "Fraps 302", "HighJackThis", "ImgBurn 2.5.5", "K_Lite_Codec_Pack 710", "MalewareByres", "OpenOffice 3.3.0", "SpyBot S&D", "TeamSpeak 3", "TeamViewer 6", "Thunderbirdn3.1.1", _
    "TrueCrypt 7.0"] ;i zur Beschriftung der Labels
    ;i a- Array + Label-LB + Checkbox-ckb
    Global $aCkbColumn2[21], $aLBColumn2[25] ;i ArrayVariablen (kl. a am Anfang) erstellen der Controls
    ;i a- Array + Checkbox-ckb
    For $i = 0 To 20 ;i statisch kein Ubound - erstellen von 0 - 24 = 25 Checkboxen
    $aCkbColumn2[$i] = GUICtrlCreateCheckbox($aLBckbColumn2[$i], 178, 80 + $i * 19, 13, 13)
    $aLBColumn2[$i] = GUICtrlCreateLabel($aLBckbColumn2[$i], 200, 80 + $i * 19, 120, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    GUICtrlSetColor(-1, 0xffffff)
    GUICtrlSetBkColor(-1, $GUI_BKCOLOR_TRANSPARENT)
    Next
    Global $aLBckbColumn3[10] = ["TeamSpeak 2", "Tsunami_Filter_Pack", "UltraDefrag 4.4.0", "UltraVNC", "Unlocker", "VirtualCloneDrive", "VLC Media Player", "Winamp 561", "Winrar 4", "Xvid Video Codec"] ;i zur Beschriftung der Labels
    ;i a- Array + Label-LB + Checkbox-ckb
    Global $aCkbColumn3[10], $aLBColumn3[25] ;i ArrayVariablen (kl. a am Anfang) erstellen der Controls
    ;i a- Array + Checkbox-ckb
    For $i = 0 To 9 ;i statisch kein Ubound - erstellen von 0 - 24 = 25 Checkboxen
    $aCkbColumn3[$i] = GUICtrlCreateCheckbox($aLBckbColumn3[$i], 398, 80 + $i * 19, 13, 13)
    $aLBColumn3[$i] = GUICtrlCreateLabel($aLBckbColumn3[$i], 420, 80 + $i * 19, 120, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    GUICtrlSetColor(-1, 0xffffff)
    GUICtrlSetBkColor(-1, $GUI_BKCOLOR_TRANSPARENT)
    Next
    GUICtrlCreateTabItem("PortableApps")
    GUICtrlCreatePic(@ScriptDir & "\8-3.jpg", 7, 31, 756, 528)
    GUICtrlSetState(-1, $GUI_DISABLE)
    ;i #### Start Checkboxarray für 25 Checkboxen ###
    Global $aLBckbColumn4[18] = ["7-Zip", "ClamWin", "CoolPlayer", "DVDStyler", "Filezilla", "Firefox3", "FoxitReader", "Gimp", "KeePass", "OpenOffice", _
    "Pidgin", "PNotes", "SpyBot S&D", "Sumatra", "SunBird", "TeamViewer", "Thunderbird", "VLC Mediaplayer"] ;i zur Beschriftung der Labels
    ;i a- Array + Label-LB + Checkbox-ckb
    Global $aCkbColumn4[18], $aLBColumn4[25] ;i ArrayVariablen (kl. a am Anfang) erstellen der Controls
    ;i a- Array + Checkbox-ckb
    For $i = 0 To 17 ;i statisch kein Ubound - erstellen von 0 - 24 = 25 Checkboxen
    $aCkbColumn4[$i] = GUICtrlCreateCheckbox($aLBckbColumn4[$i], 178, 80 + $i * 19, 13, 13)
    $aLBColumn4[$i] = GUICtrlCreateLabel($aLBckbColumn4[$i], 200, 80 + $i * 19, 120, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    GUICtrlSetColor(-1, 0xffffff)
    GUICtrlSetBkColor(-1, $GUI_BKCOLOR_TRANSPARENT)
    Next
    GUICtrlCreateTabItem("SilentApps")
    GUICtrlCreatePic(@ScriptDir & "\8-3.jpg", 7, 31, 756, 528)
    GUICtrlSetState(-1, $GUI_DISABLE)
    ;i #### Start Checkboxarray für 25 Checkboxen ###
    Global $aLBckbColumn5[22] = ["7-Zip", "CC Cleaner", "DVD Shrink", "Foxit PDF Reader", "ICQ 7.2", "ImgBurn", "IrfanView", "MozillaBackup", "Office Xp Pro.", "OpenOffice", _
    "Pidgin", "Spybot", "TeamViewer 5", "TMPGEnc_Plus_25", "TMPGEnc_XPress", "TrueCrypt7", "Unlocker", "VirtualDub", "VLC Media Player", "Winamp5", "Wise Disk Cleaner", _
    "Wise Registry Cleaner"] ;i zur Beschriftung der Labels
    ;i a- Array + Label-LB + Checkbox-ckb
    Global $aCkbColumn5[22], $aLBColumn5[25] ;i ArrayVariablen (kl. a am Anfang) erstellen der Controls
    ;i a- Array + Checkbox-ckb
    For $i = 0 To 21 ;i statisch kein Ubound - erstellen von 0 - 24 = 25 Checkboxen
    $aCkbColumn5[$i] = GUICtrlCreateCheckbox($aLBckbColumn5[$i], 178, 80 + $i * 19, 13, 13)
    $aLBColumn5[$i] = GUICtrlCreateLabel($aLBckbColumn5[$i], 200, 80 + $i * 19, 120, 17)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    GUICtrlSetColor(-1, 0xffffff)
    GUICtrlSetBkColor(-1, $GUI_BKCOLOR_TRANSPARENT)
    Next
    GUICtrlCreateTabItem("About")
    GUICtrlCreatePic(@ScriptDir & "\infos.jpg", 7, 31, 756, 528)
    GUICtrlCreateTabItem("")
    GUICtrlSetBkColor(-1, 0xB4B4B4)
    GUISetState(@SW_SHOW)

    #EndRegion ### END Koda GUI section ###
    Global $nMsg
    Global $Msg
    Global $count
    Global $auswahl
    Global $x64
    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
    Func _install()
    _SoftwareInstall_64bit_Programme()
    _SoftwareInstall_x86_Programme1()
    _SoftwareInstall_portabel()
    _SoftwareInstall_silent()

    #Region --- CodeWizard generated code Start ---
    ;MsgBox features: Title=Yes, Text=Yes, Buttons=Yes, No, and Cancel, Icon=None
    If Not IsDeclared("iMsgBoxAnswer") Then Local $iMsgBoxAnswer
    $iMsgBoxAnswer = MsgBox(3, "OsirisSoftwareInstaller", "Installation ist abgeschlossen" & @CRLF & "Wollen Sie neustarten?")
    Select
    Case $iMsgBoxAnswer = 6 ;Yes
    Shutdown(6)
    Case $iMsgBoxAnswer = 7 ;No
    Exit
    Case $iMsgBoxAnswer = 2 ;Cancel
    GUICtrlSetState(-1, $GUI_enable)
    EndSelect
    #EndRegion --- CodeWizard generated code Start ---
    EndFunc ;==>_install
    Sleep(1000)

    Func _allx64()
    MsgBox(1, "test", "bis hier gehts es")
    $count = 10
    $x64 = $aLBckbColumn1
    For $i = 0 To $count
    GUICtrlSetState($x64 + $i, $GUI_CHECKED)
    Next

    EndFunc ;==>_allx64

    Func _SoftwareInstall_64bit_Programme()
    If BitAND(GUICtrlRead($aCkbColumn1[0]), $GUI_CHECKED) = $GUI_CHECKED Then
    MsgBox(1, "exe", "nach exe suchen")
    ShellExecuteWait(@ScriptDir & "\64_Bit_Programme\7z921-x64.msi")
    GUICtrlSetState($aCkbColumn1[0], $GUI_UNCHECKED)
    EndIf
    If BitAND(GUICtrlRead($aCkbColumn1[1]), $GUI_CHECKED) = $GUI_CHECKED Then
    RunWait(@ScriptDir & "\64_Bit_Programme\aio-runtimes125.exe")
    GUICtrlSetState($aCkbColumn1[1], $GUI_UNCHECKED)
    EndIf
    If BitAND(GUICtrlRead($aCkbColumn1[2]), $GUI_CHECKED) = $GUI_CHECKED Then
    RunWait(@ScriptDir & "\64_Bit_Programme\br_2011free_advanced")
    GUICtrlSetState($aCkbColumn1[2], $GUI_UNCHECKED)
    EndIf
    If BitAND(GUICtrlRead($aCkbColumn1[3]), $GUI_CHECKED) = $GUI_CHECKED Then
    RunWait(@ScriptDir & "\64_Bit_Programme\gimp-2.6.8-x64-setup.exe")
    GUICtrlSetState($aCkbColumn1[3], $GUI_UNCHECKED)
    EndIf
    If BitAND(GUICtrlRead($aCkbColumn1[4]), $GUI_CHECKED) = $GUI_CHECKED Then
    RunWait(@ScriptDir & "\64_Bit_Programme\sc134_x64.exe")
    GUICtrlSetState($aCkbColumn1[4], $GUI_UNCHECKED)
    EndIf
    If BitAND(GUICtrlRead($aCkbColumn1[5]), $GUI_CHECKED) = $GUI_CHECKED Then
    RunWait(@ScriptDir & "\64_Bit_Programme\TeamSpeak3.exe")
    GUICtrlSetState($aCkbColumn1[5], $GUI_UNCHECKED)
    EndIf
    If BitAND(GUICtrlRead($aCkbColumn1[6]), $GUI_CHECKED) = $GUI_CHECKED Then
    RunWait(@ScriptDir & "\64_Bit_Programme\ultradefrag-4.4.0.bin.amd64.exe")
    GUICtrlSetState($aCkbColumn1[6], $GUI_UNCHECKED)
    EndIf
    If BitAND(GUICtrlRead($aCkbColumn1[7]), $GUI_CHECKED) = $GUI_CHECKED Then
    RunWait(@ScriptDir & "\64_Bit_Programme\UltraVNC_1.0.9.6_x64_Setup.exe")
    GUICtrlSetState($aCkbColumn1[7], $GUI_UNCHECKED)
    EndIf
    If BitAND(GUICtrlRead($aCkbColumn1[8]), $GUI_CHECKED) = $GUI_CHECKED Then
    RunWait(@ScriptDir & "\64_Bit_Programme\VirtualDub-1.9.11-AMD64.zip")
    GUICtrlSetState($aCkbColumn1[8], $GUI_UNCHECKED)
    EndIf
    If BitAND(GUICtrlRead($aCkbColumn1[9]), $GUI_CHECKED) = $GUI_CHECKED Then
    RunWait(@ScriptDir & "\64_Bit_Programme\winrar-x64-400d.exe")
    GUICtrlSetState($aCkbColumn1[9], $GUI_UNCHECKED)
    EndIf
    EndFunc ;==>_SoftwareInstall_64bit_Programme
    Sleep(1000)
    Func _SoftwareInstall_x86_Programme1()
    If BitAND(GUICtrlRead($aCkbColumn2[0]), $GUI_CHECKED) = $GUI_CHECKED Then
    RunWait(@ScriptDir & "\x86_Programme\7z920.exe")
    GUICtrlSetState($aCkbColumn2[0], $GUI_UNCHECKED)
    EndIf
    If BitAND(GUICtrlRead($aCkbColumn2[1]), $GUI_CHECKED) = $GUI_CHECKED Then
    RunWait(@ScriptDir & "\x86_Programme\agsetup183se.exe")
    GUICtrlSetState($aCkbColumn2[1], $GUI_UNCHECKED)
    EndIf
    If BitAND(GUICtrlRead($aCkbColumn2[2]), $GUI_CHECKED) = $GUI_CHECKED Then
    RunWait(@ScriptDir & "\x86_Programme\ccsetup306.exe")
    GUICtrlSetState($aCkbColumn2[2], $GUI_UNCHECKED)
    EndIf
    If BitAND(GUICtrlRead($aCkbColumn2[3]), $GUI_CHECKED) = $GUI_CHECKED Then
    RunWait(@ScriptDir & "\x86_Programme\CloneDVD2.exe")
    GUICtrlSetState($aCkbColumn2[3], $GUI_UNCHECKED)
    EndIf
    If BitAND(GUICtrlRead($aCkbColumn2[4]), $GUI_CHECKED) = $GUI_CHECKED Then
    RunWait(@ScriptDir & "\x86_Programme\DAMN_NFO_Viewer_v2.exe")
    GUICtrlSetState($aCkbColumn2[4], $GUI_UNCHECKED)
    EndIf
    If BitAND(GUICtrlRead($aCkbColumn2[5]), $GUI_CHECKED) = $GUI_CHECKED Then
    RunWait(@ScriptDir & "\x86_Programme\DTLite4402-0131.exe")
    GUICtrlSetState($aCkbColumn2[5], $GUI_UNCHECKED)
    EndIf
    If BitAND(GUICtrlRead($aCkbColumn2[6]), $GUI_CHECKED) = $GUI_CHECKED Then
    RunWait(@ScriptDir & "\x86_Programme\dvdshrink.3.2.exe")
    GUICtrlSetState($aCkbColumn2[6], $GUI_UNCHECKED)
    EndIf
    If BitAND(GUICtrlRead($aCkbColumn2[7]), $GUI_CHECKED) = $GUI_CHECKED Then
    RunWait(@ScriptDir & "\x86_Programme\FileZilla_3.5.0.exe")
    GUICtrlSetState($aCkbColumn2[7], $GUI_UNCHECKED)
    EndIf
    If BitAND(GUICtrlRead($aCkbColumn2[8]), $GUI_CHECKED) = $GUI_CHECKED Then
    RunWait(@ScriptDir & "\x86_Programme\Firefox_Setup_3.6.17.exe")
    GUICtrlSetState($aCkbColumn2[8], $GUI_UNCHECKED)
    EndIf
    If BitAND(GUICtrlRead($aCkbColumn2[9]), $GUI_CHECKED) = $GUI_CHECKED Then
    RunWait(@ScriptDir & "\x86_Programme\Firefox_Setup_4.0.exe")
    GUICtrlSetState($aCkbColumn1[9], $GUI_UNCHECKED)
    EndIf
    If BitAND(GUICtrlRead($aCkbColumn2[10]), $GUI_CHECKED) = $GUI_CHECKED Then
    RunWait(@ScriptDir & "\x86_Programme\Fraps_302.exe")
    GUICtrlSetState($aCkbColumn1[10], $GUI_UNCHECKED)
    EndIf
    If BitAND(GUICtrlRead($aCkbColumn2[11]), $GUI_CHECKED) = $GUI_CHECKED Then
    RunWait(@ScriptDir & "\x86_Programme\HJTInstall.exe")
    GUICtrlSetState($aCkbColumn2[11], $GUI_UNCHECKED)
    EndIf
    If BitAND(GUICtrlRead($aCkbColumn2[12]), $GUI_CHECKED) = $GUI_CHECKED Then
    RunWait(@ScriptDir & "\x86_Programme\ImgBurn_2.5.5.0.exe")
    GUICtrlSetState($aCkbColumn2[12], $GUI_UNCHECKED)
    EndIf
    If BitAND(GUICtrlRead($aCkbColumn2[13]), $GUI_CHECKED) = $GUI_CHECKED Then
    RunWait(@ScriptDir & "\x86_Programme\K-Lite_Codec.exe")
    GUICtrlSetState($aCkbColumn2[13], $GUI_UNCHECKED)
    EndIf
    If BitAND(GUICtrlRead($aCkbColumn2[14]), $GUI_CHECKED) = $GUI_CHECKED Then
    RunWait(@ScriptDir & "\x86_Programme\malewarebytes.exe")
    GUICtrlSetState($aCkbColumn2[14], $GUI_UNCHECKED)
    EndIf
    If BitAND(GUICtrlRead($aCkbColumn2[15]), $GUI_CHECKED) = $GUI_CHECKED Then
    RunWait(@ScriptDir & "\x86_Programme\OpenOffice.org 3.3.0.exe")
    GUICtrlSetState($aCkbColumn2[15], $GUI_UNCHECKED)
    EndIf
    If BitAND(GUICtrlRead($aCkbColumn2[16]), $GUI_CHECKED) = $GUI_CHECKED Then
    RunWait(@ScriptDir & "\x86_Programme\spybotd162.exe")
    GUICtrlSetState($aCkbColumn1[16], $GUI_UNCHECKED)
    EndIf
    If BitAND(GUICtrlRead($aCkbColumn2[17]), $GUI_CHECKED) = $GUI_CHECKED Then
    RunWait(@ScriptDir & "\x86_Programme\TeamSpeak3-Client.exe")
    GUICtrlSetState($aCkbColumn2[17], $GUI_UNCHECKED)
    EndIf
    If BitAND(GUICtrlRead($aCkbColumn2[18]), $GUI_CHECKED) = $GUI_CHECKED Then
    RunWait(@ScriptDir & "\x86_Programme\TeamViewer 6.0.10462.exe")
    GUICtrlSetState($aCkbColumn2[18], $GUI_UNCHECKED)
    EndIf
    If BitAND(GUICtrlRead($aCkbColumn2[19]), $GUI_CHECKED) = $GUI_CHECKED Then
    RunWait(@ScriptDir & "\x86_Programme\Thunderbird.exe")
    GUICtrlSetState($aCkbColumn2[19], $GUI_UNCHECKED)
    EndIf
    If BitAND(GUICtrlRead($aCkbColumn2[20]), $GUI_CHECKED) = $GUI_CHECKED Then
    RunWait(@ScriptDir & "\x86_Programme\TrueCrypt.exe")
    GUICtrlSetState($aCkbColumn2[20], $GUI_UNCHECKED)
    EndIf
    If BitAND(GUICtrlRead($aCkbColumn3[0]), $GUI_CHECKED) = $GUI_CHECKED Then
    RunWait(@ScriptDir & "\x86_Programme\ts2.exe")
    GUICtrlSetState($aCkbColumn3[0], $GUI_UNCHECKED)
    EndIf
    If BitAND(GUICtrlRead($aCkbColumn3[1]), $GUI_CHECKED) = $GUI_CHECKED Then
    RunWait(@ScriptDir & "\x86_Programme\tsunami399.exe")
    GUICtrlSetState($aCkbColumn3[1], $GUI_UNCHECKED)
    EndIf
    If BitAND(GUICtrlRead($aCkbColumn3[2]), $GUI_CHECKED) = $GUI_CHECKED Then
    RunWait(@ScriptDir & "\x86_Programme\ultradefrag4.exe")
    GUICtrlSetState($aCkbColumn3[2], $GUI_UNCHECKED)
    EndIf
    If BitAND(GUICtrlRead($aCkbColumn3[3]), $GUI_CHECKED) = $GUI_CHECKED Then
    RunWait(@ScriptDir & "\x86_Programme\UltraVNC.exe")
    GUICtrlSetState($aCkbColumn3[3], $GUI_UNCHECKED)
    EndIf
    If BitAND(GUICtrlRead($aCkbColumn3[4]), $GUI_CHECKED) = $GUI_CHECKED Then
    RunWait(@ScriptDir & "\x86_Programme\Unlocker 1.9.0.exe")
    GUICtrlSetState($aCkbColumn3[4], $GUI_UNCHECKED)
    EndIf
    If BitAND(GUICtrlRead($aCkbColumn3[5]), $GUI_CHECKED) = $GUI_CHECKED Then
    RunWait(@ScriptDir & "\x86_Programme\VirtualCloneDrive5.exe")
    GUICtrlSetState($aCkbColumn3[5], $GUI_UNCHECKED)
    EndIf
    If BitAND(GUICtrlRead($aCkbColumn3[6]), $GUI_CHECKED) = $GUI_CHECKED Then
    RunWait(@ScriptDir & "\x86_Programme\vlc-1.1.9-win32.exe")
    GUICtrlSetState($aCkbColumn3[6], $GUI_UNCHECKED)
    EndIf
    If BitAND(GUICtrlRead($aCkbColumn3[7]), $GUI_CHECKED) = $GUI_CHECKED Then
    RunWait(@ScriptDir & "\x86_Programme\winamp561_full.exe")
    GUICtrlSetState($aCkbColumn3[7], $GUI_UNCHECKED)
    EndIf
    If BitAND(GUICtrlRead($aCkbColumn3[8]), $GUI_CHECKED) = $GUI_CHECKED Then
    RunWait(@ScriptDir & "\x86_Programme\wrar400d.exe")
    GUICtrlSetState($aCkbColumn3[8], $GUI_UNCHECKED)
    EndIf
    If BitAND(GUICtrlRead($aCkbColumn3[9]), $GUI_CHECKED) = $GUI_CHECKED Then
    RunWait(@ScriptDir & "\x86_Programme\Xvid-1.3.0-24022011.exe")
    GUICtrlSetState($aCkbColumn3[9], $GUI_UNCHECKED)
    EndIf
    EndFunc ;==>_SoftwareInstall_x86_Programme1
    Sleep(1000)
    Func _SoftwareInstall_portabel()

    If BitAND(GUICtrlRead($aCkbColumn4[0]), $GUI_CHECKED) = $GUI_CHECKED Then
    If FileExists(@DesktopDir & "\PortableApps") Then
    DirCopy(@ScriptDir & "\PortableApps\7-ZipPortable", @DesktopDir & "\PortableApps\7-ZipPortable", 1)

    MsgBox(1, "PortableApps", "Programm 7-Zip wurde in den PortableApps Ordner integriert", 3)

    Else
    If Not FileExists(@DesktopDir & "\PortableApps") Then
    MsgBox(64, "Ordner erstellen", "Es wird nun ein Desktop Ordner für PortableApps erstellt", 5)
    If DirCreate(@DesktopDir & "\PortableApps") Then
    If DirCopy(@ScriptDir & "\PortableApps\7-ZipPortable", @DesktopDir & "\PortableApps\7-ZipPortable", 1) Then
    MsgBox(1, "PortableApps", "Programm 7-Zip wurde in den PortableApps Ordner integriert", 3)
    EndIf
    EndIf
    EndIf
    EndIf
    EndIf
    GUICtrlSetState($aCkbColumn4[0], $GUI_UNCHECKED)
    If BitAND(GUICtrlRead($aCkbColumn4[1]), $GUI_CHECKED) = $GUI_CHECKED Then
    If FileExists(@DesktopDir & "\PortableApps") Then
    DirCopy(@ScriptDir & "\PortableApps\ClamWinPortable", @DesktopDir & "\PortableApps\ClamWinPortable", 1)
    MsgBox(1, "PortableApps", "Programm ClamWinPortable wurde in den PortableApps Ordner integriert", 3)
    Else
    If Not FileExists(@DesktopDir & "\PortableApps") Then
    MsgBox(64, "Ordner erstellen", "Es wird nun ein Desktop Ordner für PortableApps erstellt", 5)
    If DirCreate(@DesktopDir & "\PortableApps") Then
    If DirCopy(@ScriptDir & "\PortableApps\ClamWinPortable", @DesktopDir & "\PortableApps\ClamWinPortable", 1) Then
    MsgBox(1, "PortableApps", "Programm ClamWinPortable wurde in den PortableApps Ordner integriert", 3)
    EndIf
    EndIf
    EndIf
    EndIf
    EndIf
    GUICtrlSetState($aCkbColumn4[1], $GUI_UNCHECKED)
    If BitAND(GUICtrlRead($aCkbColumn4[2]), $GUI_CHECKED) = $GUI_CHECKED Then
    If FileExists(@DesktopDir & "\PortableApps") Then
    DirCopy(@ScriptDir & "\PortableApps\CoolPlayerPortable", @DesktopDir & "\PortableApps\CoolPlayerPortable", 1)
    MsgBox(1, "PortableApps", "Programm CoolPlayer wurde in den PortableApps Ordner integriert", 3)
    Else
    If Not FileExists(@DesktopDir & "\PortableApps") Then
    MsgBox(64, "Ordner erstellen", "Es wird nun ein Desktop Ordner für PortableApps erstellt", 5)
    If DirCreate(@DesktopDir & "\PortableApps") Then
    If DirCopy(@ScriptDir & "\PortableApps\CoolPlayerPortable", @DesktopDir & "\PortableApps\CoolPlayerPortable", 1) Then
    MsgBox(1, "PortableApps", "Programm CoolPlayer wurde in den PortableApps Ordner integriert", 3)
    EndIf
    EndIf
    EndIf
    EndIf
    EndIf
    GUICtrlSetState($aCkbColumn4[2], $GUI_UNCHECKED)
    If BitAND(GUICtrlRead($aCkbColumn4[3]), $GUI_CHECKED) = $GUI_CHECKED Then
    If FileExists(@DesktopDir & "\PortableApps") Then
    DirCopy(@ScriptDir & "\PortableApps\DVDStylerPortable", @DesktopDir & "\PortableApps\DVDStylerPortable", 1)
    MsgBox(1, "PortableApps", "Programm DVD Styler wurde in den PortableApps Ordner integriert", 3)
    Else
    If Not FileExists(@DesktopDir & "\PortableApps") Then
    MsgBox(64, "Ordner erstellen", "Es wird nun ein Desktop Ordner für PortableApps erstellt", 5)
    If DirCreate(@DesktopDir & "\PortableApps") Then
    If DirCopy(@ScriptDir & "\PortableApps\DVDStylerPortable", @DesktopDir & "\PortableApps\DVDStylerPortable", 1) Then
    MsgBox(1, "PortableApps", "Programm DVD Styler wurde in den PortableApps Ordner integriert", 3)
    EndIf
    EndIf
    EndIf
    EndIf
    EndIf
    GUICtrlSetState($aCkbColumn4[3], $GUI_UNCHECKED)
    If BitAND(GUICtrlRead($aCkbColumn4[4]), $GUI_CHECKED) = $GUI_CHECKED Then
    If FileExists(@DesktopDir & "\PortableApps") Then
    DirCopy(@ScriptDir & "\PortableApps\FileZillaPortable", @DesktopDir & "\PortableApps\FileZillaPortable", 1)
    MsgBox(1, "PortableApps", "Programm FileZilla wurde in den PortableApps Ordner integriert", 3)
    Else
    If Not FileExists(@DesktopDir & "\PortableApps") Then
    MsgBox(64, "Ordner erstellen", "Es wird nun ein Desktop Ordner für PortableApps erstellt", 5)
    If DirCreate(@DesktopDir & "\PortableApps") Then
    If DirCopy(@ScriptDir & "\PortableApps\FileZillaPortable", @DesktopDir & "\PortableApps\FileZillaPortable", 1) Then
    MsgBox(1, "PortableApps", "Programm FileZilla wurde in den PortableApps Ordner integriert", 3)
    EndIf
    EndIf
    EndIf
    EndIf
    EndIf
    GUICtrlSetState($aCkbColumn4[4], $GUI_UNCHECKED)
    If BitAND(GUICtrlRead($aCkbColumn4[5]), $GUI_CHECKED) = $GUI_CHECKED Then
    If FileExists(@DesktopDir & "\PortableApps") Then
    DirCopy(@ScriptDir & "\PortableApps\FirefoxPortable", @DesktopDir & "\PortableApps\FirefoxPortable", 1)
    MsgBox(1, "PortableApps", "Programm FirefoxPortable wurde in den PortableApps Ordner integriert", 3)
    Else
    If Not FileExists(@DesktopDir & "\PortableApps") Then
    MsgBox(64, "Ordner erstellen", "Es wird nun ein Desktop Ordner für PortableApps erstellt", 5)
    If DirCreate(@DesktopDir & "\PortableApps") Then
    If DirCopy(@ScriptDir & "\PortableApps\FirefoxPortable", @DesktopDir & "\PortableApps\FirefoxPortable", 1) Then
    MsgBox(1, "PortableApps", "Programm FirefoxPortable wurde in den PortableApps Ordner integriert", 3)
    EndIf
    EndIf
    EndIf
    EndIf
    EndIf
    GUICtrlSetState($aCkbColumn4[5], $GUI_UNCHECKED)
    If BitAND(GUICtrlRead($aCkbColumn4[6]), $GUI_CHECKED) = $GUI_CHECKED Then
    If FileExists(@DesktopDir & "\PortableApps") Then
    DirCopy(@ScriptDir & "\PortableApps\FoxitReaderPortable", @DesktopDir & "\PortableApps\FoxitReaderPortable", 1)
    MsgBox(1, "PortableApps", "Programm FoxitReader wurde in den PortableApps Ordner integriert", 3)
    Else
    If Not FileExists(@DesktopDir & "\PortableApps") Then
    MsgBox(64, "Ordner erstellen", "Es wird nun ein Desktop Ordner für PortableApps erstellt", 5)
    If DirCreate(@DesktopDir & "\PortableApps") Then
    If DirCopy(@ScriptDir & "\PortableApps\FoxitReaderPortable", @DesktopDir & "\PortableApps\FoxitReaderPortable", 1) Then
    MsgBox(1, "PortableApps", "Programm Foxitreader wurde in den PortableApps Ordner integriert", 3)
    EndIf
    EndIf
    EndIf
    EndIf
    EndIf
    GUICtrlSetState($aCkbColumn4[6], $GUI_UNCHECKED)
    If BitAND(GUICtrlRead($aCkbColumn4[7]), $GUI_CHECKED) = $GUI_CHECKED Then
    If FileExists(@DesktopDir & "\PortableApps") Then
    DirCopy(@ScriptDir & "\PortableApps\GIMPPortable", @DesktopDir & "\PortableApps\GIMPPortable", 1)
    MsgBox(1, "PortableApps", "Programm GIMP wurde in den PortableApps Ordner integriert", 3)
    Else
    If Not FileExists(@DesktopDir & "\PortableApps") Then
    MsgBox(64, "Ordner erstellen", "Es wird nun ein Desktop Ordner für PortableApps erstellt", 5)
    If DirCreate(@DesktopDir & "\PortableApps") Then
    If DirCopy(@ScriptDir & "\PortableApps\GIMPPortable", @DesktopDir & "\PortableApps\GIMPPortable", 1) Then
    MsgBox(1, "PortableApps", "Programm GIMP wurde in den PortableApps Ordner integriert", 3)
    EndIf
    EndIf
    EndIf
    EndIf
    EndIf
    GUICtrlSetState($aCkbColumn4[7], $GUI_UNCHECKED)
    If BitAND(GUICtrlRead($aCkbColumn4[8]), $GUI_CHECKED) = $GUI_CHECKED Then
    If FileExists(@DesktopDir & "\PortableApps") Then
    DirCopy(@ScriptDir & "\PortableApps\KeePassPortable", @DesktopDir & "\PortableApps\KeePassPortable", 1)
    MsgBox(1, "PortableApps", "Programm KeePass wurde in den PortableApps Ordner integriert", 3)
    Else
    If Not FileExists(@DesktopDir & "\PortableApps") Then
    MsgBox(64, "Ordner erstellen", "Es wird nun ein Desktop Ordner für PortableApps erstellt", 5)
    If DirCreate(@DesktopDir & "\PortableApps") Then
    If DirCopy(@ScriptDir & "\PortableApps\KeePassPortable", @DesktopDir & "\PortableApps\KeePassPortable", 1) Then
    MsgBox(1, "PortableApps", "Programm KeePass wurde in den PortableApps Ordner integriert", 3)
    EndIf
    EndIf
    EndIf
    EndIf
    EndIf
    GUICtrlSetState($aCkbColumn4[8], $GUI_UNCHECKED)
    If BitAND(GUICtrlRead($aCkbColumn4[9]), $GUI_CHECKED) = $GUI_CHECKED Then
    If FileExists(@DesktopDir & "\PortableApps") Then
    DirCopy(@ScriptDir & "\PortableApps\OpenOfficePortable", @DesktopDir & "\PortableApps\OpenOfficePortable", 1)
    MsgBox(1, "PortableApps", "Programm OpenOffice wurde in den PortableApps Ordner integriert", 3)
    Else
    If Not FileExists(@DesktopDir & "\PortableApps") Then
    MsgBox(64, "Ordner erstellen", "Es wird nun ein Desktop Ordner für PortableApps erstellt", 5)
    If DirCreate(@DesktopDir & "\PortableApps") Then
    If DirCopy(@ScriptDir & "\PortableApps\OpenOfficePortable", @DesktopDir & "\PortableApps\OpenOfficePortable", 1) Then
    MsgBox(1, "PortableApps", "Programm OpenOffice wurde in den PortableApps Ordner integriert", 3)
    EndIf
    EndIf
    EndIf
    EndIf
    EndIf
    GUICtrlSetState($aCkbColumn4[9], $GUI_UNCHECKED)
    If BitAND(GUICtrlRead($aCkbColumn4[10]), $GUI_CHECKED) = $GUI_CHECKED Then
    If FileExists(@DesktopDir & "\PortableApps") Then
    DirCopy(@ScriptDir & "\PortableApps\PidginPortable", @DesktopDir & "\PortableApps\PidginPortable", 1)
    MsgBox(1, "PortableApps", "Programm Pidgin wurde in den PortableApps Ordner integriert", 3)
    Else
    If Not FileExists(@DesktopDir & "\PortableApps") Then
    MsgBox(64, "Ordner erstellen", "Es wird nun ein Desktop Ordner für PortableApps erstellt", 5)
    If DirCreate(@DesktopDir & "\PortableApps") Then
    If DirCopy(@ScriptDir & "\PortableApps\PidginPortable", @DesktopDir & "\PortableApps\PidginPortable", 1) Then
    MsgBox(1, "PortableApps", "Programm Pidgin wurde in den PortableApps Ordner integriert", 3)
    EndIf
    EndIf
    EndIf
    EndIf
    EndIf
    GUICtrlSetState($aCkbColumn4[10], $GUI_UNCHECKED)
    If BitAND(GUICtrlRead($aCkbColumn4[11]), $GUI_CHECKED) = $GUI_CHECKED Then
    If FileExists(@DesktopDir & "\PortableApps") Then
    DirCopy(@ScriptDir & "\PortableApps\PNotesPortable", @DesktopDir & "\PortableApps\PNotesPortable", 1)
    MsgBox(1, "PortableApps", "Programm PNotes wurde in den PortableApps Ordner integriert", 3)
    Else
    If Not FileExists(@DesktopDir & "\PortableApps") Then
    MsgBox(64, "Ordner erstellen", "Es wird nun ein Desktop Ordner für PortableApps erstellt", 5)
    If DirCreate(@DesktopDir & "\PortableApps") Then
    If DirCopy(@ScriptDir & "\PortableApps\PNotesPortable", @DesktopDir & "\PortableApps\PNotesPortable", 1) Then
    MsgBox(1, "PortableApps", "Programm PNotes wurde in den PortableApps Ordner integriert", 3)
    EndIf
    EndIf
    EndIf
    EndIf
    EndIf
    GUICtrlSetState($aCkbColumn4[11], $GUI_UNCHECKED)
    If BitAND(GUICtrlRead($aCkbColumn4[12]), $GUI_CHECKED) = $GUI_CHECKED Then
    If FileExists(@DesktopDir & "\PortableApps") Then
    DirCopy(@ScriptDir & "\PortableApps\SpybotPortable", @DesktopDir & "\PortableApps\SpybotPortable", 1)
    MsgBox(1, "PortableApps", "Programm Spybot wurde in den PortableApps Ordner integriert", 3)
    Else
    If Not FileExists(@DesktopDir & "\PortableApps") Then
    MsgBox(64, "Ordner erstellen", "Es wird nun ein Desktop Ordner für PortableApps erstellt", 5)
    If DirCreate(@DesktopDir & "\PortableApps") Then
    If DirCopy(@ScriptDir & "\PortableApps\SpybotPortable", @DesktopDir & "\PortableApps\SpybotPortable", 1) Then
    MsgBox(1, "PortableApps", "Programm Spybot wurde in den PortableApps Ordner integriert", 3)
    EndIf
    EndIf
    EndIf
    EndIf
    EndIf
    GUICtrlSetState($aCkbColumn4[12], $GUI_UNCHECKED)
    If BitAND(GUICtrlRead($aCkbColumn4[13]), $GUI_CHECKED) = $GUI_CHECKED Then
    If FileExists(@DesktopDir & "\PortableApps") Then
    DirCopy(@ScriptDir & "\PortableApps\SumatraPDFPortable", @DesktopDir & "\PortableApps\SumatraPDFPortable", 1)
    MsgBox(1, "PortableApps", "Programm SumatraPDF wurde in den PortableApps Ordner integriert", 3)
    Else
    If Not FileExists(@DesktopDir & "\PortableApps") Then
    MsgBox(64, "Ordner erstellen", "Es wird nun ein Desktop Ordner für PortableApps erstellt", 5)
    If DirCreate(@DesktopDir & "\PortableApps") Then
    If DirCopy(@ScriptDir & "\PortableApps\SumatraPDFPortable", @DesktopDir & "\PortableApps\SumatraPDFPortable", 1) Then
    MsgBox(1, "PortableApps", "Programm SumatraPDF wurde in den PortableApps Ordner integriert", 3)
    EndIf
    EndIf
    EndIf
    EndIf
    EndIf
    GUICtrlSetState($aCkbColumn4[13], $GUI_UNCHECKED)
    If BitAND(GUICtrlRead($aCkbColumn4[14]), $GUI_CHECKED) = $GUI_CHECKED Then
    If FileExists(@DesktopDir & "\PortableApps") Then
    DirCopy(@ScriptDir & "\PortableApps\SunbirdPortable", @DesktopDir & "\PortableApps\SunbirdPortable", 1)
    MsgBox(1, "PortableApps", "Programm Sunbird wurde in den PortableApps Ordner integriert", 3)
    Else
    If Not FileExists(@DesktopDir & "\PortableApps") Then
    MsgBox(64, "Ordner erstellen", "Es wird nun ein Desktop Ordner für PortableApps erstellt", 5)
    If DirCreate(@DesktopDir & "\PortableApps") Then
    If DirCopy(@ScriptDir & "\PortableApps\SunbirdPortable", @DesktopDir & "\PortableApps\SunbirdPortable", 1) Then
    MsgBox(1, "PortableApps", "Programm Sunbird wurde in den PortableApps Ordner integriert", 3)
    EndIf
    EndIf
    EndIf
    EndIf
    EndIf
    GUICtrlSetState($aCkbColumn4[14], $GUI_UNCHECKED)
    If BitAND(GUICtrlRead($aCkbColumn4[15]), $GUI_CHECKED) = $GUI_CHECKED Then
    If FileExists(@DesktopDir & "\PortableApps") Then
    DirCopy(@ScriptDir & "\PortableApps\TeamViewerPortable", @DesktopDir & "\PortableApps\TeamViewerPortable", 1)
    MsgBox(1, "PortableApps", "Programm TeamViewer wurde in den PortableApps Ordner integriert", 3)
    Else
    If Not FileExists(@DesktopDir & "\PortableApps") Then
    MsgBox(64, "Ordner erstellen", "Es wird nun ein Desktop Ordner für PortableApps erstellt", 5)
    If DirCreate(@DesktopDir & "\PortableApps") Then
    If DirCopy(@ScriptDir & "\PortableApps\TeamViewerPortable", @DesktopDir & "\PortableApps\TeamViewerPortable", 1) Then
    MsgBox(1, "PortableApps", "Programm TeamViewer wurde in den PortableApps Ordner integriert", 3)
    EndIf
    EndIf
    EndIf
    EndIf
    EndIf
    GUICtrlSetState($aCkbColumn4[15], $GUI_UNCHECKED)
    If BitAND(GUICtrlRead($aCkbColumn4[16]), $GUI_CHECKED) = $GUI_CHECKED Then
    If FileExists(@DesktopDir & "\PortableApps") Then
    DirCopy(@ScriptDir & "\PortableApps\ThunderbirdPortable", @DesktopDir & "\PortableApps\ThunderbirdPortable", 1)
    MsgBox(1, "PortableApps", "Programm Thunderbird wurde in den PortableApps Ordner integriert", 3)
    Else
    If Not FileExists(@DesktopDir & "\PortableApps") Then
    MsgBox(64, "Ordner erstellen", "Es wird nun ein Desktop Ordner für PortableApps erstellt", 5)
    If DirCreate(@DesktopDir & "\PortableApps") Then
    If DirCopy(@ScriptDir & "\PortableApps\ThunderbirdPortable", @DesktopDir & "\PortableApps\ThunderbirdPortable", 1) Then
    MsgBox(1, "PortableApps", "Programm Thunderbird wurde in den PortableApps Ordner integriert", 3)
    EndIf
    EndIf
    EndIf
    EndIf
    EndIf
    GUICtrlSetState($aCkbColumn4[16], $GUI_UNCHECKED)
    If BitAND(GUICtrlRead($aCkbColumn4[17]), $GUI_CHECKED) = $GUI_CHECKED Then
    If FileExists(@DesktopDir & "\PortableApps") Then
    DirCopy(@ScriptDir & "\PortableApps\VLCPortable", @DesktopDir & "\PortableApps\VLCPortable", 1)
    MsgBox(1, "PortableApps", "Programm Vlc Media Player wurde in den PortableApps Ordner integriert", 3)
    Else
    If Not FileExists(@DesktopDir & "\PortableApps") Then
    MsgBox(64, "Ordner erstellen", "Es wird nun ein Desktop Ordner für PortableApps erstellt", 5)
    If DirCreate(@DesktopDir & "\PortableApps") Then
    If DirCopy(@ScriptDir & "\PortableApps\VLCPortable", @DesktopDir & "\PortableApps\VLCPortable", 1) Then
    MsgBox(1, "PortableApps", "Programm Vlc Media Player wurde in den PortableApps Ordner integriert", 3)
    EndIf
    EndIf
    EndIf
    EndIf
    EndIf
    GUICtrlSetState($aCkbColumn4[17], $GUI_UNCHECKED)
    EndFunc ;==>_SoftwareInstall_portabel
    Sleep(1000)


    Func _SoftwareInstall_silent()
    If BitAND(GUICtrlRead($aCkbColumn5[0]), $GUI_CHECKED) = $GUI_CHECKED Then
    RunWait(@ScriptDir & "\SilentApps\7-Zip.exe")
    GUICtrlSetState($aCkbColumn5[0], $GUI_UNCHECKED)
    EndIf
    Sleep(500)
    If BitAND(GUICtrlRead($aCkbColumn5[1]), $GUI_CHECKED) = $GUI_CHECKED Then
    RunWait(@ScriptDir & "\SilentApps\CCleaner.exe")
    GUICtrlSetState($aCkbColumn5[1], $GUI_UNCHECKED)
    EndIf
    Sleep(500)
    If BitAND(GUICtrlRead($aCkbColumn5[2]), $GUI_CHECKED) = $GUI_CHECKED Then
    RunWait(@ScriptDir & "\SilentApps\DVD_Shrink.exe")
    GUICtrlSetState($aCkbColumn5[2], $GUI_UNCHECKED)
    EndIf
    Sleep(500)
    If BitAND(GUICtrlRead($aCkbColumn5[3]), $GUI_CHECKED) = $GUI_CHECKED Then
    RunWait(@ScriptDir & "\SilentApps\Foxit_PDF_Reader.exe")
    GUICtrlSetState($aCkbColumn5[3], $GUI_UNCHECKED)
    EndIf
    Sleep(500)
    If BitAND(GUICtrlRead($aCkbColumn5[4]), $GUI_CHECKED) = $GUI_CHECKED Then
    RunWait(@ScriptDir & "\SilentApps\ICQ7.2.exe")
    GUICtrlSetState($aCkbColumn5[4], $GUI_UNCHECKED)
    EndIf
    Sleep(500)
    If BitAND(GUICtrlRead($aCkbColumn5[5]), $GUI_CHECKED) = $GUI_CHECKED Then
    RunWait(@ScriptDir & "\SilentApps\Imgburninstall.exe")
    GUICtrlSetState($aCkbColumn5[5], $GUI_UNCHECKED)
    EndIf
    Sleep(500)
    If BitAND(GUICtrlRead($aCkbColumn5[6]), $GUI_CHECKED) = $GUI_CHECKED Then
    RunWait(@ScriptDir & "\SilentApps\IrfanView427.exe")
    GUICtrlSetState($aCkbColumn5[6], $GUI_UNCHECKED)
    EndIf
    Sleep(500)
    If BitAND(GUICtrlRead($aCkbColumn5[7]), $GUI_CHECKED) = $GUI_CHECKED Then
    RunWait(@ScriptDir & "\SilentApps\MozBackup151.exe")
    GUICtrlSetState($aCkbColumn5[7], $GUI_UNCHECKED)
    EndIf
    Sleep(500)
    If BitAND(GUICtrlRead($aCkbColumn5[8]), $GUI_CHECKED) = $GUI_CHECKED Then
    RunWait(@ScriptDir & "\SilentApps\Office_XP_Professional.exe")
    GUICtrlSetState($aCkbColumn5[8], $GUI_UNCHECKED)
    EndIf
    Sleep(500)
    If BitAND(GUICtrlRead($aCkbColumn5[9]), $GUI_CHECKED) = $GUI_CHECKED Then
    RunWait(@ScriptDir & "\SilentApps\OpenOffice.exe")
    GUICtrlSetState($aCkbColumn5[9], $GUI_UNCHECKED)
    EndIf
    Sleep(500)
    If BitAND(GUICtrlRead($aCkbColumn5[10]), $GUI_CHECKED) = $GUI_CHECKED Then
    RunWait(@ScriptDir & "\SilentApps\Pidgin.exe")
    GUICtrlSetState($aCkbColumn5[10], $GUI_UNCHECKED)
    EndIf
    Sleep(500)
    If BitAND(GUICtrlRead($aCkbColumn5[11]), $GUI_CHECKED) = $GUI_CHECKED Then
    RunWait(@ScriptDir & "\SilentApps\Spybot.exe")
    GUICtrlSetState($aCkbColumn5[11], $GUI_UNCHECKED)
    EndIf
    Sleep(500)
    If BitAND(GUICtrlRead($aCkbColumn5[12]), $GUI_CHECKED) = $GUI_CHECKED Then
    RunWait(@ScriptDir & "\SilentApps\TeamViewer5.exe")
    GUICtrlSetState($aCkbColumn5[12], $GUI_UNCHECKED)
    EndIf
    Sleep(500)
    If BitAND(GUICtrlRead($aCkbColumn5[13]), $GUI_CHECKED) = $GUI_CHECKED Then
    RunWait(@ScriptDir & "\SilentApps\TMPGEnc_Plus_25.exe")
    GUICtrlSetState($aCkbColumn5[13], $GUI_UNCHECKED)
    EndIf
    Sleep(500)
    If BitAND(GUICtrlRead($aCkbColumn5[14]), $GUI_CHECKED) = $GUI_CHECKED Then
    RunWait(@ScriptDir & "\SilentApps\TMPGEnc_XPress.exe")
    GUICtrlSetState($aCkbColumn5[14], $GUI_UNCHECKED)
    EndIf
    Sleep(500)
    If BitAND(GUICtrlRead($aCkbColumn5[15]), $GUI_CHECKED) = $GUI_CHECKED Then
    RunWait(@ScriptDir & "\SilentApps\TrueCrypt7.exe")
    GUICtrlSetState($aCkbColumn5[15], $GUI_UNCHECKED)
    EndIf
    Sleep(500)
    If BitAND(GUICtrlRead($aCkbColumn5[16]), $GUI_CHECKED) = $GUI_CHECKED Then
    RunWait(@ScriptDir & "\SilentApps\Unlocker.exe")
    GUICtrlSetState($aCkbColumn5[16], $GUI_UNCHECKED)
    EndIf
    Sleep(500)
    If BitAND(GUICtrlRead($aCkbColumn5[17]), $GUI_CHECKED) = $GUI_CHECKED Then
    RunWait(@ScriptDir & "\SilentApps\VirtualDub.exe")
    GUICtrlSetState($aCkbColumn5[17], $GUI_UNCHECKED)
    EndIf
    Sleep(500)
    If BitAND(GUICtrlRead($aCkbColumn5[18]), $GUI_CHECKED) = $GUI_CHECKED Then
    RunWait(@ScriptDir & "\SilentApps\VLC.exe")
    GUICtrlSetState($aCkbColumn5[18], $GUI_UNCHECKED)
    EndIf
    Sleep(500)
    If BitAND(GUICtrlRead($aCkbColumn5[19]), $GUI_CHECKED) = $GUI_CHECKED Then
    RunWait(@ScriptDir & "\SilentApps\Winamp5.exe")
    GUICtrlSetState($aCkbColumn5[19], $GUI_UNCHECKED)
    EndIf
    Sleep(500)
    If BitAND(GUICtrlRead($aCkbColumn5[20]), $GUI_CHECKED) = $GUI_CHECKED Then
    RunWait(@ScriptDir & "\SilentApps\Wise Disk Cleaner.exe")
    GUICtrlSetState($aCkbColumn5[20], $GUI_UNCHECKED)
    EndIf
    Sleep(500)
    If BitAND(GUICtrlRead($aCkbColumn5[21]), $GUI_CHECKED) = $GUI_CHECKED Then
    RunWait(@ScriptDir & "\SilentApps\Wise Registry Cleaner.exe")
    GUICtrlSetState($aCkbColumn5[21], $GUI_UNCHECKED)
    EndIf
    Sleep(500)
    EndFunc ;==>_SoftwareInstall_silent
    Sleep(1000)

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit
    EndSwitch
    WEnd
    Func _ende()
    Exit
    EndFunc ;==>_ende

    2 Mal editiert, zuletzt von Osiris (30. Mai 2011 um 12:56)

  • Naja,

    [autoit]

    GUICtrlSetState($x64 + $i, $GUI_CHECKED)

    [/autoit]


    sieht irgendwie falsch aus - musste das nicht ein Aufruf wie

    [autoit]

    GUICtrlSetState($aCkbColumn1[0], $GUI_UNCHECKED)

    [/autoit]


    sein? Deine Zeiger zu den CheckBoxen waren doch in den Arrays abgelegt.

    Wenn ich es genauer betrachte holst du dir ja das Array,also wolltest du bestimmt

    [autoit]

    Func _allx64()
    ;MsgBox(1, "test", "bis hier gehts es")
    $count = 10
    $x64 = $aLBckbColumn1
    For $i = 0 To $count
    GUICtrlSetState($x64[$i], $GUI_CHECKED)
    Next

    [/autoit]


    schreiben. (Ohne Test ob das sinnvoll ist)

  • also wie meinst des mit (Ohne Test ob das sinnvoll ist)?
    ich habe die func von hier abgeleitet und da funzt es :whistling:

    Spoiler anzeigen

    #include <GUIConstantsEx.au3>
    #include <WindowsConstants.au3>
    #include <GUIListView.au3>
    #include <ButtonConstants.au3>
    #include <Constants.au3>
    #include <StaticConstants.au3>
    #include <TabConstants.au3>
    Opt("GUIOnEventMode", 1)
    $GUI = GUICreate("GUI", 800, 600)
    GUISetState(@SW_SHOW)
    GUISetOnEvent($GUI_EVENT_CLOSE, "_ende")

    GUISetBkColor(0x808080)
    ;Global $bnInstall = GUICtrlCreateLabel("Install", 450, 10, 75, 22)
    ;GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    ;GUICtrlSetBkColor(-1, $GUI_BKCOLOR_TRANSPARENT)
    ;GUICtrlSetOnEvent(-1, "_start")

    Global $bnExit = GUICtrlCreateLabel("Exit", 750, 10, 50, 22)
    GUICtrlSetFont(-1, 10, 400, 0, "Myriad Web Pro")
    GUICtrlSetBkColor(-1, $GUI_BKCOLOR_TRANSPARENT)
    GUICtrlSetOnEvent(-1, "_ende")


    $ListView = GUICtrlCreateListView("x64 Apps", 10, 50, 180, 500, $WS_BORDER, BitOR($LVS_EX_FULLROWSELECT, $LVS_EX_CHECKBOXES))
    GUICtrlCreateLabel("Select all", 70, 20, 75, 22,-1)
    GUICtrlSetOnEvent(-1, "_allx64")
    _GUICtrlListView_SetColumnWidth($ListView, 0, $LVSCW_AUTOSIZE_USEHEADER)


    Local $aTest[10] = ["7-Zip", "AIO runtimes", "Paragon Backup", "GIMP 268", "SpeedCommander", "Teamspeak 3", "UltraDefrag 4.4", "UltraVNC", "VirtualDub", _
    "Winrar 4"]

    For $i = 0 To 9
    GUICtrlCreateListViewItem($aTest[$i], $ListView)
    Next

    $ListView2 = GUICtrlCreateListView("x86 Programme", 210, 50, 180, 500, $WS_BORDER, BitOR($LVS_EX_FULLROWSELECT, $LVS_EX_CHECKBOXES))
    GUICtrlCreateLabel("Select all", 370, 20, 75, 22,-1)
    GUICtrlSetOnEvent(-1, "_allx86")

    _GUICtrlListView_SetColumnWidth($ListView2, 0, $LVSCW_AUTOSIZE_USEHEADER)


    Local $aTest2[21] = ["7-Zip", "Audiograbber 1.83", "CC_Cleaner", "CloneDVD2", "Damn_NFO_Viewer", "Daemon_Tools_Lite", "DVDShrink 3.2", "FileZilla 3.5", "Firefox 3.6.17", "Firefox 4.0", _
    "Fraps 302", "HighJackThis", "ImgBurn 2.5.5", "K_Lite_Codec_Pack 710", "MalewareByres", "OpenOffice 3.3.0", "SpyBot S&D", "TeamSpeak 3", "TeamViewer 6", "Thunderbirdn3.1.1", _
    "TrueCrypt 7.0"]
    For $i = 0 To 20
    GUICtrlCreateListViewItem($aTest2[$i], $ListView2)
    GUICtrlSetState(-1, $GUI_DISABLE) ; <-- zeigt keine Wirkung, Checkboxen noch anklickbar.
    Next

    $ListView1 = GUICtrlCreateListView(" ", 390, 50, 180, 500, $WS_BORDER, BitOR($LVS_EX_FULLROWSELECT, $LVS_EX_CHECKBOXES))
    _GUICtrlListView_SetColumnWidth($ListView1, 0, $LVSCW_AUTOSIZE_USEHEADER)


    Local $aTest1[11] = ["test1", "test2", "test3", "test4", "test5", "Test6", "test7", "test8", "test9", "test10", _
    "test11"]

    For $i = 0 To 10
    GUICtrlCreateListViewItem($aTest1[$i], $ListView1)
    GUICtrlSetState(-1, $GUI_DISABLE) ; <-- zeigt keine Wirkung, Checkboxen noch anklickbar.
    Next

    $ListView3 = GUICtrlCreateListView("PortableApps", 590, 50, 180, 500, $WS_BORDER, BitOR($LVS_EX_FULLROWSELECT, $LVS_EX_CHECKBOXES))
    GUICtrlCreateLabel("Select all", 650, 20, 75, 22,-1)

    GUICtrlSetOnEvent(-1, "_allxport")

    _GUICtrlListView_SetColumnWidth($ListView3, 0, $LVSCW_AUTOSIZE_USEHEADER)


    Local $aTest3[18] = ["7-Zip", "ClamWin", "CoolPlayer", "DVDStyler", "Filezilla", "Firefox3", "FoxitReader", "Gimp", "KeePass", "OpenOffice", _
    "Pidgin", "PNotes", "SpyBot S&D", "Sumatra", "SunBird", "TeamViewer", "Thunderbird", "VLC Mediaplayer"]
    For $i = 0 To 17
    GUICtrlCreateListViewItem($aTest3[$i], $ListView3)
    Next


    GUISetState(@SW_SHOW)

    Func _allx64()
    $count = 11
    $treepos = $ListView
    For $i = 0 To $count
    GUICtrlSetState($treepos + $i, $GUI_CHECKED)
    Next
    $auswahl = 1
    EndFunc ;==>_allx64

    Func _allx86()
    $count = 22
    $treepos = $ListView2
    For $i = 0 To $count
    GUICtrlSetState($treepos + $i, $GUI_CHECKED)
    Next
    $count = 11
    $treepos = $ListView1
    For $i = 0 To $count
    GUICtrlSetState($treepos + $i, $GUI_CHECKED)
    Next
    EndFunc ;==>_allx86
    Func _allxport()
    $count = 19
    $treepos = $ListView3
    For $i = 0 To $count
    GUICtrlSetState($treepos + $i, $GUI_CHECKED)
    Next

    EndFunc ;==>_allxport

    While True
    $msg = GUIGetMsg()
    Switch $msg
    Case -3
    Exit
    EndSwitch


    WEnd
    Func _ende()
    Exit
    EndFunc ;==>_ende

    2 Mal editiert, zuletzt von Osiris (30. Mai 2011 um 12:54)

  • In deinem Beispiel wird mit ListBoxen gearbeitet und er aktiviert ListView Elemente.
    Die ListView Elemente haben Checkboxen (wie sie auch ein Symbol haben könnten)

    Ohne zu Testen heisst das ich nicht extra SciTE angeworfen habe und dein ganzes Script getestet habe.

  • Spoiler anzeigen
    [autoit]

    Func _allx64()
    MsgBox(1, "test", "bis hier gehts es")
    $count = 10
    For $i = 0 To UBound($aCkbColumn1) - 1
    GUICtrlSetState($aCkbColumn1[$i], $GUI_CHECKED)
    Next
    EndFunc ;==>_allx64

    [/autoit]

    Setzt du nächstes mal bitte einen Spoiler um lange Codeausschnitte. Dann muss man sich nicht totscrollen um den nächsten Beitrag lesen zu können.

  • aber es sollte doch auch in den tabitems mit checkboxen funzen
    oder ist da so ein großer Unterschied in was sich die Checkboxen befinden, sprich tabitems oder listview?

    ak ok danke für die Aufklärung bzgl. Ohne test :thumbup:

    @ i2c sry vergessen :whistling: und danke für Deine schnelle Hilfe
    es funzt wunderbar
    habe es auf spoiler gesetzt

    Einmal editiert, zuletzt von Osiris (30. Mai 2011 um 12:56)