TEdits's multiples

Signaler
Messages postés
57
Date d'inscription
vendredi 24 mai 2002
Statut
Membre
Dernière intervention
14 juillet 2020
-
Messages postés
57
Date d'inscription
vendredi 24 mai 2002
Statut
Membre
Dernière intervention
14 juillet 2020
-
Peut-on sur un formulaire créer des TEdit's "indexés" c'est-à-dire qui ne s'appelleraient pas Edit1, Edit2, Edit3 mais Edit(1), Edit(2), Edit(3), le but étant de les gérer plus simplement dans le code, comme :
for i:=1 to 3 do begin
Edit(i).Text:='AAA';
end;

Merci à tous,
Jacques. :question)

2 réponses

Messages postés
4297
Date d'inscription
samedi 19 janvier 2002
Statut
Modérateur
Dernière intervention
9 janvier 2013
31
Delphi n'est pas Visual Basic !
En revanche, tu peux t'adresser à un ensemble de composants de même nature de la façon suivante :

1/- routines générique traitant tous les TEdit contenus sur la fiche :
For i:=0 to ComponentCount-1 do
if Components[i] is TEdit then
TEdit(Components[i]).Text := 'AAA';

2/- Traitement des composants Edit1..Edit3:
for i:=0 to 3 do
(FindComponent('Edit'+IntToStr(i)) as TEdit).Text := 'AAA';

May Delphi be with you.
Messages postés
57
Date d'inscription
vendredi 24 mai 2002
Statut
Membre
Dernière intervention
14 juillet 2020

Eh non, Delphi n'est pas VB, de même que VB n'est pas Delphi, et c'est toujours ça qui est pénible : sur 10 langages, le premier fait A+B+C, le 2ème A+C+D, le 3ème B+D+X .... Il n'en existe aucun qui peut TOUT faire.

Merci qd même ...
Jacques.