FORUM WINDEV

Nom_Lib est un chaîne
Nom_Lib = Droite(MoiMême..Nom,Taille(MoiMême..Nom)-4)
Salut à tous

J'ai écrit un bout de code suivant :

Code: Tout sélectionner


Num_groupe est un entier sur 1 octet = Droite(Nom_Lib,2)
SI Asc(Gauche (Num_groupe,1) ) < 0x30 OU Asc(Gauche(Num_groupe,1)) > 0x39 ALORS   // ce n'est pas un chiffre
    Num_groupe = Droite(Nom_Lib,1)
FIN

SI Num_groupe = 1 ALORS
   Nom_Lib = Gauche(Nom_Lib,Taille(Nom_Lib)-1)
SINON SI Num_groupe < 10 ALORS
   Nom_Lib = Gauche(Nom_Lib,Taille(Nom_Lib)-1) + NumériqueVersChaîne((Num_groupe-1))
SINON
   Nom_Lib = Gauche(Nom_Lib,Taille(Nom_Lib)-2) + NumériqueVersChaîne((Num_groupe-1))
FIN

MoiMême..Visible =  FEN_Type_Moniteur.{Nom_Lib}..Visible

Le problème c'est que le compilateur Windev me met une erreur sur la dernière ligne : il ne comprend pas la "{".

Comme Nom_Lib peut avoir 40 valeurs possibles, je veut éviter de faire un Selon, cas 1, cas 2, etc...

FEN_Type_Moniteur est une fenêtre qui contient 40 champs .
Comment écrire correctement la ligne pour que le compilateur Windev ne fasse plus d'erreur ?

Bon c'est bon les gars, j'ai trouvé

En fait il fallait que je tape la ligne

Code: Tout sélectionner

MoiMême..Visible =  {"FEN_Type_Moniteur." + Nom_Lib}..Visible

Et là miracle ça marche.

Par contre est-ce que quelqu'un peut me tuyauter pour me dire comment on affiche Resolu derriere le sujet ?
Merci pour tout

Edite ton dernier Post et dans le titre ajoute [RESOLU]

Bon Dev