Appeller un composant par son nom

Soyez le premier à donner votre avis sur cette source.

Snippet vu 3 571 fois - Téléchargée 30 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

salahcoucou
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 ???
rvcat
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
cs_stouf59
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
fabiin
Messages postés
338
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 :)
cs_Bestiol
Messages postés
871
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.