Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- #cs ----------------------------------------------------------------------------
- AutoIt Version : 3.3.6.0
- Auteur: MonNom
- Fonction du Script :
- Modèle de Script AutoIt.
- #ce ----------------------------------------------------------------------------
- ; Début du script - Ajouter votre code ci-dessous.
- #include <GUIConstantsEx.au3>
- #include <StaticConstants.au3>
- #include <WindowsConstants.au3>
- #include <ListviewConstants.au3>
- Opt("GUIOnEventMode", 1)
- ; ####################### CONFIGURATION DES VARIABLES ######################
- If Not FileExists(@ScriptDir & "\ListeJeux.ini") Then
- $file = @ScriptDir & "\ListeJeux.ini"
- $sData = "LeagueOfLegends=Chemin d'accès"
- iniWriteSection($file, "Jeux", $sData)
- MsgBox(64, "Information", "Le fichier " & $file & " a été créé avec succès!")
- Else
- $file = @ScriptDir & "\ListeJeux.ini"
- EndIf
- ; ####################### CONFIGURATION DE LA GUI #######################
- $GUI = GUICreate("Lanceur de jeux", 200, 400, 0, 0, $WS_OVERLAPPEDWINDOW) ;Création de la GUI
- GUISetOnEvent($GUI_EVENT_CLOSE, "FermeGUI") ;Evenement de fermeture
- ;Evenement d'agrandissement/retrecissement
- $BoutonEx = GUICtrlCreateButton( "Lancer!", 10, 350) ;Création du bouton d'execution d'un jeu
- GUICtrlSetOnEvent($BoutonEx, "Lancer") ;Evenement d'execution grâce au bouton
- $BoutonCancel = GUICtrlCreateButton( "Quitter", 150, 350) ;Création du bouton Quitter
- GUICtrlSetOnEvent($BoutonCancel, "Quit") ;Evenement de fermeture du programme avec le bouton Quitter
- $BoutonAjouter = GUICtrlCreateButton( "Ajouter Jeu", 70, 350) ; Création du bouton d'ajout d'un jeu
- GUICtrlSetOnEvent($BoutonAjouter, "AjouterJeu") ; Evenementu bouton d'ajout d'un jeu
- $LView = GUICtrlCreateListView("Icônes|Jeux", 2, 2, 196, 340, $LVS_SORTDESCENDING, $LVS_EX_GRIDLINES+$LVS_EX_SUBITEMIMAGES)
- GuiSetState(@SW_SHOW)
- While 1
- Sleep(1000)
- WEnd
- Func FermeGUI()
- MsgBox(64, "Information", "A bientôt!")
- Exit
- EndFunc
- Func Lancer()
- MsgBox(64, "Information", iniReadSection($file, "Jeux"))
- EndFunc
- Func AjouterJeu()
- MsgBox(64, "Information", "Vous avez ajouté le jeu ...")
- EndFunc
- Func Quit()
- MsgBox(64, "Information", "A bientôt!")
- Exit
- EndFunc
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement