MainMenu Index oder Caption zurückgeben

[Christian18]

Hallo,

ist es möglich, wenn ich auf ein MenuItem in meiner MainMenu Komponente klicke, das mir ein eindeutiger Index oder die Beschriftung(Caption) des MenuItems zurückgegeben wird???

[angos]

Hi,

ja sicher ist das möglich. Hierzu einfach ein OnClick-Ereignis für das Menüitem deklarieren (zB über den Objektinspektor)

Delphi-Quellcode:

  procedure TForm1.MenuItem1Click(Sender: TObject);
  begin
    ShowMessage(MenuItem1.Name); // gibt den Namen zurück
    ShowMessage(MenuItem1.Caption); // gibt die Beschriftung zurück
  end;

[Mr_G]

Wenn du es nur mir einem Eventhandler machen willst sollte es auch so gehen:

Delphi-Quellcode:

if Sender is TMenuItem then
begin
  (Sender as TMenuItem).Name;
  (Sender as TMenuItem).Caption;
end;

[marabu]

Hi folks,

achtet auf die HotKeys in der Caption: klick

Grüße vom marabu