Tyleo-Dev-AutoIT-Oldies/TixRusher/TixRusher.au3

85 lines
2.7 KiB
AutoIt
Raw Permalink Normal View History

2024-02-18 21:17:39 +00:00
#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_Res_Comment=Tix Rusher
#AutoIt3Wrapper_Res_Fileversion=1.0.0.1
#AutoIt3Wrapper_Res_Fileversion_AutoIncrement=y
#AutoIt3Wrapper_Res_ProductName=TixRusher
#AutoIt3Wrapper_Res_ProductVersion=1.0.0.1
#AutoIt3Wrapper_Res_CompanyName=Tyleo Softwares
#AutoIt3Wrapper_Res_LegalCopyright=Tyleo Softwares
#AutoIt3Wrapper_Res_LegalTradeMarks=Tyleo Softwares
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
#include "MetroGUI-UDF\MetroGUI_UDF.au3"
#include "Extensions.au3"
GetSoftDetails(@AutoItExe,"DEV")
#cs
Tyleo Software Project Base v1
Created With CNP and DevTools Base Folder
All Softwares created with this base are Free and Open Sourced.
Join our Guilded Server ! https://www.guilded.gg/i/2DRlM7Mp
#ce
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <ButtonConstants.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=H:\TixRusher\Projet.kxf
$CurrentVer = FileGetVersion(@AutoItExe)
Global $Form1 = GUICreate("TixRusher - Go Quick & Fine " & $CurrentVer, 618, 254, 192, 154)
GUISetFont(10, 400, 0, "Segoe UI")
Global $Files = GUICtrlCreateMenu("Files")
Global $ExitRun = GUICtrlCreateMenuItem("ExitRun", $Files)
Global $Tix = GUICtrlCreateMenu("Tix")
Global $OpenTixBase = GUICtrlCreateMenuItem("Open Tix Base", $Tix)
Global $ClearTixBase = GUICtrlCreateMenuItem("Clear Tix Base", $Tix)
Global $Label2 = GUICtrlCreateLabel("Utilisateur", 5, 9, 70, 23)
GUICtrlSetFont(-1, 12, 400, 0, "Segoe UI")
Global $Label3 = GUICtrlCreateLabel("Poste", 5, 32, 41, 23)
GUICtrlSetFont(-1, 12, 400, 0, "Segoe UI")
Global $Label4 = GUICtrlCreateLabel("Descriptif Rapide", 258, 66, 100, 19, $SS_CENTER)
Global $Username = GUICtrlCreateInput("", 81, 7, 418, 23)
Global $Login = GUICtrlCreateInput("", 500, 7, 109, 23)
Global $Poste = GUICtrlCreateInput("", 50, 32, 294, 23)
Global $Phone = GUICtrlCreateInput("", 372, 33, 239, 23)
Global $Desc = GUICtrlCreateEdit("", 1, 86, 615, 146)
Global $Label1 = GUICtrlCreateLabel("Tel.", 346, 34, 25, 23)
Global $Validate = GUICtrlCreateButton("Validate", 433, 60, 177, 23)
GUICtrlSetStyle(-1, $BS_DEFPUSHBUTTON)
GUICtrlSetFont(-1, 12, 400, 0, "Segoe UI")
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Validate
GUICtrlSetData($Username,"Next !")
GUICtrlSetData($Login,"Next !")
GUICtrlSetData($Poste,"Next !")
GUICtrlSetData($Phone,"Next !")
GUICtrlSetData($Desc,"Next !")
Sleep(500)
GUICtrlSetData($Username,"")
GUICtrlSetData($Login,"")
GUICtrlSetData($Poste,"")
GUICtrlSetData($Phone,"")
GUICtrlSetData($Desc,"")
EndSwitch
WEnd