Hi Leute,
nicht, dass ihr in die falsche Richtung lauft. Der Parameter Sender gibt den Sender an der das Ereignes gesendet hat. Somit ist hier der Sender vom Typ TPopupMenu und nicht die Kompo auf der das Menu liegt.
Auf deutsch sagt uns das, habt ihr mehrere Menu's die auf die gleiche Ereignisbehandlungsmethode zeigen, könnt ihr über Sender das Menu ermitteln, welches euch das Ereignis gesendet hat.
Delphi-Quellcode:
procedure TForm1.PopupMenu1Popup(Sender: TObject);
begin
IF TPopupMenu(Sender).Name = Menu1 then ....
IF TPopupMenu(Sender).Name = Menu2 then ....
end;
Gruß oki