#region #include
#include <GUIConstantsEx.au3>
#endregion
#region GUIOnEventMode
Opt("GuiOnEventMode", 1)
#endregion
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("by Lars Heinrich", 500, 210, 196, 205)
GUISetOnEvent($GUI_EVENT_CLOSE, "ende")
GUICtrlCreateLabel("One-Clickster-Installer", 20, 24, 300, 23)
GUICtrlSetFont(-1, 12, 800, 4, "MS Sans Serif")
GUICtrlCreateLabel("Browser", 24, 56, 49, 17)
GUICtrlSetFont(-1, 8, 800, 4, "MS Sans Serif")
$Checkbox_Firefox = GUICtrlCreateCheckbox("Firefox", 24, 88, 50, 17)
$Checkbox_Chrome = GUICtrlCreateCheckbox("Chrome", 24, 104, 55, 17)
$Checkbox_Opera = GUICtrlCreateCheckbox("Opera", 24, 120, 45, 17)
GUICtrlCreateLabel("Software", 144, 56, 54, 17)
GUICtrlSetFont(-1, 8, 800, 4, "MS Sans Serif")
$Checkbox_All = GUICtrlCreateCheckbox("All", 144, 72, 30, 17)
GUICtrlSetFont(-1, 8, 800, "MS Sans Serif")
GUICtrlSetOnEvent(-1, "Checkbox_AllClick")
$Checkbox_Adobe_Reader = GUICtrlCreateCheckbox("Adobe Reader", 144, 88, 97, 17)
$Checkbox_Adobe_Flashplayer = GUICtrlCreateCheckbox("Adobe Flashplayer", 144, 104, 113, 17)
$Checkbox_Total_Commander = GUICtrlCreateCheckbox("Total Commander", 144, 120, 100, 17)
$Checkbox_Java = GUICtrlCreateCheckbox("Java", 144, 136, 40, 17)
$Checkbox_Citrix_Receiver = GUICtrlCreateCheckbox("Citrix Receiver", 144,152,92,17)
GUICtrlCreateLabel("Win Rar", 270, 72, 60, 17)
GUICtrlSetFont(-1, 8, 800, "MS Sans Serif")
$Checkbox_Win_Rar_D_64Bit = GUICtrlCreateCheckbox("Wrar-D-64Bit", 280, 88, 80, 17)
$Checkbox_Win_Rar_E_64Bit = GUICtrlCreateCheckbox("Wrar-E-64Bit", 280, 104, 80, 17)
$Checkbox_7Zip = GUICtrlCreateCheckbox("7 Zip", 144, 168, 40, 17)
GUICtrlCreateLabel("Programming Tools", 380, 56, 111, 17)
GUICtrlSetFont(-1, 8, 800, 4, "MS Sans Serif")
$Checkbox_AutoIT = GUICtrlCreateCheckbox("AutoIT", 380, 88, 50, 17)
$Checkbox_Koda = GUICtrlCreateCheckbox("Koda", 400, 104, 40, 17)
$Checkbox_SciTE = GUICtrlCreateCheckbox("SciTE", 400, 120, 45, 17)
$Button_Install = GUICtrlCreateButton("Install", 0, 170, 51, 20)
GUICtrlSetOnEvent($Button_Install, "Button_Install")
$Progress_Bar = GUICtrlCreateProgress("Running", 190, 150, 15)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
#region Files
$fileff = "Firefox_Setup.exe /silent"
$fileAf = "install_flash_player.de -install"
$fileAfx = "install_flash_player_ax.exe -install"
$fileAr = "AdbeRdr.exe /sALL /rs"
$fileTcmd = "tcm801x32_64\INSTALL.exe"
$regTcmd = "REGEDIT /S tcmd_reg.reg"
$fileJava = "java.exe /s"
$file7z = "7z.exe /S"
$fileWrar = "wrar.exe /s"
$Check_Programme = 0
#endregion
#region While 1
While 1
Sleep(1000)
WEnd
#endregion
#region Func Checkbox_AllClick
Func Checkbox_AllClick()
If $Check_Programme = 0 Then
GUICtrlSetState ($Checkbox_Adobe_Reader, $GUI_Checked)
GUICtrlSetState ($Checkbox_Adobe_Flashplayer, $GUI_Checked)
GUICtrlSetState ($Checkbox_Total_Commander, $GUI_Checked)
GUICtrlSetState ($Checkbox_Java, $GUI_Checked)
GUICtrlSetState ($Checkbox_Citrix_Receiver, $GUI_Checked)
;GUICtrlSetState ($Checkbox_Win_Rar, $GUI_Checked)
GUICtrlSetState ($Checkbox_7Zip, $GUI_Checked)
$Check_Programme = 1
ElseIf $Check_Programme = 1 Then
GUICtrlSetState ($Checkbox_Adobe_Reader, $GUI_Unchecked)
GUICtrlSetState ($Checkbox_Adobe_Flashplayer, $GUI_Unchecked)
GUICtrlSetState ($Checkbox_Total_Commander, $GUI_Unchecked)
GUICtrlSetState ($Checkbox_Java, $GUI_Unchecked)
GUICtrlSetState ($Checkbox_Citrix_Receiver, $GUI_Unchecked)
;GUICtrlSetState ($Checkbox_Win_Rar, $GUI_Unchecked)
GUICtrlSetState ($Checkbox_7Zip, $GUI_Unchecked)
$Check_Programme = 0
EndIf
EndFunc
#endregion
#region Func Button_Install
Func Button_Install()
If Guictrlread($Checkbox_Firefox) = 1 Then
RunWait("FirefoxVersion23.0.exe", @WindowsDir, @SW_HIDE)
MsgBox(0, "Firefox", "Firefox wurde installiert")
EndIf
If Guictrlread($Checkbox_Chrome) = 1 Then
RunWait("ChromeStandaloneSetup_28.0b1500.95.exe")
MsgBox(0, "Chrome", "Chrome wurde installiert")
EndIf
If Guictrlread($Checkbox_Opera) = 1 Then
RunWait("Opera_15.0.1147.153_Setup.exe")
MsgBox(0, "Opera", "Opera wurde installiert")
EndIf
; usw
EndFunc
#endregion Func Button_Install
#region Close, Minimize, Maximize, Restore
Func ende()
Exit
EndFunc
#endregion