Bonjour,
Le problème que je rencontre est le suivant :
J'ai créé le fichier PARAMETRES suivant ...
A l'initialisation de mon programme, je déclare le nom de chaque variable globale comme suit :
Ensuite, je veux réaliser le chargement du nom de mes variables globales et leur contenu par le biais de cette procédure InitialisationProgramme
Voilà le résultat qui n'est pas satisfaisant car je n'est pas affecté les valeurs dans mes variables globales ...
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37 // Initialisation des variables globales déclarées dans le code du projet PROCEDURE InitialisationVariablesGlobales() // Chargement des noms de chaque variable et leur valeur respective à partir du fichier "PARAMETRES" HLitPremier(PARAMETRES,NomVariable) TANTQUE PAS HEnDehors(PARAMETRES) Choix est entier = 0 SI PARAMETRES.typeVariable = "Numérique" THEN Choix = 2 SINON SI PARAMETRES.typeVariable = "Texte" THEN Choix = 3 SINON SI PARAMETRES.typeVariable = "Booléen" THEN Choix = 1 SINON Choix = 0 FIN // Traitement selon le type de la variable SELON Choix CAS 3 // Texte {PARAMETRES.NomVariable} = PARAMETRES.ContenuVariable CAS 2 // Numérique {PARAMETRES.NomVariable} = Val(PARAMETRES.ContenuVariable) CAS 1 // Booléen {PARAMETRES.NomVariable} = PARAMETRES.ContenuVariable="Faux" ? "Faux" SINON "Vrai" AUTRE CAS Info ("Cas non défini") FIN Trace (PARAMETRES.NomVariable,TAB,PARAMETRES.ContenuVariable,TAB,TAB,{PARAMETRES.NomVariable})) HLitSuivant(PARAMETRES, NomVariable) FIN
Je ne sais pas comment utiliser les indirections pour récupérer le nom de ces variables et y affecter leur contenu !
Je BUG...
Partager