Da ich so wenig wie möglich neu schreiben möchte liegt mein Ansatz derzeitig so (um das in deins einzufügen)
Delphi-Quellcode:
procedure TForm2.CreateParams(var params:TCreateParams);
begin
inherited CreateParams(Params);
CreateSubClass(Params, '#32768');
params.wnd.parent:= form1.handle;
end;
Das Ergebniss ist leiter nicht befriedigend, da erstmal das Fenster schrecklich aussieht. Und zweitens es nicht wie ein PopupFenster reagiert. Daher liegt die Vermutung nahe, dass Microsoft funktionalität im TrackPopupMenuEx versteckt.
Sprich man is hier völlig auf den Holzweg.