Caption eines TMenuItems ermitteln |
|
| System | Win9x, WinNT, Win2000, WinXP, Vista, Win7 |
|---|---|
| Ab Delphi-Version | Delphi 1 |
| Letzte Änderung | 28.09.2010 |
Mithilfe des Sender-Parameters gelangen Sie an die Referenz des Menüpunktes, auf den der Anwender geklickt hat. Über Typecasting lässt sich die Caption-Eigenschaft abfragen. Dieses Vorgehen ist besonders bei dynamisch erstellen Menüpunkten vorteilhaft:
procedure TForm1.Meneintrag1Click(Sender: TObject);
begin
if (Sender is TMenuItem) then
Label1.Caption:=TMenuItem(Sender).Caption;
end;
Dies funktioniert sowohl bei MainMenu-Items als auch bei Popup-Menu-Items.