|
Registriert seit: 13. Dez 2007
Ort: Dresden
88 Beiträge
Delphi XE2 Professional
|
AW: Aufrufer eines PopUp-Menüs ermitteln
23. Jun 2011, 21:41
Das Popupmenu kennt seinen "Auslöser":
Delphi-Quellcode:
procedure TForm1.PopupMenu1Popup(Sender: TObject);
begin
ShowMessage(TPopupMenu(sender).PopupComponent.Name);
end;
|