Home » Tipps & Tricks » Komponenten » Menüs » Caption eines TMenuItems ermitteln

Caption eines TMenuItems ermitteln

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.