[Pascal/Delphi] déclarer des nouvelles variables dans un while

déclarer des nouvelles variables dans un while [Pascal/Delphi] - Delphi/Pascal - Programmation

Marsh Posté le 12-03-2002 à 10:37:35    

Je débute en delphi, hein ;)
Comment on fait our décarer des variables dans un while de ce genre:
while not Eof do
 var  LNodeAgent      : TTreeNode;
  LNodeUser       : TTreeNode;
  LNodeHost       : TTreeNode;
begin
 
ca compile pas ca, j'ai besoin de 3 TTreeNode différent pour chaque passage dans le while...
Tkx

Reply

Marsh Posté le 12-03-2002 à 10:37:35   

Reply

Marsh Posté le 12-03-2002 à 12:01:52    

tu peux pas, mais je vois pas trop pourquoi tu veux les déclarer DANS le while :heink:
tes TTreeNode ce sont juste des pointeurs vides.
tu dois déclarer tes variables avant le begin de la procédure/fonction, et ensuite dans le while faire qqchose du genre
LNodeUser := TTreeNode.Create;
puis ajouter LNodeUser dans le treeview (j'imagine que c'est ça que tu veux faire)


---------------
mes programmes ·· les voitures dans les films ·· apprenez à écrire
Reply

Marsh Posté le 12-03-2002 à 13:19:26    

oki, oki.
ba ouais, c ca que je veux faire...
 
Merci encore une fois antp :)

Reply

Marsh Posté le 12-03-2002 à 14:12:54    

j'avais pas vu la ligne "je débute en delphi" dans le premier post ;)
c'est vrai qu'au début c'est un peu déroutant ces objets qu'il faut "créer" alors que d'autres sont créés dès leur déclaration.


---------------
mes programmes ·· les voitures dans les films ·· apprenez à écrire
Reply

Marsh Posté le 12-03-2002 à 16:06:51    

bon franchement je vois pas encore comment faire ce que je veux..
requete SQL->un node différent pour chaque tuple
 
variable globale: TTreeView : TreeSortView
 
LNode, LNodeAgent : TTreeNode;
LNodes : TTreeNodes;
LNode := TreeSortView.GetNode(0,0);
LNodeAgent := TTreeNode.Create(LNodes);
LNodeAgent := LNodes.AddChild(LNode, LDisplay);
et je voudrais aussi faire :
Pagent^ := 'ma chaine qu'est jamais la meme pour chaque node';
LNodeAgent.Data := Pagent;
 
en gros rajouter des nodes avec une data spécifique qui permetra ensuite de retrouver les infos facilement

Reply

Marsh Posté le 12-03-2002 à 16:16:12    

Pagent c quoi ? un PChar ? tu lui alloue de la mémoire ?
 
sinon le TTreeNodes faut pas le creer, il faut prendre TreeSortView.Nodes


---------------
mes programmes ·· les voitures dans les films ·· apprenez à écrire
Reply

Marsh Posté le 12-03-2002 à 16:23:28    

antp a écrit a écrit :

Pagent c quoi ? un PChar ? tu lui alloue de la mémoire ?
 
sinon le TTreeNodes faut pas le creer, il faut prendre TreeSortView.Nodes  




ah oui zut
Pagent est un Pstring
 
Bon je vais voir une doc sur le TTreeView, parceque la ca va pu..

Reply

Marsh Posté le 12-03-2002 à 16:28:02    

y doit y avoir des exemples simples simple sur le net
 
PString ? j'ai jamais touché à ça, je m'en méfie :D
 
moi j'aurais utilisé un dérivé de TList avec des dérivés de TObject, mais bon ça c'est peut-être un peu hard si tu débutes :/


---------------
mes programmes ·· les voitures dans les films ·· apprenez à écrire
Reply

Marsh Posté le 12-03-2002 à 17:03:32    

antp a écrit a écrit :

y doit y avoir des exemples simples simple sur le net
 
PString ? j'ai jamais touché à ça, je m'en méfie :D
 
moi j'aurais utilisé un dérivé de TList avec des dérivés de TObject, mais bon ça c'est peut-être un peu hard si tu débutes :/  




 
Oula !!!
j'ai mal a la tête tout d'un coup....
 
Y'a moyen sans faire trop compliquer, mon seul pbl pour l'instant c'est que le champ Data pour mes TTreeNode sont le même partout...

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed