popup menü bei label klick!

[Matze]

EIn Popup-menü öffnet sich normalerweise nur, wenn man einen Rechtsklick auf das Label tätigt.

Label.PopupMenu := PopupMenu1; Das geht natürlich auch dynamisch mittels findcomponent oder direkt beim Erstellen des Labels, wo du auch die Popup-menüs dynamisch erstellst:

Delphi-Quellcode:

var
  MyPopup: TPopupMenu;

...

procedure TForm1.Button1Click(Sender: TObject);
begin
  MyPopup := TPopupMenu.Create(Label1);
  MyPopup.Name := 'wasweissich';

  ...

  Label1.PopupMenu := MyPopup;
end;

Wie man das dynamisch macht, steht in der DP, einfach mal suchen.


Nachtrag: Ich dachte auch erst, er meint Hints, aber war mir auch nicht sicher.