AutoIt Français

Code : Tout sélectionner

#include <ButtonConstants.au3> 
#include <GUIConstantsEx.au3> 
#include <StaticConstants.au3> 
#include <WindowsConstants.au3> 
#Region ### START Koda GUI section ### Form=C:\Users\Administrateur\Documents\Exemple.kxf 
$Form2 = GUICreate("Form2", 444, 340, 706, 250) 
$Bienvenue = GUICtrlCreateLabel("                                    Choisissez une des 4options", 40, 16, 375, 17) 
$option1 = GUICtrlCreateGroup("option1", 8, 40, 425, 73) 
$option1 = GUICtrlCreateButton("option1", 16, 56, 89, 49, $WS_GROUP) 
$Label1 = GUICtrlCreateLabel("Description --------------------------------------------------------------------", 112, 63, 305, 17) 
$Label2 = GUICtrlCreateLabel("de l'option 1 ------------------------------------------------------------------", 112, 83, 305, 17) 
GUICtrlCreateGroup("", -99, -99, 1, 1) 
$option2 = GUICtrlCreateGroup("option2", 8, 112, 425, 73) 
$option2 = GUICtrlCreateButton("option2", 16, 128, 89, 49, $WS_GROUP)
$Label2 = GUICtrlCreateLabel("Description --------------------------------------------------------------------", 112, 135, 305, 17) 
$Label3 = GUICtrlCreateLabel("de l'option 1 ------------------------------------------------------------------", 112, 155, 305, 17) 
GUICtrlCreateGroup("", -99, -99, 1, 1) 
$option3 = GUICtrlCreateGroup("option3", 8, 184, 425, 73) 
$option3 = GUICtrlCreateButton("option3", 16, 200, 89, 49, $WS_GROUP)
$Label2 = GUICtrlCreateLabel("Description --------------------------------------------------------------------", 112, 207, 305, 17) 
$Label3 = GUICtrlCreateLabel("de l'option 1 ------------------------------------------------------------------", 112, 227, 305, 17) 
GUICtrlCreateGroup("", -99, -99, 1, 1) 
$option4 = GUICtrlCreateGroup("option4", 8, 256, 425, 73) 
$option4 = GUICtrlCreateButton("option4", 16, 272, 89, 49, $WS_GROUP) 
$Label2 = GUICtrlCreateLabel("Description --------------------------------------------------------------------", 112, 279, 305, 17) 
$Label3 = GUICtrlCreateLabel("de l'option 1 ------------------------------------------------------------------", 112, 299, 305, 17) 
GUICtrlCreateGroup("", -99, -99, 1, 1) 
GUISetState(@SW_SHOW) 
#EndRegion ### END Koda GUI section ### 

While 1 
    $nMsg = GUIGetMsg() 
    Switch $nMsg 
        Case $GUI_EVENT_CLOSE 
            Exit 

    EndSwitch 
WEnd 
 

Code : Tout sélectionner

#include <GUIConstantsEx.au3>  ; <<----- un include est une inclusion de fichier qui renferme
;des déclaration de variables, fonctions et autres éléments qui sont utilisés plus bas dans
;le programme. Ici cette include servira à indiquer au script la valeur de $GUI_EVENT_CLOSE
; utilisé plus bas.

Opt('MustDeclareVars', 1) ; ceci est une option forçant la déclaration des variables avec des mots clés comme :
; Dim, Local,Global ... Ce nn'est pas obligatoire, mais ça rends le script plus propre en terme de gestion
; des variables d'un script à l'autre

Example()  ; appel à la fonction Example

Func Example()
    Local $Button_1, $Button_2, $msg  ; déclaration des variables utilisées par la suite

    GUICreate("My GUI Button") ; Cette fonction créé une GUI vide. Généralement on stocke la valeur retournée car c'est l'identifiant
;de la GUI. Dans cet exemplece n'est pas le cas, mais je vous encourage à le faire : $identifiant_GUI=GUICreate("My GUI Button")

    ;Opt("GUICoordMode", 2) ;option pour régler le type de coordonées pour la GUI (relatif).Mais là c'est un peu compliquer à expliquer pour
    ;un début. Donc on neutralise pour l'instant ...

    $Button_1 = GUICtrlCreateButton("Run Notepad", 10, 30, 100)  ; création d'un bouton dans la GUI précédement créée.
    ;on stocke l'identifiant retourné pour pouvoir l'identifier dans la suite. On l'a créé en position (10,30) relative on coins
    ;situé en haut à gauche de la GUI. le 100 c'est la longueur du bouton, et comme on n'a pas indiqué de largeur, Autoit lui
    ;en attribuera une par défaut. Amusez vous à en mettre une vous même pour expérimenter

    $Button_2 = GUICtrlCreateButton("Button Test", 10, 100) ; même chose, mais on ne précise pas la longueur, donc elle est prise par défaut

    GUISetState()      ; ici on indique qu'on peut afficher la fenêtre, car jusqu'à présent tout se construisait en invisible.
    ;sans cette ligne la GUI ne s'affichera pas, mais elle existe quand même

    ;maintenant on a une GUI, youpi !
    ;mais un script se déroule de haut en bas et si on ne le fait pas attendre, et bien il se termine de suite
    ;et donc on fait une boucle infinie pour ne pas sortir du script afin de "jouer" avec notre GUI. d'où
    ;le while 1 ... wend
    While 1
        ;on est dans la boucle, il faut maintenant savoir ce qu'on a fait sur la GUI : sur quel élément a t on
        ;cliqué et que faire en fonction de ce qui a été clické ?
        ;Pour ç on utilise la ligne si dessous :
        $msg = GUIGetMsg()
        ;à ce moment $msg contient la valeur de l'identifaient cliqué :
        ; 0 si on n'a rien clické;
        ; $Button_1 si on a clické "Run Notepad"
        ; $Button_2 si on clické "Button Test"
        ; $GUI_EVENT_CLOSE si on a cliké la croix rouge de fermeture
        ; pour la réduction, ... c'est gratuit c'est gérer par Windows lui même ^^
        Select
            Case $msg = $GUI_EVENT_CLOSE ; si c'est la croix rouge :
                ExitLoop ; <== on sort de la boucle infinie est c'est fini
            Case $msg = $Button_1 ; c'est le bouton 1
                Run('Notepad.exe')    ; on décide de faire un Run de notepad, mais dans l'absolu, on écrit tout le code à éxécuter
                ;que l'on veut : on peut y mettre des msgbox, des beep ... bref tout ce qu'on veut déclencher
            Case $msg = $Button_2
                MsgBox(0, 'Testing', 'Button 2 was pressed')    ; idem, ici c'est un simple popup
        EndSelect
        ;et la reboucle
    WEnd
EndFunc   ;==>Example