Discussion :

[aliwassem]

j'ai une variable avec le nom MaVar de type Byte et une autre variable avec le nom NouvelleVar de type String comment je peux recuperer le nom de la 1ere variable comme string ca veut dire le resultat doit etre

Code :

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

1
2
 
NouvelleVar  := "MaVar";

d'avance

[Gilbert Geyer]

Salut,

j'ai une variable avec le nom MaVar de type Byte et une autre variable avec le nom NouvelleVar de type String comment je peux recuperer le nom de la 1ere variable comme string ca veut dire le resultat doit etre

... pas bien clair.

Mais tu peux récupérer dans NouvelleVar de type String la valeur de MaVar de type Byte avec NouvelleVar:=intToStr(MaVar);

A+.

[edam]

j'ai une variable avec le nom MaVar de type Byte et une autre variable avec le nom NouvelleVar de type String comment je peux recuperer le nom de la 1ere variable comme string ca veut dire le resultat doit etre

Code :

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

1
2
 
NouvelleVar  := "MaVar";

d'avance

pourquoi faire? tu peut exprimer ton besoin exactement?

[Paul TOTH]

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
 
var
  MaVar: Byte;
  NouvelleVar: string;
 
function GetVarName(var variable): string;
begin
  if @variable = @MaVar then
   Result := 'MaVar'
  else
  Result := 'unknonw';
end;
 
begin
  NouvelleVar := GetVarName(MaVar);
end.

[Gilbert Geyer]

Bonjour,

Si c'est vraiment le nom de maVar que Aliwassem veut recupérer dans NouvelleVar le code de Paul Thot marche effectivement mais je me demande vraiment à quoi ça va servir (???) puisque le nom de maVar est connu par avance : mystère et boule de gomme.

A+.

[Paul TOTH]

Bonjour,

Si c'est vraiment le nom de maVar que Aliwassem veut recupérer dans NouvelleVar le code de Paul Thot marche effectivement mais je me demande vraiment à quoi ça va servir (???) puisque le nom de maVar est connu par avance : mystère et boule de gomme.

A+.

oui et non...mais cette fonction prend tout son intéret quand on a également la fonction inverse (un pointeur sur la variable d'après son nom)...c'est ce qu'on a avec le RTTI sur une classe persistante.

[Gilbert Geyer]

Re-bonjour,

Envoyé par Paul TOTH :
...mais cette fonction prend tout son intéret quand on a également la fonction inverse (un pointeur sur la variable d'après son nom

... oui mais pour faire quoi par exemple ???

A+.

[aliwassem]

d'abord merci de vos reponses.

si la fonction qui recupere le nom de la variable est comme le suivant:

Code :

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

1
2
3
4
5
function GetVarName(variable :Byte): string;
begin
  Result := ??????;
end;

et si j'utilise cette fonction comme suivant

Code :

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

1
2
3
4
5
 
NouvelleVar := GetVarName(MaVar); // le resultat doit etre = "MaVar"
NouvelleVar := GetVarName(UneVar); // le resultat doit etre = "UneVar"
NouvelleVar := GetVarName(Rep); // le resultat doit etre = "Rep"
NouvelleVar := GetVarName(seul); // le resultat doit etre = "seul"

d'avance

[Paul TOTH]

ça ne fonctionne pas car tu ne fais pas référence à la variable, c'est juste une valeur et tu pourrais très bien écrire :

Code :

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

1
2
3
4
5
6
 
begin
  GetVarName(i + 1);
  GetVarName(1 + 2);
  GetVarName(123);
end;

[anapurna]

salut

pour eviter le probleme de passer des constante, il suffit d'y ajouter le mot cle var dans le passage de paramettre mais cela ne resoud en rien sont probleme

par contre ce qu'il veut c'est efffectivement pouvoir utiliser une variable
plutot qu'une autre en ne donnant que sont non
comme on peut le faire pour retrouver un champs dans une base de donnéepar la methode

Code :

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

fieldByName

dans son cas il faut qu'il associe un nom a une variable
si je me souvient bien il existe un objet de type JSon qui pourrait peut remplacer avantageusement les fameuse variables

regarde chez progdigy

@+ Phil

[Montor]

ça existe sur avec langage heureusement pas sur delphi c'est uniquement utile pour le debug

dans son cas il faut qu'il associe un nom a une variable
si je me souvient bien il existe un objet de type JSon qui pourrait peut remplacer avantageusement les fameuse variables

le code json nécessite que le compilateur soit toujours présent

[anapurna]

salut

ça existe sur avec langage heureusement pas sur delphi c'est uniquement utile pour le debug

le code json nécessite que le compilateur soit toujours présent

justement non, as tu bien regarder le lien que je fournis ?

c'est bien du delphi le truc c'est qu'il "sérialise" les donnée
afin de garder en mémoire les noms
les variable de type scalaire (integer,byte,char,...) n'existe plus il faut penser purement objet

@+ Phil