Actuellement, je développe un programme qui me permettra l’installation automatisé de plusieurs programmes sans interaction avec l'utilisateur.
Je viens vers vous car je bloque sur la création d'un menu qui sera utilisé sur plusieurs fenêtres (2 pour le moment) GUI.
Le menu s'affiche sur la 1ère fenêtre (sûrement car je créé le menu juste après la création de ma 1ère GUI ) mais pas sur la 2ème.
Pouvez-vous m'indiquer comment organiser mon code ?
Merci !
► Afficher le texte
Code : Tout sélectionner
; ===============================================================================================================================
; Initialisation des fonctions "include" d'AutoIT
; ===============================================================================================================================
#include <MsgBoxConstants.au3>
#include <Constants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <ProgressConstants.au3>
; ===============================================================================================================================
; Création GUI
; ===============================================================================================================================
; >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
; Création fenêtre "Particulier / Professionnel"
; >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
$GUI_client = GUICreate("Version", 220, 210, -1, -1)
$Btn_part = GUICtrlCreateButton("PARTICULIER", 10, 10, 200, 50)
GUICtrlSetFont(-1, 12, 700, 0, "MS Sans Serif")
$Btn_pro = GUICtrlCreateButton("PROFESSIONNEL", 10, 70, 200, 50)
GUICtrlSetFont(-1, 12, 700, 0, "MS Sans Serif")
$Btn_custom = GUICtrlCreateButton("CUSTOM", 10, 130, 200, 50)
GUICtrlSetFont(-1, 12, 700, 0, "MS Sans Serif")
; >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
; Création Menu
; >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
$menu_outils = GUICtrlCreateMenu("Outils")
$menu_outils_cam = GUICtrlCreateMenuItem("Tester Webcam" , $menu_outils)
$menu_aide = GUICtrlCreateMenu("?")
$menu_aide_maj = GUICtrlCreateMenuItem("Mise à jour des programmes" , $menu_aide)
GUICtrlCreateMenuItem("- dernière MAJ : ", $menu_aide)
GUICtrlSetState(-1, $GUI_DISABLE)
GUICtrlCreateMenuItem("", $menu_aide, 2)
$menu_aide_note_version = GUICtrlCreateMenuItem("Notes de version" , $menu_aide)
; >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
; Création Fenêtre des choix logiciels
; >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
$GUI_log = GUICreate("LIS - Choix des logiciels...", 560, 500, -1, -1) ; Création de la fenêtre de choix des logiciels à installer
$Btn_quitter = GUICtrlCreateButton("Quitter", 230, 435, 90, 35)
GUICtrlSetFont(-1, 12, 700, 0, "MS Sans Serif")
$Btn_retour = GUICtrlCreateButton("Retour", 10, 435, 90, 35)
GUICtrlSetFont(-1, 12, 700, 0, "MS Sans Serif")
$Btn_installer = GUICtrlCreateButton("Installer", 450, 435, 90, 35) ; Bouton pour lancer l'installation des programmes sélectionnés
GUICtrlSetFont(-1, 12, 700, 0, "MS Sans Serif")
; >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
; Affichage GUI
; >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
GUISetState(@SW_SHOW, $GUI_client)
GUISetState(@SW_HIDE, $GUI_log)
; ===============================================================================================================================
; PROGRAMME
; ===============================================================================================================================
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Btn_part
; Activation des checkbox pour les particuliers
GUISetState(@SW_HIDE, $GUI_client)
Sleep (300) ; Effet disparition fenêtre
GUISetState(@SW_SHOW, $GUI_log)
Case $Btn_pro
; Activation des checkbox pour les professionnels
GUISetState(@SW_HIDE, $GUI_client)
Sleep (300) ; Effet disparition fenêtre
GUISetState(@SW_SHOW, $GUI_log)
Case $Btn_custom
; Ne sélectionne aucune checkbox - Bouton "CUSTOMS"
GUISetState(@SW_HIDE, $GUI_client)
Sleep (300) ; Effet disparition fenêtre
GUISetState(@SW_SHOW, $GUI_log)
EndSwitch
WEnd