Popup Menü offen bleiben

[Steve]

Also falls Du das so machen willst, dass sich das Menu immer wieder aufbaut (auch wenn das echt keine saubere Lösung ist..), geht das am Einfachsten so:

Delphi-Quellcode:

procedure TForm1.PopUpMenuItem01_Click(Sender: TObject);
begin
  PopUpMenu.Popup(Popupmenu.PopupPoint.X,Popupmenu.PopupPoint.Y);
end;

Das is die OnClick-Behandlung eines TMenuItems des TPopUpMenu's... Wenn Du die eine Zeile in jedem MenuItem.OnClick einfügst, öffnet sich das Menü genau an der gleichen Stelle wieder, es scheint also, als bliebe es offen..

Stephan