[..] GUI avec sélection de checkbox pour un menu d'install

[izarra64]

[..]
Bonjour,

Depuis peu engouffré dans AutoIT qui me surprend chaque jour, j'avais gardé sous le coude un script récupéré dans une version précédente de AutoIT (3.2 je crois), ce script illustre parfaitement ce que j'essayes de faire.
proposer sous forme de CheckBox quelles applications installer, puis après le choix, lancement de l'install de toutes les applis choisies.
J'essayais de bien le comprendre afin d'en modifier le contenu, mais je m'aperçois qu'il y a quelque chose qui cloche : en effet, tous les Check sont à 1 et l'install tente d'installer toutes les applis! sans tenir compte des choix effectués.
Pourriez vous me dire si quelque chose vous saute aux yeux qui en explique le fonctionnement incorrect ?

A défaut, ou peut être plus simple, si vous pouviez me donner un exemple de script permettant de choisir parmi 5 applications, lesquelles on souhaite installer après avoir sélectionné la checkbox de chacun d'eux !

Merci infiniment !

► Afficher le texte

#include <GUIConstantsEx.au3>
#include <Array.au3>
Opt("GUIOnEventMode", 1)


;Declaration de l'array principale!!!
Dim $a_installer[42][2]=[["", ""], ["0", "7zip.exe"], ["0", "autoit.exe"], ["0", "Aveicon2.exe"], ["0", "camstudio.exe"], ["0",

"camstudiocodec"], ["0", "ccleaner.exe"], ["0", "cobianbackup.exe"], ["0", "dialafix.exe"], ["0", "Firefox.exe"], ["0",

"flashmozilla.exe"], ["0", "flashie.exe"], ["0", "Foxit Reader.exe"], ["0", "fullsync.exe"], ["0", "gimp.exe"], ["0", "Ipscan.exe"],

["0", "Java.exe"], ["0", "lupasrename.exe"], ["0", "magicip.exe"], ["0", "norton.exe"], ["0", "nx.exe"], ["0", "OOo.exe"], ["0",

"pcinspector.exe"], ["0", "pdfcreator.exe"], ["0", "Photofiltre.exe"], ["0", "putty.exe"], ["0", "R.exe"], ["0", "replisting.exe"],

["0", "supercopieur.exe"], ["0", "superscan.exe"], ["0", "Texmaker.exe"], ["0", "Thunderbird.exe"], ["0",

"TightVNC_Utilisateurs.exe"], ["0", "TightVNC_Administrateur.exe"], ["0", "UltraVNC_Utilisateurs.exe"], ["0",

"UltraVNC_Administrateur.exe"], ["0", "vlc.exe"], ["0", "vsoimageresizer.exe"], ["0", "W2pp.exe"], ["0", "WireShark.exe"], ["0",

"xming.exe"], ["0", "xmingfonts.exe"]]
; Si il y a plus de checkbox, remplacer le 42 par : (nombre de checkbox + 1)


;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
; Parametres globaux de l'interface graphique (cadre entier) ;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

$gui = GUICreate(" Selectionner les logiciels à installer ", 750, 554)
GUISetOnEvent($GUI_EVENT_CLOSE, "SpecialEvents")
GUISetOnEvent($GUI_EVENT_MINIMIZE, "SpecialEvents")
GUISetOnEvent($GUI_EVENT_RESTORE, "SpecialEvents")


;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
; Placement et nom des boutons "Installer", "Quitter" et "Documentation" ;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

$installer = GUICtrlCreateButton(" Installer ", 656, 512, 75, 25, 0)
GUICtrlSetOnEvent( -1,"install")
$quitter = GUICtrlCreateButton(" Quitter ", 560, 512, 75, 25, 0)
GUICtrlSetOnEvent( -1,"SpecialEvents")
$documentation = GUICtrlCreateButton(" Documentation ", 8, 512, 91, 25, 0)
GUICtrlSetOnEvent( -1,"documentation")

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
; Placement et nom de la checkbox (cases à cocher) pour tout selectionner ;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

$checkall = GUICtrlCreateCheckbox ("Tout Cocher / Tout Décocher" , 104, 472, 177, 17 )
GUICtrlSetOnEvent( -1,"allcheck")

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
; Placement et nom de la checkbox (cases à cocher) pour tous les logiciels communs ;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

$checkcommun = GUICtrlCreateCheckbox("Selectionner les logiciels communs", 408, 472, 209, 17)
GUICtrlSetOnEvent( -1,"allcommun")

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
; Placement et nom des CheckBox (cases à cocher) pour chaque logiciels ;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

$check1 = GUICtrlCreateCheckbox("7Zip", 8, 30, 97, 17)
GUICtrlSetOnEvent( -1,"checkbox")
$check2 = GUICtrlCreateCheckbox("AutoIt", 8, 60, 97, 17)
GUICtrlSetOnEvent( -1,"checkbox")
$check3 = GUICtrlCreateCheckbox("AveIcon 2", 8, 90, 97, 17)
GUICtrlSetOnEvent( -1,"checkbox")
$check4 = GUICtrlCreateCheckbox("Camstudio", 8, 120, 97, 17)
GUICtrlSetOnEvent( -1,"checkbox")
$check5 = GUICtrlCreateCheckbox("Codec Camstudio", 8, 150, 121, 17)
GUICtrlSetOnEvent( -1,"checkbox")
$check6 = GUICtrlCreateCheckbox("CCleaner", 8, 180, 97, 17)
GUICtrlSetOnEvent( -1,"checkbox")
$check7 = GUICtrlCreateCheckbox("Cobian Backup", 8, 210, 97, 17)
GUICtrlSetOnEvent( -1,"checkbox")
$check8 = GUICtrlCreateCheckbox("Dial A Fix", 8, 240, 97, 17)
GUICtrlSetOnEvent( -1,"checkbox")
$check9 = GUICtrlCreateCheckbox("Firefox", 8, 270, 97, 17)
GUICtrlSetOnEvent( -1,"checkbox")
$check10 = GUICtrlCreateCheckbox("Flash Internet Explorer", 8, 300, 137, 17)
GUICtrlSetOnEvent( -1,"checkbox")
$check11 = GUICtrlCreateCheckbox("Flash Mozilla", 8, 330, 97, 17)
GUICtrlSetOnEvent( -1,"checkbox")
$check12 = GUICtrlCreateCheckbox("Foxit Reader", 8, 360, 97, 17)
GUICtrlSetOnEvent( -1,"checkbox")
$check13 = GUICtrlCreateCheckbox("Full Sync", 8, 390, 97, 17)
GUICtrlSetOnEvent( -1,"checkbox")
$check14 = GUICtrlCreateCheckbox("The Gimp", 8, 420, 97, 17)
GUICtrlSetOnEvent( -1,"checkbox")
$check15 = GUICtrlCreateCheckbox("IP Scan", 288, 30, 97, 17)
GUICtrlSetOnEvent( -1,"checkbox")
$check16 = GUICtrlCreateCheckbox("Java", 288, 60, 97, 17)
GUICtrlSetOnEvent( -1,"checkbox")
$check17 = GUICtrlCreateCheckbox("Lupas Rename", 288, 90, 97, 17)
GUICtrlSetOnEvent( -1,"checkbox")
$check18 = GUICtrlCreateCheckbox("Magic IP", 288, 120, 97, 17)
GUICtrlSetOnEvent( -1,"checkbox")
$check19 = GUICtrlCreateCheckbox("Norton antivirus", 288, 150, 97, 17)
GUICtrlSetOnEvent( -1,"checkbox")
$check20 = GUICtrlCreateCheckbox("NX", 288, 180, 97, 17)
GUICtrlSetOnEvent( -1,"checkbox")
$check21 = GUICtrlCreateCheckbox("Open Office", 288, 210, 97, 17)
GUICtrlSetOnEvent( -1,"checkbox")
$check22 = GUICtrlCreateCheckbox("PC Inspector File Recovery", 288, 240, 153, 17)
GUICtrlSetOnEvent( -1,"checkbox")
$check23 = GUICtrlCreateCheckbox("PDF Creator", 288, 270, 97, 17)
GUICtrlSetOnEvent( -1,"checkbox")
$check24 = GUICtrlCreateCheckbox("Photofiltre", 288, 300, 97, 17)
GUICtrlSetOnEvent( -1,"checkbox")
$check25 = GUICtrlCreateCheckbox("Putty SSH", 288, 330, 89, 17)
GUICtrlSetOnEvent( -1,"checkbox")
$check26 = GUICtrlCreateCheckbox("R", 288, 360, 97, 17)
GUICtrlSetOnEvent( -1,"checkbox")
$check27 = GUICtrlCreateCheckbox("Rep Listing", 288, 390, 97, 17)
GUICtrlSetOnEvent( -1,"checkbox")
$check28 = GUICtrlCreateCheckbox("Super Copier", 288, 420, 97, 17)
GUICtrlSetOnEvent( -1,"checkbox")
$check29 = GUICtrlCreateCheckbox("Super Scan", 556, 30, 97, 17)
GUICtrlSetOnEvent( -1,"checkbox")
$check30 = GUICtrlCreateCheckbox("Tex Maker", 556, 60, 97, 17)
GUICtrlSetOnEvent( -1,"checkbox")
$check31 = GUICtrlCreateCheckbox("Thunderbird", 556, 90, 97, 17)
GUICtrlSetOnEvent( -1,"checkbox")
$check32 = GUICtrlCreateCheckbox("TightVNC Utilisateurs", 556, 120, 121, 17)
GUICtrlSetOnEvent( -1,"checkbox")
$check33 = GUICtrlCreateCheckbox("TightVNC administrateur", 556, 150, 153, 17)
GUICtrlSetOnEvent( -1,"checkbox")
$check34 = GUICtrlCreateCheckbox("Ultr@VNC Utilisateurs", 556, 180, 137, 17)
GUICtrlSetOnEvent( -1,"checkbox")
$check35 = GUICtrlCreateCheckbox("Ultr@VNC Administrateurs", 556, 210, 145, 17)
GUICtrlSetOnEvent( -1,"checkbox")
$check36 = GUICtrlCreateCheckbox("VLC", 556, 240, 97, 17)
GUICtrlSetOnEvent( -1,"checkbox")
$check37 = GUICtrlCreateCheckbox("VSO Image Resizer", 556, 270, 137, 17)
GUICtrlSetOnEvent( -1,"checkbox")
$check38 = GUICtrlCreateCheckbox("Win2000 Plain Password", 556, 300, 145, 17)
GUICtrlSetOnEvent( -1,"checkbox")
$check39 = GUICtrlCreateCheckbox("WireShark", 556, 330, 97, 17)
GUICtrlSetOnEvent( -1,"checkbox")
$check40 = GUICtrlCreateCheckbox("XMing", 556, 360, 97, 17)
GUICtrlSetOnEvent( -1,"checkbox")
$check41 = GUICtrlCreateCheckbox("XMing fonts", 556, 390, 97, 17)
GUICtrlSetOnEvent( -1,"checkbox")
GuiSetState ( )

While 1;Boucle infinie
Sleep(100)
WEnd

;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;; LES FONCTIONS ;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
; La fonction "documentation" ;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;


Func documentation()
Run( @ScriptDir &"\Data\infolog\help.html")

EndFunc

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
; La fonction "checkbox" ;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

Func checkbox()
Switch @GUI_CtrlId
Case $check1
If _Ischecked($check1) then
$a_installer[1][0] = "1"
Else
$a_installer[1][0] = "0"
EndIf
Case $check2
If _Ischecked($check2) then
$a_installer[2][0] = "1"
Else
$a_installer[2][0] = "0"
EndIf
Case $check3
If _Ischecked($check3) then
$a_installer[3][0] = "1"
Else
$a_installer[3][0] = "0"
EndIf
Case $check4
If _Ischecked($check4) then
$a_installer[4][0] = "1"
Else
$a_installer[4][0] = "0"
EndIf
Case $check5
If _Ischecked($check5) then
$a_installer[5][0] = "1"
Else
$a_installer[5][0] = "0"
EndIf
Case $check6
If _Ischecked($check6) then
$a_installer[6][0] = "1"
Else
$a_installer[6][0] = "0"
EndIf
Case $check7
If _Ischecked($check7) then
$a_installer[7][0] = "1"
Else
$a_installer[7][0] = "0"
EndIf
Case $check8
If _Ischecked($check8) then
$a_installer[8][0] = "1"
Else
$a_installer[8][0] = "0"
EndIf
Case $check9
If _Ischecked($check9) then
$a_installer[9][0] = "1"
Else
$a_installer[9][0] = "0"
EndIf
Case $check10
If _Ischecked($check10) then
$a_installer[10][0] = "1"
Else
$a_installer[10][0] = "0"
EndIf
Case $check11
If _Ischecked($check11) then
$a_installer[11][0] = "1"
Else
$a_installer[11][0] = "0"
EndIf
Case $check12
If _Ischecked($check12) then
$a_installer[12][0] = "1"
Else
$a_installer[12][0] = "0"
EndIf
Case $check13
If _Ischecked($check13) then
$a_installer[13][0] = "1"
Else
$a_installer[13][0] = "0"
EndIf
Case $check14
If _Ischecked($check14) then
$a_installer[14][0] = "1"
Else
$a_installer[14][0] = "0"
EndIf
Case $check15
If _Ischecked($check15) then
$a_installer[15][0] = "1"
Else
$a_installer[15][0] = "0"
EndIf
Case $check16
If _Ischecked($check16) then
$a_installer[16][0] = "1"
Else
$a_installer[16][0] = "0"
EndIf
Case $check17
If _Ischecked($check17) then
$a_installer[17][0] = "1"
Else
$a_installer[17][0] = "0"
EndIf
Case $check18
If _Ischecked($check18) then
$a_installer[18][0] = "1"
Else
$a_installer[18][0] = "0"
EndIf
Case $check19
If _Ischecked($check19) then
$a_installer[19][0] = "1"
Else
$a_installer[19][0] = "0"
EndIf
Case $check20
If _Ischecked($check20) then
$a_installer[20][0] = "1"
Else
$a_installer[20][0] = "0"
EndIf
Case $check21
If _Ischecked($check21) then
$a_installer[21][0] = "1"
Else
$a_installer[21][0] = "0"
EndIf
Case $check22
If _Ischecked($check22) then
$a_installer[22][0] = "1"
Else
$a_installer[22][0] = "0"
EndIf
Case $check23
If _Ischecked($check23) then
$a_installer[23][0] = "1"
Else
$a_installer[23][0] = "0"
EndIf
Case $check24
If _Ischecked($check24) then
$a_installer[24][0] = "1"
Else
$a_installer[24][0] = "0"
EndIf
Case $check25
If _Ischecked($check25) then
$a_installer[25][0] = "1"
Else
$a_installer[25][0] = "0"
EndIf
Case $check26
If _Ischecked($check26) then
$a_installer[26][0] = "1"
Else
$a_installer[26][0] = "0"
EndIf
Case $check27
If _Ischecked($check27) then
$a_installer[27][0] = "1"
Else
$a_installer[27][0] = "0"
EndIf
Case $check28
If _Ischecked($check28) then
$a_installer[28][0] = "1"
Else
$a_installer[28][0] = "0"
EndIf
Case $check29
If _Ischecked($check29) then
$a_installer[29][0] = "1"
Else
$a_installer[29][0] = "0"
EndIf
Case $check30
If _Ischecked($check30) then
$a_installer[30][0] = "1"
Else
$a_installer[30][0] = "0"
EndIf
Case $check31
If _Ischecked($check31) then
$a_installer[31][0] = "1"
Else
$a_installer[31][0] = "0"
EndIf
Case $check32
If _Ischecked($check32) then
$a_installer[32][0] = "1"
Else
$a_installer[32][0] = "0"
EndIf
Case $check33
If _Ischecked($check33) then
$a_installer[33][0] = "1"
Else
$a_installer[33][0] = "0"
EndIf
Case $check34
If _Ischecked($check34) then
$a_installer[34][0] = "1"
Else
$a_installer[34][0] = "0"
EndIf
Case $check35
If _Ischecked($check35) then
$a_installer[35][0] = "1"
Else
$a_installer[35][0] = "0"
EndIf
Case $check36
If _Ischecked($check36) then
$a_installer[36][0] = "1"
Else
$a_installer[36][0] = "0"
EndIf
Case $check37
If _Ischecked($check37) then
$a_installer[37][0] = "1"
Else
$a_installer[37][0] = "0"
EndIf
Case $check38
If _Ischecked($check38) then
$a_installer[38][0] = "1"
Else
$a_installer[38][0] = "0"
EndIf
Case $check39
If _Ischecked($check39) then
$a_installer[39][0] = "1"
Else
$a_installer[39][0] = "0"
EndIf
Case $check40
If _Ischecked($check40) then
$a_installer[40][0] = "1"
Else
$a_installer[40][0] = "0"
EndIf
Case $check41
If _Ischecked($check41) then
$a_installer[41][0] = "1"
Else
$a_installer[41][0] = "0"
EndIf

EndSwitch

EndFunc


;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
; La fonction "allcheck" ;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;


Func allcheck()
If _Ischecked($checkall) Then
Local $i
GUICtrlSetState($check1,$GUI_CHECKED)
GUICtrlSetState($check2,$GUI_CHECKED)
GUICtrlSetState($check3,$GUI_CHECKED)
GUICtrlSetState($check4,$GUI_CHECKED)
GUICtrlSetState($check5,$GUI_CHECKED)
GUICtrlSetState($check6,$GUI_CHECKED)
GUICtrlSetState($check7,$GUI_CHECKED)
GUICtrlSetState($check8,$GUI_CHECKED)
GUICtrlSetState($check9,$GUI_CHECKED)
GUICtrlSetState($check10,$GUI_CHECKED)
GUICtrlSetState($check11,$GUI_CHECKED)
GUICtrlSetState($check12,$GUI_CHECKED)
GUICtrlSetState($check13,$GUI_CHECKED)
GUICtrlSetState($check14,$GUI_CHECKED)
GUICtrlSetState($check15,$GUI_CHECKED)
GUICtrlSetState($check16,$GUI_CHECKED)
GUICtrlSetState($check17,$GUI_CHECKED)
GUICtrlSetState($check18,$GUI_CHECKED)
GUICtrlSetState($check19,$GUI_CHECKED)
GUICtrlSetState($check20,$GUI_CHECKED)
GUICtrlSetState($check21,$GUI_CHECKED)
GUICtrlSetState($check22,$GUI_CHECKED)
GUICtrlSetState($check23,$GUI_CHECKED)
GUICtrlSetState($check24,$GUI_CHECKED)
GUICtrlSetState($check25,$GUI_CHECKED)
GUICtrlSetState($check26,$GUI_CHECKED)
GUICtrlSetState($check27,$GUI_CHECKED)
GUICtrlSetState($check28,$GUI_CHECKED)
GUICtrlSetState($check29,$GUI_CHECKED)
GUICtrlSetState($check30,$GUI_CHECKED)
GUICtrlSetState($check31,$GUI_CHECKED)
GUICtrlSetState($check32,$GUI_CHECKED)
GUICtrlSetState($check33,$GUI_CHECKED)
GUICtrlSetState($check34,$GUI_CHECKED)
GUICtrlSetState($check35,$GUI_CHECKED)
GUICtrlSetState($check36,$GUI_CHECKED)
GUICtrlSetState($check37,$GUI_CHECKED)
GUICtrlSetState($check38,$GUI_CHECKED)
GUICtrlSetState($check39,$GUI_CHECKED)
GUICtrlSetState($check40,$GUI_CHECKED)
GUICtrlSetState($check41,$GUI_CHECKED)

For $i = 1 to Ubound($a_installer) - 1
$a_installer[$i][0] = "1"
Next
Else
Local $i

GUICtrlSetState($check1,$GUI_UNCHECKED)
GUICtrlSetState($check2,$GUI_UNCHECKED)
GUICtrlSetState($check3,$GUI_UNCHECKED)
GUICtrlSetState($check4,$GUI_UNCHECKED)
GUICtrlSetState($check5,$GUI_UNCHECKED)
GUICtrlSetState($check6,$GUI_UNCHECKED)
GUICtrlSetState($check7,$GUI_UNCHECKED)
GUICtrlSetState($check8,$GUI_UNCHECKED)
GUICtrlSetState($check9,$GUI_UNCHECKED)
GUICtrlSetState($check10,$GUI_UNCHECKED)
GUICtrlSetState($check11,$GUI_UNCHECKED)
GUICtrlSetState($check12,$GUI_UNCHECKED)
GUICtrlSetState($check13,$GUI_UNCHECKED)
GUICtrlSetState($check14,$GUI_UNCHECKED)
GUICtrlSetState($check15,$GUI_UNCHECKED)
GUICtrlSetState($check16,$GUI_UNCHECKED)
GUICtrlSetState($check17,$GUI_UNCHECKED)
GUICtrlSetState($check18,$GUI_UNCHECKED)
GUICtrlSetState($check19,$GUI_UNCHECKED)
GUICtrlSetState($check20,$GUI_UNCHECKED)
GUICtrlSetState($check21,$GUI_UNCHECKED)
GUICtrlSetState($check22,$GUI_UNCHECKED)
GUICtrlSetState($check23,$GUI_UNCHECKED)
GUICtrlSetState($check24,$GUI_UNCHECKED)
GUICtrlSetState($check25,$GUI_UNCHECKED)
GUICtrlSetState($check26,$GUI_UNCHECKED)
GUICtrlSetState($check27,$GUI_UNCHECKED)
GUICtrlSetState($check28,$GUI_UNCHECKED)
GUICtrlSetState($check29,$GUI_UNCHECKED)
GUICtrlSetState($check30,$GUI_UNCHECKED)
GUICtrlSetState($check31,$GUI_UNCHECKED)
GUICtrlSetState($check32,$GUI_UNCHECKED)
GUICtrlSetState($check33,$GUI_UNCHECKED)
GUICtrlSetState($check34,$GUI_UNCHECKED)
GUICtrlSetState($check35,$GUI_UNCHECKED)
GUICtrlSetState($check36,$GUI_UNCHECKED)
GUICtrlSetState($check37,$GUI_UNCHECKED)
GUICtrlSetState($check38,$GUI_UNCHECKED)
GUICtrlSetState($check39,$GUI_UNCHECKED)
GUICtrlSetState($check40,$GUI_UNCHECKED)
GUICtrlSetState($check41,$GUI_UNCHECKED)

For $i = 1 to Ubound($a_installer) - 1
$a_installer[$i][0] = "0"
Next

EndIf
EndFunc

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
; La fonction "allcommun" ;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

Func allcommun()
If _Ischecked($checkcommun) Then
Local $i
GUICtrlSetState($check1,$GUI_CHECKED)
GUICtrlSetState($check6,$GUI_CHECKED)
GUICtrlSetState($check7,$GUI_CHECKED)
GUICtrlSetState($check9,$GUI_CHECKED)
GUICtrlSetState($check10,$GUI_CHECKED)
GUICtrlSetState($check11,$GUI_CHECKED)
GUICtrlSetState($check12,$GUI_CHECKED)
GUICtrlSetState($check16,$GUI_CHECKED)
GUICtrlSetState($check19,$GUI_CHECKED)
GUICtrlSetState($check21,$GUI_CHECKED)
GUICtrlSetState($check22,$GUI_CHECKED)
GUICtrlSetState($check23,$GUI_CHECKED)
GUICtrlSetState($check24,$GUI_CHECKED)
GUICtrlSetState($check25,$GUI_CHECKED)
GUICtrlSetState($check31,$GUI_CHECKED)
GUICtrlSetState($check36,$GUI_CHECKED)
GUICtrlSetState($check38,$GUI_CHECKED)

For $i = 1 to Ubound($a_installer) - 1
$a_installer[$i][0] = "1"
Next
Else
Local $i

GUICtrlSetState($check1,$GUI_UNCHECKED)
GUICtrlSetState($check6,$GUI_UNCHECKED)
GUICtrlSetState($check7,$GUI_UNCHECKED)
GUICtrlSetState($check9,$GUI_UNCHECKED)
GUICtrlSetState($check10,$GUI_UNCHECKED)
GUICtrlSetState($check11,$GUI_UNCHECKED)
GUICtrlSetState($check12,$GUI_UNCHECKED)
GUICtrlSetState($check16,$GUI_UNCHECKED)
GUICtrlSetState($check19,$GUI_UNCHECKED)
GUICtrlSetState($check21,$GUI_UNCHECKED)
GUICtrlSetState($check22,$GUI_UNCHECKED)
GUICtrlSetState($check23,$GUI_UNCHECKED)
GUICtrlSetState($check24,$GUI_UNCHECKED)
GUICtrlSetState($check25,$GUI_UNCHECKED)
GUICtrlSetState($check31,$GUI_UNCHECKED)
GUICtrlSetState($check36,$GUI_UNCHECKED)
GUICtrlSetState($check38,$GUI_UNCHECKED)

For $i = 1 to Ubound($a_installer) - 1
$a_installer[$i][0] = "0"
Next

EndIf
EndFunc

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
; La fonction "install" ;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

Func install()
Local $i
_ArrayDisplay($a_installer)
For $i = 1 to Ubound($a_installer)-1
;If $a_installer[$i][0] = "1" then Run( @ScriptDir &"\Data\scripts\"&$a_installer[$i][1])
If $a_installer[$i][0] = "1" then SplashTextOn("Installation en cours ", $a_installer[$i][1], 200, 60, 500, 50, 0, "", 12)

Sleep(1000)
Next
EndFunc

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
; La fonction "SpecialEvents" ;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

Func SpecialEvents()
Select
Case @GUI_CtrlId = $GUI_EVENT_CLOSE or @GUI_CtrlId = $quitter
; MsgBox(0, "Close Pressed", "ID=" & @GUI_CtrlId & " WinHandle=" & @GUI_WinHandle)
Exit

Case @GUI_CtrlId = $GUI_EVENT_MINIMIZE
;MsgBox(0, "Window Minimized", "ID=" & @GUI_CtrlId & " WinHandle=" & @GUI_WinHandle)

Case @GUI_CtrlId = $GUI_EVENT_RESTORE
;MsgBox(0, "Window Restored", "ID=" & @GUI_CtrlId & " WinHandle=" & @GUI_WinHandle)

EndSelect
EndFunc ;==>SpecialEvents

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
; La fonction "Ischecked" ;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

Func _Ischecked($control)
Return BitAND(GUICtrlRead($control), $GUI_CHECKED) = $GUI_CHECKED
EndFunc ;==>_IsChecked

[FireFox]

Bonjour,
Bienvenue sur le forum autoit

En effet le code est très mal optimisé, <snipped> (ne pas heurter la sensibilité des plus jeunes)

Donc je t'ai concocté 2 exemples avec les 2 modes d'évènement GUI :

► Afficher le texte

Code : Tout sélectionner

#include <GUIConstantsEx.au3>

Opt("GUIOnEventMode", 1)

#region GUI
Global $GUI, $cbToto1, $cbToto2

$GUI = GUICreate("MyGUI")
GUISetOnEvent($GUI_EVENT_CLOSE, "_Exit")

$cbToto1 = GUICtrlCreateCheckbox("toto1", 10, 10)
GUICtrlSetOnEvent($cbToto1, "_toto1")

$cbToto2 = GUICtrlCreateCheckbox("toto2", 10, 30)
GUICtrlSetOnEvent($cbToto2, "_toto2")

GUISetState()
#endregion

While 1
    Sleep(1000)
WEnd

Func _toto1()
    Switch GUICtrlRead($cbToto1)
        Case $GUI_CHECKED
            ConsoleWrite("toto1 coché" & @CrLf)
        Case $GUI_UNCHECKED
            ConsoleWrite("toto1 décoché" & @CrLf)
    EndSwitch
EndFunc

Func _toto2()
    Local $iToto2checkstate = GUICtrlRead($cbToto2)

    If $iToto2checkstate = $GUI_CHECKED Then
            ConsoleWrite("toto2 coché" & @CrLf)
    ElseIf $iToto2checkstate = $GUI_UNCHECKED Then
            ConsoleWrite("toto2 décoché" & @CrLf)
    EndIf
EndFunc

Func _Exit()
    Exit
EndFunc
 

► Afficher le texte

Code : Tout sélectionner

#include <GUIConstantsEx.au3>

#region GUI
Global $GUI, $cbToto1, $cbToto2, $iMsg

$GUI = GUICreate("MyGUI")

$cbToto1 = GUICtrlCreateCheckbox("toto1", 10, 10)
GUICtrlSetOnEvent($cbToto1, "_toto1")

$cbToto2 = GUICtrlCreateCheckbox("toto2", 10, 30)
GUICtrlSetOnEvent($cbToto2, "_toto2")

GUISetState()
#endregion

While 1
    $iMsg = GUIGetMsg()

    Switch $iMsg
        Case $GUI_EVENT_CLOSE
            _Exit()
        Case $cbToto1
            _toto1()
        Case $cbToto2
            _toto2()
    EndSwitch

    Sleep(50)
WEnd

Func _toto1()
    Switch GUICtrlRead($cbToto1)
        Case $GUI_CHECKED
            ConsoleWrite("toto1 coché" & @CrLf)
        Case $GUI_UNCHECKED
            ConsoleWrite("toto1 décoché" & @CrLf)
    EndSwitch
EndFunc

Func _toto2()
    Local $iToto2checkstate = GUICtrlRead($cbToto2)

    If $iToto2checkstate = $GUI_CHECKED Then
            ConsoleWrite("toto2 coché" & @CrLf)
    ElseIf $iToto2checkstate = $GUI_UNCHECKED Then
            ConsoleWrite("toto2 décoché" & @CrLf)
    EndIf
EndFunc

Func _Exit()
    Exit
EndFunc
 

Cdlt, FireFox.

[mikell]

En effet le code est très mal optimisé, dégueulasse

Même si c'est vrai on est quand même prié de choisir un langage mesuré (les euphémismes sont autorisés)

[FireFox]

En effet le code est très mal optimisé, dégueulasse

Même si c'est vrai on est quand même prié de choisir un langage mesuré (les euphémismes sont autorisés)

Le script est d'une toute beauté médiévale

[mikell]

Bin voilà... c'est parfait ça, le second degré discrètement poétique

[izarra64]

Amis poêtes! Merci infiniment !
j'adore vos commentaires tout à fait appropriés !
désolé de n'avoir réagi plus tôt, mais j'étais en mission pendant une quinzaine et je n'ai pas pu lire que vous aviez déjà répondu!

Alors, je viens de tester les 2 codes que vous m'avez donné, mais je n'obtiens aucun résultat ??
j'ai bien l'affichage des 2 Box que l'on peut cocher ou non, mais il n'y a pas de bouton de validation. ?
du coup, je ne vois pas les commandes consolwrite ...
mais peut être aies oublié qq chose ?
pour info, autoit version 3.3.8.1
OS=Win7/sp1 64 bits

du coup, je me laisserai bien tenter par vous demnder la chose suivante !
pourriez vous m'adapter ce code qui me permettrait, pour toutes les checkbox cocher, de lancer une commande
Par exemple, après avoir cliqué sur un bouton 'VALIDER'
Si TOTO1 est coché, de lancer le fichier install.cmd qui se trouve dans le sous-dossier TOTO1
Si TOTO2 est coché, de lancer le fichier install.cmd qui se trouve dans le sous-dossier TOTO2
.....
Si TOTO30 est coché, de lancer le fichier install.cmd qui se trouve dans le sous-dossier TOTO30

etc...
en gros, je pourrais alors updater ce code pour y rajouter les 30 applications dont je me sers,
puis, au moyen des checkbox cochées, de lancer les install.cmd de chacun des sous dossiers

cerise sur le gateau, d'avoir une case à cocher pour que soient cochées automatiquement les choix TOTO1 et TOTO4 et TOTO5
et puis une autre pour TOTO2 et TOTO6 et TOTO10

merci chers Gurus !

[mikell]

Hum
Un script complet, OK mais ça c'est à poster dans la rubrique "demandes de script"

[izarra64]

OK Merci Mikell
comme je demandais surtout une méthode plutot qu'un script, c'est pour ça que je l'avais posté ici
je m'en vais de ce pa pster une demnde de script !
merci
bonne journéeeee !