Code : Tout sélectionner
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=D:\Utilisateurs\jcaspar\Desktop\Form1.kxf
$Form1 = GUICreate("Outil de création de Signature Outlook", 624, 450, 192, 114)
$Group1 = GUICtrlCreateGroup("Création Signature Outlook", 8, 8, 593, 425)
GUICtrlSetFont(-1, 14, 400, 0, "MS Sans Serif")
$Label1 = GUICtrlCreateLabel("Nom", 32, 56, 58, 25)
$Input1 = GUICtrlCreateInput("Saisir votre nom", 152, 56, 257, 32)
$Label2 = GUICtrlCreateLabel("Prenom", 32, 88, 80, 25)
$Input2 = GUICtrlCreateInput("Saisir votre prénom", 152, 88, 257, 32)
$Label3 = GUICtrlCreateLabel("Pôle", 32, 120, 57, 25)
$Input3 = GUICtrlCreateInput("Saisir votre Pôle", 152, 120, 257, 32)
$Label4 = GUICtrlCreateLabel("Tél fixe", 32, 152, 70, 25)
$Input4 = GUICtrlCreateInput("Saisir votre N° de Tél Fixe", 152, 152, 257, 32)
$Label5 = GUICtrlCreateLabel("Tél Portable", 32, 184, 101, 33)
$Input5 = GUICtrlCreateInput("Saisir N° Tél Portable", 152, 184, 257, 32)
$Label6 = GUICtrlCreateLabel("Fax", 32, 216, 77, 25)
$Input6 = GUICtrlCreateInput("Saisir N° Fax", 152, 216, 257, 32)
$Label7 = GUICtrlCreateLabel("Email", 32, 248, 53, 25)
$Input7 = GUICtrlCreateInput("Saisir Email", 152, 248, 257, 32)
$Button1 = GUICtrlCreateButton("Valider", 152, 304, 81, 33)
$Button2 = GUICtrlCreateButton("Annuler", 328, 304, 81, 33)
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Input1
Msgbox (64," Nom"," Vous avez saisi votre nom " & $Input1,1)
Case $Input2
Msgbox (64," Prénom"," Vous avez saisi votre Prénom " & $Input2,1)
Case $Input3
Msgbox (64," Pôle"," Vous avez saisi votre Pôle d'appartenance",1)
Case $Input4
Msgbox (64," Fixe"," Vous avez saisi votre N° de Tél Fixe",1)
Case $Input5
Msgbox (64," Fixe"," Vous avez saisi votre N° de Tél Portable",1)
Case $Input6
Msgbox (64," Fixe"," Vous avez saisi votre N° de Fax",1)
Case $Input7
Msgbox (64," Fixe"," Vous avez saisi votre Email",1)
EndSwitch
WEnd