Créer une liste avec la fonction DLGSelectItemInList
Vous
pouvez déclancher l’affichage d’une liste permettant à l’utilisateur de
réaliser un choix.
Dans
votre script contenant la liste, vous devrez exécuter les traitements
appropriés au choix de l’utilisateur.
La
syntaxe :
Let
MonIndex = DLGSelectItemInList (Les_Items,Le_Titre,Sens,Item_Défaut)
Dans
cette syntaxe, se trouvent 4 paramètres qui sont séparés par des virgules.
MonIndex
est une variable de type « entier » qui reçoit le résultat du choix
de l’utilisateur dans la boîte de dialogue.
Par
conséquent, après la ligne contenant la fonction DLGSelectItemInList que nous
décrivons ci-après, vous devrez traiter le résultat de MonIndex par
l’intermédiaire d’une structure conditionnelle If Then.
Si
MonIndex égal 0, c’est que l’utilisateur a validé le bouton
« Annuler ».
Si
MonIndex égal 1, c’est que l’utilisateur à choisi l’item numéro 1.
Si
MonIndex égal 2, c’est que l’utilisateur à choisi l’item numéro 2.
Si
MonIndex égal 3, c’est que l’utilisateur à choisi l’item numéro 3, ETC
Descriptions
des 4 paramètres de la fonction
Le
premier paramètre, Les_Items :
Ce
premier paramètre est de type chaîne de caractères.
Il
contient la liste des Item qui seront contenus dans la boîte de dialogue.
On
commence la liste par un guillemet, on sépare les items de la liste par une
barre verticale, et on ferme la liste par un guillemet.
La
barre verticale est obtenue par le raccourci clavier :
ALT
GR +6 du pavé alphanumérique.
A
l’époque du DOS, ce caractère était appelé le signe de concaténation.
Le
deuxième paramètre, Titre_Liste :
Il
s’agit d’une chaîne de caractères qui correspond au titre de la boîte de
dialogue.
Le
troisième paramètre, Sens :
Ici,
nous pourrons utiliser les constantes True et False.
False
= la liste sera affichée dans le sens chronologique de la saisie des items dans
le premier paramètre.
True
= Les items seront inversés.
Le
quatrième paramètre, Item_défaut :
Ce
paramètre est un entier et il est facultatif.
Il
permet de choisir l’item qui sera sélectionné dès l’ouverture de la liste.
Pour
que la liste sélectionne le troisième item dès l’ouverture de la boîte de dialogue,
la valeur du paramètre doit être 3.
Nous
allons écrire un script que nous appellerons EcrireLignes et l’assigner au
raccourci clavier F12.
Allez
dans le bloc notes pour réaliser cet exercice.
Script
EcrireLignes ()
Var
Int Reponse,
Int
NombreSaisies
Let Reponse =
DLGSelectItemInList ("Une Ligne|Deux Lignes|Trois
lignes","Combien voulez-vous écrire de lignes?",False)
If
Reponse == 0 Then
;L'utilisateur a validé le bouton Annuler
MessageBox ("Zut ! Zut ! Zut ! Vous
n'avez rien choisi !")
Return
EndIf
Let
NombreSaisies = 0
While
NombreSaisies < Reponse
TypeString ("Bonjour")
{ENTER}
Let NombreSaisies = NombreSaisies +1
EndWhile
SayString
("Nous avons saisi "+IntToString (Reponse)+"Fois bonjour")
EndScript
Philippe
BOULANGER