Boutons Delphi - Programmation
Marsh Posté le 17-09-2002 à 15:50:25
Sender contient un pointeur vers le bouton
if Sender is TButton then
(Sender as TButton).Caption = 'je suis clické';
PS: y une section "Programmation" sur ce forum
Marsh Posté le 17-09-2002 à 21:23:32
Désolé pour l'erreur sur l'emplacement... je ferais attention la prochaine fois.
Sinon, je merci beaucoup pour cette information. J'ai pu hyper-optimiser mon code grâce à ça.
Marsh Posté le 17-09-2002 à 21:55:23
Question bête c'est possible d'avoir des boutons avec un indice sous delphi
de type on crée un bouton standard que l'on veux placer à différent endroit.
bouton1[i].text:=coco;
C'est possible ou pas
Marsh Posté le 17-09-2002 à 22:02:22
Non, comme ça on ne peut pas le faire.
Par contre tu as d'autres solutions, par exemple faire un tableau de TButton contrnant des liens vers tes TButton :
tableau: array [1..10] of TButton;
tableau[1] := button1;
tableau[2] := button2;
etc...
puis quand tu veux modifier tous tes boutons en un coup :
for i := 1 to Length(tableau) do
tableau[i].Caption := '...';
Marsh Posté le 17-09-2002 à 22:05:43
Merci c'est pas mal ton truc
Marsh Posté le 17-09-2002 à 15:43:24
Je souhaite appeler une même procédure depuis plusieurs boutons.
Comment connaître le nom du bouton cliqué depuis la procédure ?