alle Checkboxen mit einem Button makieren

Jonathan

Hallo, Wie kann ich mit hilfe eines Buttons in einer Gui alle Checkboxen b.z.w. alle angegebenen Checkboxen makieren?

mfg. Jonathan

Jautois

Hier mal ein Beispiel:

Spoiler anzeigen

[autoit]

#include <GUIConstants.au3>
#include <GUIConstantsEx.au3>

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

Global $checkCN[8], $ProgNames[8] = ['0', '1', '2', '3', '4', '5', '6', '7']

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

GUICreate("Bsp", 180, 240)
For $i = 0 To 7
$checkCN[$i] = GUICtrlCreateCheckbox($ProgNames[$i], 10, 10 + $i * 20, 120, 20)
Next
$Check = GUICtrlCreateButton("Check", 10, 200, 50, 20, 25, 0)
$Senden = GUICtrlCreateButton("Senden", 70, 200, 50, 20, 25, 0)
GUISetState()

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

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Check
For $xyz = 0 To 7
GUICtrlSetState($checkCN[$xyz], $GUI_CHECKED)
Next
Case $Senden
For $i = 0 To 7
If BitAND(GUICtrlRead($checkCN[$i]), $GUI_CHECKED) = $GUI_CHECKED Then
Switch $i
Case 0
;
Case 1
;
Case 2
;
Case 3
;
Case 4
;
Case 5
;
Case 6
;
Case 7
;
EndSwitch
EndIf
Next
EndSwitch
WEnd

[/autoit]

Jonathan

Dankeschön

skull693

Hallo ich haber auch ein problem mit meinem script in meinem script steht auch genau wo das problem liegt. um hilfe wäre ich sehr verbunden

Spoiler anzeigen

#cs ----------------------------------------------------------------------------

AutoIt Version: 3.3.6.1
Author: myName

Script Function:
Template AutoIt script.

#ce ----------------------------------------------------------------------------

; Script Start - Add your code below here

#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
;========================Includieren der Dateien===========================================
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 615, 438, 192, 124);erstellt die GUI
$Checkbox1 = GUICtrlCreateCheckbox("7 Zip", 120, 60, 97, 17);erstellt die Checkbox
$Checkbox2 = GUICtrlCreateCheckbox("Adobe Reader", 120, 80, 97, 17)
$Checkbox3 = GUICtrlCreateCheckbox("Antivir", 120, 100, 97, 17)
$Checkbox4 = GUICtrlCreateCheckbox("CCleaner", 120, 120, 97, 17)
$Checkbox5 = GUICtrlCreateCheckbox("Cute Writer", 120, 140, 97, 17)
$Checkbox6 = GUICtrlCreateCheckbox("Defraggler", 120, 160, 97, 17)
$Checkbox7 = GUICtrlCreateCheckbox("Firefox", 120, 180, 97, 17)
$Checkbox8 = GUICtrlCreateCheckbox("Foxit Reader", 120, 200, 97, 17)
$Checkbox9 = GUICtrlCreateCheckbox("Hcf(Manuel)", 120, 240, 97, 17)
$Checkbox10 = GUICtrlCreateCheckbox("Flash Player(manual)", 120, 220, 97, 17)
$Checkbox11 = GUICtrlCreateCheckbox("Irwan View", 120, 260, 97, 17)
$Checkbox12 = GUICtrlCreateCheckbox("Open Office", 120, 280, 97, 17)
$Checkbox13 = GUICtrlCreateCheckbox("Paint", 120, 300, 97, 17)
$Checkbox14 = GUICtrlCreateCheckbox("Unicarplus Zls", 240, 100, 97, 17)
$Checkbox15 = GUICtrlCreateCheckbox("Total Commander", 240, 60, 97, 17)
$Checkbox16 = GUICtrlCreateCheckbox("Teamviewer", 240, 80, 97, 17)
$Checkbox17 = GUICtrlCreateCheckbox("Thunderbird", 120, 320, 97, 17)
$Checkbox18 = GUICtrlCreateCheckbox("UltraVNC 32Bit", 240, 120, 97, 17)
$Checkbox19 = GUICtrlCreateCheckbox("UltraVNC 64Bit", 240, 140, 97, 17)
$Okay = GUICtrlCreateButton("Okay", 328, 360, 129, 41);erstellt einen okay button
$Abbrechen = GUICtrlCreateButton("Abbrechen", 456, 360, 129, 41)
$Label1 = GUICtrlCreateLabel("Was wollen Sie Installieren?", 216, 24, 136, 17);überschrift
$Alle = GUICtrlCreateButton("Alle", 200, 360, 129, 41)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
$nMsg = GUIGetMsg()
Switch $nMsg

Case $GUI_EVENT_CLOSE;stellt das X button da
Exit

Case $Okay ; für denn fall falls Okay geklickt wird
If GUICtrlRead($Checkbox1) = $GUI_CHECKED Then Run("C:\Windows\System32\cmd.exe")
WinWaitActive("Administrator: Eingabeaufforderung","",10)
Send('C:\Install\"7z920.exe" /S')
Send("{ENTER}")
Sleep(500)
Send('exit')
Send("{ENTER}")

;==============Problem ist wenn Checkbox eins nicht gewählt ist führt er diese Trotzdem im Hintergrund aus und
; es dauert die zeit wenn dann checkbox 2 oder etc ausgewählt ist

If GUICtrlRead($Checkbox2) = $GUI_CHECKED Then Run("C:\Install\AdbeRdr1001_de_DE.exe")
Sleep(20000)
Send("{TAB}{TAB}{ENTER}")
Sleep(100000)
Send("{ENTER}")

If GUICtrlRead($Checkbox3) = $GUI_CHECKED Then Run("C:\Windows\System32\cmd.exe")
WinWaitActive("Administrator: Eingabeaufforderung","",10)
Send('C:\Install\"avira_antivir_personal_de.exe" /SILENT @NO_SCAN')
Send("{ENTER}")
Sleep(5000)
Send('exit')
Send("{ENTER}")

If GUICtrlRead($Checkbox4) = $GUI_CHECKED Then Run("C:\Windows\System32\cmd.exe")
WinWaitActive("Administrator: Eingabeaufforderung","",10)
Send('C:\Install\"ccsetup309.exe" /S')
Send("{ENTER}")
Sleep(500)
Send('exit')
Send("{ENTER}")

If GUICtrlRead($Checkbox5) = $GUI_CHECKED Then Run("C:\Install\CuteWriter.exe")
WinWaitActive("Setup - CudePDF Writer")
Send("{ENTER}{TAB}{UP}{ENTER}{SPACE}{ENTER}{ENTER}")
Sleep(5000)
Run("C:\Install\converter.exe")
WinWaitActive("WinZip Self-Extractor - converter.exe")
Send("{ENTER}{ENTER}{ENTER}")

If GUICtrlRead($Checkbox6) = $GUI_CHECKED Then Run("C:\Windows\System32\cmd.exe")
WinWaitActive("Administrator: Eingabeaufforderung","",10)
Send('C:\Install\"dfsetup206.exe" /S')
Send("{ENTER}")
Sleep(500)
Send('exit')
Send("{ENTER}")

If GUICtrlRead($Checkbox7) = $GUI_CHECKED Then Run("C:\Windows\System32\cmd.exe")
WinWaitActive("Administrator: Eingabeaufforderung","",10)
Send('C:\Install\"Firefox Setup 6.0.exe" /S')
Send("{ENTER}")
Sleep(500)
Send('exit')
Send("{ENTER}")

If GUICtrlRead($Checkbox8) = $GUI_CHECKED Then Run("C:\Install\FoxitReader431_enu_Setup.exe")
WinWaitActive("Foxit Reader Install Wizard","",10)
Send("{ENTER}{SPACE}{TAB}{TAB}{ENTER}{SPACE}{TAB}{SPACE}{TAB}{TAB}{ENTER}{SPACE}{SPACE}{ENTER}{ENTER}")
Sleep(10000)
Send("{SPACE}{ENTER}")

If GUICtrlRead($Checkbox9) = $GUI_CHECKED Then Run("C:\Install\hcf.exe")
WinWaitActive("Hardcopy Installation","",10)

If GUICtrlRead($Checkbox10) = $GUI_CHECKED Then Run("C:\Install\install_flash_player.exe")

If GUICtrlRead($Checkbox11) = $GUI_CHECKED Then Run("C:\Install\iview427_setup.exe")
WinWaitActive("IrwanView Setup","",10)
Send("{ENTER}{ENTER}{ENTER}{TAB}{TAB}{TAB}{TAB}{SPACE}{TAB}{TAB}{ENTER}{SPACE}{ENTER}{ENTER}")
Run("C:\Install\irfanview_plugins_427_setup.exe")
Send("{ENTER}{ENTER}{ENTER}{ENTER}{ENTER}")

If GUICtrlRead($Checkbox12) = $GUI_CHECKED Then Run("C:\Install\OOo_3.3.0_Win_x86_install-wJRE_de.exe")
WinWaitActive("OpenOffice.org 3.3 Installationsvorbereitung","",10)
Send("{ENTER}")
Sleep(8000)
Send("{ENTER}")

If GUICtrlRead($Checkbox13) = $GUI_CHECKED Then Run("C:\Install\Paint.NET.3.36.exe")
WinWaitActive("Paint.NET v3.36","",10)
Send("{ENTER}{!S}")

If GUICtrlRead($Checkbox14) = $GUI_CHECKED Then Run("C:\Windows\System32\cmd.exe")
WinWaitActive("Administrator: Eingabeaufforderung","",10)
Send('C:\Install\"dfsetup206.exe" /S')
Send("{ENTER}")
Sleep(500)
Send('exit')
Send("{ENTER}")

If GUICtrlRead($Checkbox15) = $GUI_CHECKED Then Run("C:\Windows\System32\cmd.exe")
WinWaitActive("Administrator: Eingabeaufforderung","",10)
Send('C:\Install\"dfsetup206.exe" /S')
Send("{ENTER}")
Sleep(500)
Send('exit')
Send("{ENTER}")

If GUICtrlRead($Checkbox16) = $GUI_CHECKED Then Run("C:\Windows\System32\cmd.exe")
WinWaitActive("Administrator: Eingabeaufforderung","",10)
Send('C:\Install\"dfsetup206.exe" /S')
Send("{ENTER}")
Sleep(500)
Send('exit')
Send("{ENTER}")

If GUICtrlRead($Checkbox17) = $GUI_CHECKED Then Run("C:\Windows\System32\cmd.exe")
WinWaitActive("Administrator: Eingabeaufforderung","",10)
Send('C:\Install\"dfsetup206.exe" /S')
Send("{ENTER}")
Sleep(500)
Send('exit')
Send("{ENTER}")

If GUICtrlRead($Checkbox18) = $GUI_CHECKED Then Run("C:\Windows\System32\cmd.exe")
WinWaitActive("Administrator: Eingabeaufforderung","",10)
Send('C:\Install\"dfsetup206.exe" /S')
Send("{ENTER}")
Sleep(500)
Send('exit')
Send("{ENTER}")

If GUICtrlRead($Checkbox19) = $GUI_CHECKED Then Run("C:\Windows\System32\cmd.exe")
WinWaitActive("Administrator: Eingabeaufforderung","",10)
Send('C:\Install\"dfsetup206.exe" /S')
Send("{ENTER}")
Sleep(500)
Send('exit')
Send("{ENTER}")

Case $Abbrechen;für den fall das abbrechen gedrückt wird exit das programm
Exit

Case $Alle;alle checkboxen werden makiert
GUICtrlSetState($Checkbox1, $GUI_CHECKED)
GUICtrlSetState($Checkbox2, $GUI_CHECKED)
GUICtrlSetState($Checkbox3, $GUI_CHECKED)
GUICtrlSetState($Checkbox4, $GUI_CHECKED)
GUICtrlSetState($Checkbox5, $GUI_CHECKED)
GUICtrlSetState($Checkbox6, $GUI_CHECKED)
GUICtrlSetState($Checkbox7, $GUI_CHECKED)
GUICtrlSetState($Checkbox8, $GUI_CHECKED)
GUICtrlSetState($Checkbox9, $GUI_CHECKED)
GUICtrlSetState($Checkbox10, $GUI_CHECKED)
GUICtrlSetState($Checkbox11, $GUI_CHECKED)
GUICtrlSetState($Checkbox12, $GUI_CHECKED)
GUICtrlSetState($Checkbox13, $GUI_CHECKED)
GUICtrlSetState($Checkbox14, $GUI_CHECKED)
GUICtrlSetState($Checkbox15, $GUI_CHECKED)
GUICtrlSetState($Checkbox16, $GUI_CHECKED)
GUICtrlSetState($Checkbox17, $GUI_CHECKED)
GUICtrlSetState($Checkbox18, $GUI_CHECKED)
GUICtrlSetState($Checkbox19, $GUI_CHECKED)

EndSwitch
WEnd

Schnacko

@skull693..
Man kann in einem Spoiler auch einen AutoIt-Quellcode hineinschreiben...
Dadurch wird es übersichtlicher..

RR04

Hi Jonathan,

hier ein Beispiel:

[autoit]

Global $ar[3], $tate = 4
Opt("GUIOnEventMode", 1)
GUICreate('All On/Off')
GUISetOnEvent(-3, "_exit")
$ar[0] = GUICtrlCreateCheckbox("hello", 20, 4)
GUICtrlSetState(-1, 4)
$ar[1] = GUICtrlCreateCheckbox("world", 20, 40)
GUICtrlSetState(-1, 4)
$ar[2] = GUICtrlCreateCheckbox("universe", 20, 70)
GUICtrlSetState(-1, 4)
$bn = GUICtrlCreateButton('All On/Off', 20, 300, 75, 22)
GUICtrlSetOnEvent(-1, "_ckb")
GUISetState()

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

While Sleep(100)
WEnd

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

Func _ckb()
$tate = BitXOR($tate, 4, 1)
For $i = 0 To 2
GUICtrlSetState($ar[$i], $tate)
Next
EndFunc ;==>_SelectAll

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

Func _exit()
Exit
EndFunc ;==>_exit

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

; Ende

[/autoit]

skull693

Danke problem ist schon gelöst irgendwie funktioniert das mit dem aotit nicht bin aber auch neu

Spoiler anzeigen

#cs ----------------------------------------------------------------------------

AutoIt Version: 3.3.6.1
Author: myName

Script Function:
Template AutoIt script.

#ce ----------------------------------------------------------------------------

; Script Start - Add your code below here

#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
;========================Includieren der Dateien===========================================
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 615, 438, 192, 124);erstellt die GUI
$Checkbox1 = GUICtrlCreateCheckbox("7 Zip", 120, 60, 97, 17);erstellt die Checkbox
$Checkbox2 = GUICtrlCreateCheckbox("Adobe Reader", 120, 80, 97, 17)
$Checkbox3 = GUICtrlCreateCheckbox("Antivir", 120, 100, 97, 17)
$Checkbox4 = GUICtrlCreateCheckbox("CCleaner", 120, 120, 97, 17)
$Checkbox5 = GUICtrlCreateCheckbox("Cute Writer", 120, 140, 97, 17)
$Checkbox6 = GUICtrlCreateCheckbox("Defraggler", 120, 160, 97, 17)
$Checkbox7 = GUICtrlCreateCheckbox("Firefox", 120, 180, 97, 17)
$Checkbox8 = GUICtrlCreateCheckbox("Foxit Reader", 120, 200, 97, 17)
$Checkbox9 = GUICtrlCreateCheckbox("Hcf(Manuel)", 120, 240, 97, 17)
$Checkbox10 = GUICtrlCreateCheckbox("Flash Player(manual)", 120, 220, 97, 17)
$Checkbox11 = GUICtrlCreateCheckbox("Irwan View", 120, 260, 97, 17)
$Checkbox12 = GUICtrlCreateCheckbox("Open Office", 120, 280, 97, 17)
$Checkbox13 = GUICtrlCreateCheckbox("Paint", 120, 300, 97, 17)
$Checkbox14 = GUICtrlCreateCheckbox("Unicarplus Zls", 240, 100, 97, 17)
$Checkbox15 = GUICtrlCreateCheckbox("Total Commander", 240, 60, 97, 17)
$Checkbox16 = GUICtrlCreateCheckbox("Teamviewer", 240, 80, 97, 17)
$Checkbox17 = GUICtrlCreateCheckbox("Thunderbird", 120, 320, 97, 17)
$Checkbox18 = GUICtrlCreateCheckbox("UltraVNC 32Bit", 240, 120, 97, 17)
$Checkbox19 = GUICtrlCreateCheckbox("UltraVNC 64Bit", 240, 140, 97, 17)
$Okay = GUICtrlCreateButton("Okay", 328, 360, 129, 41);erstellt einen okay button
$Abbrechen = GUICtrlCreateButton("Abbrechen", 456, 360, 129, 41)
$Label1 = GUICtrlCreateLabel("Was wollen Sie Installieren?", 216, 24, 136, 17);überschrift
$Alle = GUICtrlCreateButton("Alle", 200, 360, 129, 41)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
$nMsg = GUIGetMsg()
Switch $nMsg

Case $GUI_EVENT_CLOSE;stellt das X button da
Exit

Case $Okay ; für denn fall falls Okay geklickt wird
If GUICtrlRead($Checkbox1) = $GUI_CHECKED Then
Run("C:\Windows\System32\cmd.exe")
WinWaitActive("Administrator: Eingabeaufforderung", "", 10)
Send('C:\Install\"7z920.exe" /S')
Send("{ENTER}")
Sleep(500)
Send('exit')
Send("{ENTER}")
EndIf

If GUICtrlRead($Checkbox2) = $GUI_CHECKED Then
Run("C:\Install\AdbeRdr1001_de_DE.exe")
Sleep(20000)
Send("{TAB}{TAB}{ENTER}")
Sleep(100000)
Send("{ENTER}")
EndIf

If GUICtrlRead($Checkbox3) = $GUI_CHECKED Then
Run("C:\Windows\System32\cmd.exe")
WinWaitActive("Administrator: Eingabeaufforderung","",10)
Send('C:\Install\"avira_antivir_personal_de.exe" /SILENT @NO_SCAN')
Send("{ENTER}")
Sleep(5000)
Send('exit')
Send("{ENTER}")
EndIf

If GUICtrlRead($Checkbox4) = $GUI_CHECKED Then
Run("C:\Windows\System32\cmd.exe")
WinWaitActive("Administrator: Eingabeaufforderung","",10)
Send('C:\Install\"ccsetup309.exe" /S')
Send("{ENTER}")
Sleep(500)
Send('exit')
Send("{ENTER}")
EndIf

If GUICtrlRead($Checkbox5) = $GUI_CHECKED Then
Run("C:\Install\CuteWriter.exe")
WinWaitActive("Setup - CudePDF Writer")
Send("{ENTER}{TAB}{UP}{ENTER}{SPACE}{ENTER}{ENTER}")
Sleep(5000)
Run("C:\Install\converter.exe")
WinWaitActive("WinZip Self-Extractor - converter.exe")
Send("{ENTER}{ENTER}{ENTER}")
EndIf

If GUICtrlRead($Checkbox6) = $GUI_CHECKED Then
Run("C:\Windows\System32\cmd.exe")
WinWaitActive("Administrator: Eingabeaufforderung","",10)
Send('C:\Install\"dfsetup206.exe" /S')
Send("{ENTER}")
Sleep(500)
Send('exit')
Send("{ENTER}")
EndIf