Gérer les composant d'une forme ...

Gérer les composant d'une forme ... - Delphi/Pascal - Programmation

Marsh Posté le 22-10-2004 à 14:29:03    

Salut tout le monde,  
voià j'ai un petit problème et j'en profite pour agradir mon savoir par la même !!
Voilà je suis en train de coder un soft dans lequel il y a plein de Label gérer chacun de la même façon : et pour pouvoir faire des boucles, j'aimerais bien utiliser la fonction "components[i]" caster en label mais je ne sais pas quels sont les index de chacuns des mabel de ma page (il n'y a pas que des label et leur place est importante !!)
 
Ca c la première chose, la 2ème serait de savoir si on peut les changer et si oui comment !!
 
Merci d'avance !!

Reply

Marsh Posté le 22-10-2004 à 14:29:03   

Reply

Marsh Posté le 22-10-2004 à 17:52:49    

pour savoir si c'est bien un label avant de faire le cast :  
if Components[i] is TLabel then ...
 
sinon je comprends pas le reste de la question :D


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

Marsh Posté le 25-10-2004 à 13:15:36    

Ben ça ça parait logique : ce que je voudrais faire c en gros :  
 
If Components[i] is Lbl1 then  
 
Donc en gros spécifier quel label c !
Et savoir par la même (ce serait encore mieux ...) que Lbl1 c Component[1] par exemple et que Lbl32 c Components[32]
Savoir quelle valeur de "i" pour quel label .
Et savoir si cette valeur peut être changée ou non

Reply

Marsh Posté le 25-10-2004 à 14:18:05    

"=" au lieu de "is" alors
"is" sert à voir si un objet est d'un certain type, pas si c'est un objet précis.
 
Une autre solution serait, dans le OnCreate (ou autre, là où tu crées tes labels si tu le fais dynamiquement) de la Form, de mettre tous tes labels dans un tableau :
 
Labels[1] = Label1;
Labels[2] = Label2;
etc.
(avec Labels déclaré comme "array [1..32] of TLabel" par exemple)

Reply

Marsh Posté le 25-10-2004 à 14:27:04    

C pas con !!
Merci pour tout !!
 
Et Delphi Rulez !!

Reply

Sujets relatifs:

Leave a Replay

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