cavalier2400
Messages postés120Date d'inscriptionmardi 8 juillet 2008StatutMembreDernière intervention 1 décembre 2010
-
9 juil. 2009 à 01:04
cavalier2400
Messages postés120Date d'inscriptionmardi 8 juillet 2008StatutMembreDernière intervention 1 décembre 2010
-
9 juil. 2009 à 07:37
Bonsoir, je connais juste la valeur du tag d'un bouton, exemple=2, et je connais ni le nom de ce bouton, ni son caption, comment faire pour exécuter le contenu du programme qui se trouve dans (onClick), ou pour changer son caption... merci.
Cirec
Messages postés3833Date d'inscriptionvendredi 23 juillet 2004StatutModérateurDernière intervention18 septembre 202250 9 juil. 2009 à 02:11
Salut,
si le bouton se trouve dans la même fiche c'est simple
procedure TForm1.Button6Click(Sender: TObject);
var i: Integer;
begin
for I := 0 to ComponentCount-1 do
if (Components[I] is TButton) then
if (Components[I] as TButton).Tag = 2 then
with (Components[I] as TButton) do
begin
Caption := 'Caption Changed';
Click;
end;
end;
cavalier2400
Messages postés120Date d'inscriptionmardi 8 juillet 2008StatutMembreDernière intervention 1 décembre 20101 9 juil. 2009 à 07:37
Merci Cirec, le code est parfait, mais par curiosité ya-t-il possibilité en Delphi d'accéder à boutons ou des labels... par des indices, que ce soit à la conception ou à l'exécution (comme en VB), ex: button[1], button[2]...