Appeller un composant par son nom

0/5 (5 avis)

Snippet vu 3 927 fois - Téléchargée 31 fois

Contenu du snippet

Ceci reviens souvent en ce moment dans les forums, alors je l'ajoute!

Source / Exemple :


Par exemple:

var i:= Integer
begin
 for i:=1 to 10 do begin
 TEdit(FindComponent('Edit' + IntToStr(i))).Text:='';
 end;
end;

ce qui aurait pour equivalence:

begin
 Edit1.Text:='';
 Edit2.Text:='';
 [...]
 Edit10.Text:='';
end;

Conclusion :


Et voila!

A voir également

Ajouter un commentaire Commentaires
Messages postés
3
Date d'inscription
samedi 22 novembre 2003
Statut
Membre
Dernière intervention
6 juillet 2005

Mai
avice delphi 7 ça marche pas ???
Messages postés
1
Date d'inscription
samedi 18 janvier 2003
Statut
Membre
Dernière intervention
18 janvier 2003

Ca ne marche pas dans une dll
Messages postés
3
Date d'inscription
vendredi 20 septembre 2002
Statut
Membre
Dernière intervention
5 janvier 2011

Après avoir (vainement) épluché la doc 'DELPHI', tu m'as donné la solution exacte à mon problème
Messages postés
329
Date d'inscription
mercredi 4 avril 2001
Statut
Membre
Dernière intervention
8 décembre 2009
6
t'1 !!! d'la balle ! trop cool merci :)
Messages postés
833
Date d'inscription
dimanche 6 janvier 2002
Statut
Membre
Dernière intervention
3 novembre 2005
1
Très bien ça !! Ca m'aurait servi plus d'une fois !!

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.