A propos du tag

[Résolu]
Signaler
Messages postés
120
Date d'inscription
mardi 8 juillet 2008
Statut
Membre
Dernière intervention
1 décembre 2010
-
Messages postés
120
Date d'inscription
mardi 8 juillet 2008
Statut
Membre
Dernière intervention
1 décembre 2010
-
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.

2 réponses

Messages postés
3826
Date d'inscription
vendredi 23 juillet 2004
Statut
Modérateur
Dernière intervention
10 mai 2021
45
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;

 
@+
Cirec

<hr siz="" />
Messages postés
120
Date d'inscription
mardi 8 juillet 2008
Statut
Membre
Dernière intervention
1 décembre 2010
1
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]...