Popup Menü: Auf welchen Index wurde geklickt??

[alcaeus]

OnClick-Routine schreiben

Delphi-Quellcode:

procedure MenuClick(Sender: TObject);
...
procedure TForm1.MenuClick(Sender: TObject);
begin
  ShowMessage((Sender as TMenuItem).Name);
end;

Und beim Erstellen der Menüpunkte:
Menuepunkt.OnClick := MenuClick;