Utilisation du paramètre Sender

De RAD Studio
Aller à : navigation, rechercher

Remonter à Utilisation des composants - Index

Dans un gestionnaire d'événement, le paramètre Sender indique le composant qui a reçu l'événement et qui a donc appelé le gestionnaire. Il est parfois pratique de partager entre plusieurs composants un même gestionnaire d'événement qui doit se comporter différemment selon le composant qui l'a appelé. Vous pouvez y arriver en utilisant le paramètre Sender dans une instruction if...then...else. Par exemple, le code suivant affiche le nom de l'application dans le titre d'une boîte de dialogue uniquement si l'événement OnClick a été reçu par Button1.



 procedure TMainForm.Button1Click(Sender: TObject);
 begin
 if Sender = Button1 then
   AboutBox.Caption := 'A propos de ' + Application.Title
 else
   AboutBox.Caption := '';
 AboutBox.ShowModal;
 end;



Voir aussi