[R] Suite de logiciel grace à une interface
Posté : mer. 10 juin 2009 14:54
par luffy43
Bonjour, je suis en 1er année de BTS info et dans le cadre de mon stage, je dois developper un logiciel permettant l'automatisation de l'installation d'un pack de programmes ( office 2003 , SAGE , ultra VNC , nod32 , ....).Pour cela j'ai repris l'interface (GUI) d'une personne sur internet et cela fonctionne à merveille.Mais par contre il ya un gros probléme qui est le suivant : tout les programmes s'installent en même temps et donc si je coche 30 checkbox sur mon interface les 30 programmes s'installent en même temps se qui bien sur fait beuger le PC.Il faudrait donc que je trouve une solution qui me permette d'installer les programmes à la suite et non pas en même temps.Voila j'ai donc besoin de votre aide.
Voici le code :
Voici le code :
► Afficher le texte
Code : Tout sélectionner
#cs ----------------------------------------------------------------------------
AutoIt Version: 3.3.0.0
Author: myName
Script Function:
Template AutoIt script.
#ce ----------------------------------------------------------------------------
; Script Start - Add your code below here
#include <GUIConstantsEx.au3>
#include <Array.au3>
Opt("GUIOnEventMode", 1)
;Declaration de l'array principale!!!
Dim $a_installer[42][2]=[["", ""], ["0", "Adobe Acrobat.exe"], ["0", "AutoIt.exe"], ["0", "AveIcon2.exe"], ["0", "Camstudio.exe"], ["0", "Codec_Camstudio"], ["0", "CCleaner.exe"], ["0", "Cobian_Backup.exe"], ["0", "Dial_A_Fix.exe"], ["0", "Firefox.exe"], ["0", "Flash_Mozilla.exe"], ["0", "Flash_IE.exe"], ["0", "SAGE-budget.exe"], ["0", "Full_Sync.exe"], ["0", "The_Gimp.exe"], ["0", "IP_Scan.exe"], ["0", "Java.exe"], ["0", "Lupas_Rename.exe"], ["0", "Magic_IP.exe"], ["0", "Norton_Antivirus.exe"], ["0", "NotePad.exe"], ["0", "NX.exe"], ["0", "SAGE-création.exe"], ["0", "PC_Inspector_File_Recovery.exe"], ["0", "SAGE-évaluation.exe"], ["0", "Photofiltre.exe"], ["0", "Putty_SSH.exe"], ["0", "R.exe"], ["0", "Rep_Listing.exe"], ["0", "Super_Copier.exe"], ["0", "Super_Scan.exe"], ["0", ""], ["0", "Thunderbird.exe"], ["0", "TightVNC.exe"], ["0", "UltraVNC.exe"], ["0", "VLC.exe"], ["0", "VSo_Image_Resizer.exe"], ["0", "Win2000_Plain_Password.exe"], ["0", "WireShark.exe"], ["0", "XMing.exe"], ["0", "XMing_fonts.exe"], ["0", "SciLab.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(" Gimac Software Installer V 1.0 ", 751, 666, 300, 37)
GUISetIcon("Data\autorun.ico")
GUISetOnEvent($GUI_EVENT_CLOSE, "quitter")
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
; Placement et nom des boutons "Installer", "Quitter", "Documentation" et "A propos" ;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
$installer = GUICtrlCreateButton(" Installer ", 664, 632, 75, 25, 0)
GUICtrlSetOnEvent( -1,"install")
$quitter = GUICtrlCreateButton(" Quitter ", 576, 632, 75, 25, 0)
GUICtrlSetOnEvent( -1,"quitter")
$documentation = GUICtrlCreateButton(" a propos ", 8, 632, 83, 25, 0)
GUICtrlSetOnEvent( -1,"documentation")
;$apropos = GUICtrlCreateButton("A propos", 696, 576, 51, 25, 0)
;GUICtrlSetOnEvent( -1,"apropos")
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
; Placement et nom de la checkbox (cases à cocher) pour tout selectionner ;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
$checkall = GUICtrlCreateCheckbox("Tout cocher / Tout décoher", 104, 584, 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, 584, 209, 17)
;GUICtrlSetOnEvent( -1,"allcommun")
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
; Placement et nom des CheckBox (cases à cocher) pour chaque logiciels ;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
$Group7 = GUICtrlCreateGroup("Programmation", -4, 448, 245, 105)
$check2 = GUICtrlCreateCheckbox("AutoIt", 16, 480, 97, 17)
GUICtrlSetOnEvent( -1,"checkbox")
$check20 = GUICtrlCreateCheckbox("NotePad", 16, 510, 97, 17)
GUICtrlSetOnEvent( -1,"checkbox")
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Group1 = GUICtrlCreateGroup("Sécurité", 0, 0, 245, 89)
$check7 = GUICtrlCreateCheckbox("Cobian Backup", 16, 60, 97, 17)
GUICtrlSetOnEvent( -1,"checkbox")
$check19 = GUICtrlCreateCheckbox("Norton antivirus", 16, 30, 97, 17)
GUICtrlSetOnEvent( -1,"checkbox")
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Group2 = GUICtrlCreateGroup("Système", 252, 0, 245, 89)
$check6 = GUICtrlCreateCheckbox("CCleaner", 264, 30, 97, 17)
GUICtrlSetOnEvent( -1,"checkbox")
$check8 = GUICtrlCreateCheckbox("Dial A Fix", 264, 60, 97, 17)
GUICtrlSetOnEvent( -1,"checkbox")
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Group3 = GUICtrlCreateGroup("SAGE", 248, 376, 245, 177)
$check12 = GUICtrlCreateCheckbox("SAGE-budget", 264, 405, 97, 17)
GUICtrlSetOnEvent( -1,"checkbox")
$check22 = GUICtrlCreateCheckbox("SAGE-création", 264, 435, 97, 17)
GUICtrlSetOnEvent( -1,"checkbox")
$check24 = GUICtrlCreateCheckbox("SAGE-évaluation", 264, 465, 97, 17)
GUICtrlSetOnEvent( -1,"checkbox")
$checkallsage = GUICtrlCreateCheckbox("SAGE-Tout", 264, 495, 97, 17)
GUICtrlSetOnEvent( -1,"allchecksage")
$Group4 = GUICtrlCreateGroup("Mutlimédia", 0, 88, 245, 361)
$check3 = GUICtrlCreateCheckbox("AveIcon 2", 16, 120, 97, 17)
GUICtrlSetOnEvent( -1,"checkbox")
$check4 = GUICtrlCreateCheckbox("Camstudio", 16, 150, 97, 17)
GUICtrlSetOnEvent( -1,"checkbox")
$check5 = GUICtrlCreateCheckbox("Codec Camstudio", 16, 180, 121, 17)
GUICtrlSetOnEvent( -1,"checkbox")
$check10 = GUICtrlCreateCheckbox("Flash IE", 16, 210, 137, 17)
GUICtrlSetOnEvent( -1,"checkbox")
$check11 = GUICtrlCreateCheckbox("Flash Mozilla", 16, 240, 97, 17)
GUICtrlSetOnEvent( -1,"checkbox")
$check16 = GUICtrlCreateCheckbox("Java", 16, 270, 97, 17)
GUICtrlSetOnEvent( -1,"checkbox")
$check25 = GUICtrlCreateCheckbox("Photofiltre", 16, 300, 97, 17)
GUICtrlSetOnEvent( -1,"checkbox")
$check14 = GUICtrlCreateCheckbox("The Gimp", 16, 330, 97, 17)
GUICtrlSetOnEvent( -1,"checkbox")
$check35 = GUICtrlCreateCheckbox("VLC", 16, 360, 97, 17)
GUICtrlSetOnEvent( -1,"checkbox")
$check36 = GUICtrlCreateCheckbox("VSO Image Resizer", 16, 390, 137, 17)
GUICtrlSetOnEvent( -1,"checkbox")
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Group5 = GUICtrlCreateGroup("Manipulation de fichiers", 252, 88, 245, 185)
$check13 = GUICtrlCreateCheckbox("Full Sync", 264, 120, 97, 17)
GUICtrlSetOnEvent( -1,"checkbox")
$check17 = GUICtrlCreateCheckbox("Lupas Rename", 264, 180, 97, 17)
GUICtrlSetOnEvent( -1,"checkbox")
$check23 = GUICtrlCreateCheckbox("PC Inspector File Recovery", 264, 210, 153, 17)
GUICtrlSetOnEvent( -1,"checkbox")
$check28 = GUICtrlCreateCheckbox("Rep Listing", 264, 240, 97, 17)
GUICtrlSetOnEvent( -1,"checkbox")
$check29 = GUICtrlCreateCheckbox("Super Copier", 264, 150, 97, 17)
GUICtrlSetOnEvent( -1,"checkbox")
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Group6 = GUICtrlCreateGroup("Réseaux", 504, 0, 245, 465)
$check9 = GUICtrlCreateCheckbox("Firefox", 516, 30, 97, 17)
GUICtrlSetOnEvent( -1,"checkbox")
$check15 = GUICtrlCreateCheckbox("IP Scan", 516, 60, 97, 17)
GUICtrlSetOnEvent( -1,"checkbox")
$check18 = GUICtrlCreateCheckbox("Magic IP", 516, 90, 97, 17)
GUICtrlSetOnEvent( -1,"checkbox")
$check21 = GUICtrlCreateCheckbox("NX", 516, 120, 97, 17)
GUICtrlSetOnEvent( -1,"checkbox")
$check26 = GUICtrlCreateCheckbox("Putty SSH", 516, 150, 89, 17)
GUICtrlSetOnEvent( -1,"checkbox")
$check30 = GUICtrlCreateCheckbox("Super Scan", 516, 180, 97, 17)
GUICtrlSetOnEvent( -1,"checkbox")
$check32 = GUICtrlCreateCheckbox("Thunderbird", 516, 210, 97, 17)
GUICtrlSetOnEvent( -1,"checkbox")
$check33 = GUICtrlCreateCheckbox("TightVNC", 516, 240, 121, 17)
GUICtrlSetOnEvent( -1,"checkbox")
$check34 = GUICtrlCreateCheckbox("Ultr@VNC", 516, 270, 145, 17)
GUICtrlSetOnEvent( -1,"checkbox")
$check37 = GUICtrlCreateCheckbox("Win2000 Plain Password", 516, 300, 145, 17)
GUICtrlSetOnEvent( -1,"checkbox")
$check38 = GUICtrlCreateCheckbox("WireShark", 516, 330, 97, 17)
GUICtrlSetOnEvent( -1,"checkbox")
$check39 = GUICtrlCreateCheckbox("XMing", 516, 360, 97, 17)
GUICtrlSetOnEvent( -1,"checkbox")
$check40 = GUICtrlCreateCheckbox("XMing fonts", 516, 390, 97, 17)
GUICtrlSetOnEvent( -1,"checkbox")
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Group8 = GUICtrlCreateGroup("Scientifique", 248, 272, 245, 105)
$check27 = GUICtrlCreateCheckbox("R", 264, 300, 97, 17)
GUICtrlSetOnEvent( -1,"checkbox")
$check41 = GUICtrlCreateCheckbox("SciLab", 264, 330, 97, 17)
GUICtrlSetOnEvent( -1,"checkbox")
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Group9 = GUICtrlCreateGroup("Utilitaires", 504, 464, 245, 89)
$check1 = GUICtrlCreateCheckbox("Adobe Acrobat", 516, 495, 97, 17)
GUICtrlSetOnEvent( -1,"checkbox")
GUICtrlCreateGroup("", -99, -99, 1, 1)
GuiSetState ( )
While 1;Boucle infinie
Sleep(100)
WEnd
;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;; LES FONCTIONS ;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
; La fonction "documentation" ;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
Func documentation()
ShellExecute("C:\Mes Documents\DATA\Procédure Auto\Interface\help.htm")
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
;GUICtrlSetState($checkcommun,$GUI_UNCHECKED)
;GUICtrlSetState($checkcommun,$GUI_DISABLE)
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($checkallsage,$GUI_UNCHECKED)
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($checkcommun,$GUI_ENABLE)
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($checkallsage,$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 "checkallsage" ;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
Func allchecksage()
If _Ischecked($checkallsage) Then
Local $i
GUICtrlSetState($check12,$GUI_CHECKED)
GUICtrlSetState($check22,$GUI_CHECKED)
GUICtrlSetState($check24,$GUI_CHECKED)
For $i = 1 to Ubound($a_installer) - 1
$a_installer[$i][0] = "1"
Next
Else
Local $i
GUICtrlSetState($check12,$GUI_UNCHECKED)
GUICtrlSetState($check22,$GUI_UNCHECKED)
GUICtrlSetState($check24,$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
For $i = 1 to Ubound($a_installer)-1
If $a_installer[$i][0] = "1" then
Run( @ScriptDir &"\"&$a_installer[$i][1]);\Data\scripts\
Sleep(30000)
;MsgBox(0,"",$a_installer[$i][1])
EndIf
Next
EndFunc
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
; La fonction "SpecialEvents" ;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
Func quitter()
Exit
EndFunc ;==>SpecialEvents
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
; La fonction "Ischecked" ;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
Func _Ischecked($control)
Return BitAND(GUICtrlRead($control), $GUI_CHECKED) = $GUI_CHECKED
EndFunc ;==>_IsChecked