Renommer des composants
Description
Le but :
Renommer d?un bloc un ensemble de composants similaires avec un préfixe et un n° incrémenté sans avoir à se prendre la tête avec la propriété name de l'inspecteur d'objets...
L?utilité :
Pouvoir faire une boucle sur ces composants.
ex :
For i := 1 to 10 do begin
TLabel(FindComponent('MyLabel'+ IntToStr(i))).Caption := ...
end;
Comment ça marche ?
cf doc PDF
NB : Pour les feuilles QuickReport, s'assurer que la feuille est bien en mode dfm texte (clic droit sur la feuille)
-> Loda : Merci à toi pour l'insertion de l'exécutable dans Delphi...
-> Delphiprog : Je reviens à la charge... Un petit tutoriel sur les experts delphi ? ;)
Renommer d?un bloc un ensemble de composants similaires avec un préfixe et un n° incrémenté sans avoir à se prendre la tête avec la propriété name de l'inspecteur d'objets...
L?utilité :
Pouvoir faire une boucle sur ces composants.
ex :
For i := 1 to 10 do begin
TLabel(FindComponent('MyLabel'+ IntToStr(i))).Caption := ...
end;
Comment ça marche ?
cf doc PDF
NB : Pour les feuilles QuickReport, s'assurer que la feuille est bien en mode dfm texte (clic droit sur la feuille)
Conclusion :
-> Loda : Merci à toi pour l'insertion de l'exécutable dans Delphi...
-> Delphiprog : Je reviens à la charge... Un petit tutoriel sur les experts delphi ? ;)
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.