Discussion :

[Arnaud B.]

Bonjour,

Est il possible dans Windev de faire une prise de référence sur une variable de type entier (et non pas un objet) ?

Mon problème est le suivant :

Soit une classe cMaClasse avec un constructeur qui accepte un paramètre par adresse :

L'appel depuis une fenêtre est :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
 
eID est un entier = 0
MonObjet est un cMaClasse(eID)

Dans mon constructeur, si je fais :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
 
Constructeur(eParamID est un entier)
eParamID = 1

eID vaut aussi 1 quand je reviens dans le code de la fenêtre.

Ca c'est normal : c'est le principe du passage par adresse.

Le problème, c'est que je ne peux pas faire pointer une autre variable sur celle ci, si je fais :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
 
Déclarations de cMaClasse
 
LOCAL
   :eMembre est un entier
FIN
 
Constructeur(eParamID est un entier)
:eMembre =  eParamID
:eMembre = 1

Là quand je reviens dans le code de la fenêtre, eID vaut toujours 0.
:eMembre ne référence pas eID

Comment faire pour qu'une modification de :eMembre dans la classe modifie aussi le variable passée au constructeur (sachant que l'on parle ici de variables simples, pour les objets il n'y a pas de difficulté) ???

Par exemple, on pourrait imaginer de pouvoir faire :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
:eMembre <- eParamID

... sauf que ça ne fonctionne que sur les objets ou les variables "complexes" (tableaux...)

Merci d'avance pour vos suggestions, Arnaud.

[jimmypage]

Salut,

A priori la prise de référence ne marche que pour des variables de type avancé dynamiques ou des objets.
Donc si tu passe par un entier tu n'auras pas cette possibilité.
Dans ton code il doit être possible de faire:

classe:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
 
Déclarations de cMaClasse
 
LOCAL
   :eMembre est un tableau dynamique de 1 variant
FIN
 
Constructeur(eParamID)
:eMembre <- eParamID
:eMembre[1] = 1

fenetre:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
 
eID est un tableau dynamique de 1 variant
eID[1]=0
MonObjet est un cMaClasse(eID)
info(eID[1]) //logiquement devrait afficher "1"

résultat non garanti mais a priori ca marche comme ca


EDIT: testé en WD16 ca marche.. par contre en 15 je ne peux pas te dire

[Jon Shannow]

Je ne comprend pas trop ce que tu veux.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
Déclarations de cMaClasse
 
LOCAL
   :eMembre est un entier
FIN
 
Constructeur(eParamID est un entier)
:eMembre = 1
eParamID =  :eMembre

En sortie du constructeur, eParamID vaudra bien 1 !

[jimmypage]

Je ne comprend pas trop ce que tu veux.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
Déclarations de cMaClasse
 
LOCAL
   :eMembre est un entier
FIN
 
Constructeur(eParamID est un entier)
:eMembre = 1
eParamID =  :eMembre

En sortie du constructeur, eParamID vaudra bien 1 !

Ce doit être pour ne pas à avoir à affecter la valeur à eParamID à chaque fois que l'on modifie la valeur de eMembre (je suppose)

[Arnaud B.]

Non pas du tout.

Une fois revenu dans le code appelant, le paramètre passé vaudra toujours 0.

Windev n'accepte pas les prises de référence en cascade sur les types simples.

La réponse de jimmipage est la bonne : il faut passer par des types "avancés" (objet, structure) qui wrappent le type simple.

Une autre technique est également donnée ici :
http://forum.pcsoft.fr/thread.awp?gr...4&start=81&v=2

J'ai besoin de faire ceci parce qu'évidemment mon paramètre passé au constructeur peut être modifié par plusieurs méthodes de ma classe, et donc j'ai besoin de référencer ce paramètre dans une variable de ma classe.

Je ne comprend pas trop ce que tu veux.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
Déclarations de cMaClasse
 
LOCAL
   :eMembre est un entier
FIN
 
Constructeur(eParamID est un entier)
:eMembre = 1
eParamID =  :eMembre

En sortie du constructeur, eParamID vaudra bien 1 !