#include <GUIConstantsEx.au3>
#include <Constants.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <FontConstants.au3>
#include <ColorConstants.au3>
#Region ### START Koda GUI section ### Form=
$sFont = "Arial Black"
$Form1_1 = GUICreate("Portail CSU", 300, 145, 413, 220 )
$Label2 = GUICtrlCreateLabel("
https://glpi.intra.apave.com/glpi/", 72, 96, 204, 17)
GUICtrlSetFont(-1, 9, 400, 4, "sFont")
GUICtrlSetColor ( $Label2, $COLOR_BLUE)
$Label1 = GUICtrlCreateLabel("0970.809.909", 88, 56, 137, 21)
GUICtrlSetFont(-1, 14, 800, 4, "sFont")
GUICtrlSetColor ( $Label1, $COLOR_GREEN)
$Pic1 = GUICtrlCreatePic("index1.jpg", 8, 8, 105, 33)
$Pic2 = GUICtrlCreatePic("GLPI.ico", 16, 88, 49, 25)
Opt("TrayOnEventMode",1) ;Mode OnEvent pour la gestion du Tray
Opt("TrayMenuMode",1) ;On enlève Exit et Script paussed dans le menu du Tray
Opt("TrayAutoPause",0) ;On désactive la pause du script lors du click sur l'icon
Opt("TrayIconHide",1) ;On masque l'icone
$Icon_Destination = @ScriptDir & "\Globe.ico" ;Path de l'icone
$Fermer = TrayCreateItem("Fermer") ;Création de l'item Fermer
TrayItemSetOnEvent(-1,"Fermer") ;Lors d'un événement sur $Fermer on lance la fonction Fermer
TraySetOnEvent($TRAY_EVENT_PRIMARYDOUBLE,"Restaurer")
Func Restaurer()
GUISetState(@SW_RESTORE, $Form1_1) ;On réstaure notre GUI
GUISetState(@SW_SHOW, $Form1_1) ;On repasse notre GUI visible
Opt("TrayIconHide",1) ;On masque l'icone
EndFunc
Func Fermer()
Exit
EndFunc
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
TraySetIcon ($Icon_Destination) ;On défini l'icon de notre menu tray
GUISetState(@SW_HIDE)
Case $Label2
ShellExecute("
https://glpi.intra.apave.com/glpi/")
GUISetState(@SW_HIDE)
EndSwitch
WEnd