Page 1 sur 1

Creer une boucle et enregistrer dans un INI

Posté : sam. 16 janv. 2021 14:54
par YuChan
Bonjour a tous,

J'essaye de faire une boucle qui demande un choix dans une liste box.

Code : Tout sélectionner

$Combo1 = GUICtrlCreateCombo("", 72, 56, 169, 25, BitOR($CBS_DROPDOWN,$CBS_AUTOHSCROLL))
GUICtrlSetData(-1, "Choix1|Choix2|Choix3|END")
$Label1 = GUICtrlCreateLabel("Selectionnez un choix", 48, 16, 226, 24)
GUICtrlSetFont(-1, 12, 400, 0, "MS Sans Serif")
GUICtrlCreateGroup("", -99, -99, 1, 1)
$ButtonValiderCreateTrajet = GUICtrlCreateButton("&OK", 73, 107, 75, 25)
$ButtonCancelCreateTrajet = GUICtrlCreateButton("&Cancel", 170, 107, 75, 25)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
Le but est de enregistrer a chaque fois le choix dans une fichier INI jusq'a ce que le choix END est selectionné

Pouvez m'aider a faire cette boucle while ou for ?

Merci

Re: Creer une boucle et enregistrer dans un INI

Posté : dim. 17 janv. 2021 12:13
par jl56
Bonjour,

Voici un exemple
#include <ComboConstants.au3>
#include <GUIConstantsEx.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
Global $Form1 = GUICreate("Form1", 615, 437, 192, 124)






$Combo1 = GUICtrlCreateCombo("", 72, 56, 169, 25, BitOR($CBS_DROPDOWN, $CBS_AUTOHSCROLL))
GUICtrlSetData(-1, "Choix1|Choix2|Choix3|END")
$Label1 = GUICtrlCreateLabel("Selectionnez un choix", 48, 16, 226, 24)
GUICtrlSetFont(-1, 12, 400, 0, "MS Sans Serif")
GUICtrlCreateGroup("", -99, -99, 1, 1)
$ButtonValiderCreateTrajet = GUICtrlCreateButton("&OK", 73, 107, 75, 25)
$ButtonCancelCreateTrajet = GUICtrlCreateButton("&Cancel", 170, 107, 75, 25)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
Local $nbr_choix = 1

While 1
   $nMsg = GUIGetMsg()
   Switch $nMsg
      Case $GUI_EVENT_CLOSE
         Exit
      Case $ButtonCancelCreateTrajet
         Exit
      Case $ButtonValiderCreateTrajet
         $choix = GUICtrlRead($Combo1)
         If $choix = "END" Then
            Exit
         Else
            IniWrite(@ScriptDir & "\choix.ini", "liste choix", "choix n° " & $nbr_choix, $choix)
            $nbr_choix = $nbr_choix + 1
         EndIf

   EndSwitch
WEnd
cordialement,

JL56

Re: Creer une boucle et enregistrer dans un INI

Posté : lun. 18 janv. 2021 02:02
par YuChan
Merci,

Pour la suite j'ai sa dans mon ini :

Code : Tout sélectionner

[CHOIX]
CHOIX1=TEST
CHOIX2=TEST2
[ACTION]
ACTION1=TEST1
ACTION2=TEST2
Avec cet e exemple comment créer la boucle avec la section [CHOIX] et incrementer la clés.
Si par exermple je choisis END comment ecrire la section 2 ([ACTION]) et reincrementer la cles

Re: Creer une boucle et enregistrer dans un INI

Posté : lun. 18 janv. 2021 07:46
par jchd
Merci de cesser de nous prendre pour des jambons !
Vous vous faites verrouiller vos posts sur le forum US pour non respect des règles et vous revenez ici la bouche en coeur poser les mêmes questions ???

Re: Creer une boucle et enregistrer dans un INI

Posté : lun. 18 janv. 2021 11:34
par mikell
jchd a écrit : lun. 18 janv. 2021 07:46Vous vous faites verrouiller vos posts sur le forum US pour non respect des règles
Merci pour le signalement
OK, je verrouille le sujet par conformité avec la décision du forum US sur le sujet équivalent , même si ça me parait un tantinet capillotracté
J'avais déjà demandé à Melba son avis là-dessus la semaine dernière et il m'avait répondu :
"until he actually posts something incriminating he is, in my eyes, free to continue. Banning people solely because we think they are guilty is the first step on a very long road to perdition"