PC SOFT

FORUMS PROFESSIONNELS
WINDEVWEBDEV et WINDEV Mobile

Accueil → WINDEV 2024 → Problème avec la déclaration de variables
Problème avec la déclaration de variables
Débuté par eric, 17 mar. 2006 21:40 - 2 réponses
Posté le 17 mars 2006 - 21:40
Bonjour,

J'ai un problème de reconnaissance de variables.

Présentation:

J'ai des zones de saisies dans une fenêtre de la forme

DA1
DA2
DA3
...
DA20

Dans une procédure je défini ce qui suit.
//=========================================
DA est un tableau de 20 entiers
i est un entier

POUR i = 1 A 20
SI DA[i] = 0 ALORS
Info("One of the Foward Print Position is null")
RETOUR
FIN
Trace(i+" = "+DA[i]) // Apperçu avant lancement
Total_Pos = Total_Pos + DA[i]
FIN
//=========================================
Lorsque je lance la procédure il trouve 0 dans DA[1] alors que la zone DA1 est de 100.


Comment faire ? car avec Visual Basic ça marche.

Merci

Eric
Posté le 17 mars 2006 - 21:44
Après mure réflexion, eric a écrit :
Bonjour,

J'ai un problème de reconnaissance de variables.

Présentation:

J'ai des zones de saisies dans une fenêtre de la forme

DA1
DA2
DA3
..
DA20

Dans une procédure je défini ce qui suit.
//=========================================
DA est un tableau de 20 entiers
i est un entier

POUR i = 1 A 20
SI DA[i] = 0 ALORS
Info("One of the Foward Print Position is null")
RETOUR
FIN
Trace(i+" = "+DA[i]) // Apperçu avant lancement
Total_Pos = Total_Pos + DA[i]
FIN
//=========================================
Lorsque je lance la procédure il trouve 0 dans DA[1] alors que la zone DA1
est de 100.


Comment faire ? car avec Visual Basic ça marche.

Merci

Eric


Regardez les opérateurs d'indirection : {}
Vous aurez un code de la forme {"DA"+i, indChamp}

A+
Posté le 18 mars 2006 - 17:36
Bonjour,


DA est un tableau de 20 entiers
i est un entier

POUR i = 1 A 20
SI {"DA"+i} = 0 ALORS
-----Info("One of the Foward Print Position is null")
-----RETOUR
FIN
-----Trace(i+" = "+DA[i]) // Apperçu avant lancement
-----Total_Pos = Total_Pos + {"DA"+i}
FIN


Ali hindi : Alidev7@yahoo.fr