Jetzt wo Du den Thread als Alleinunterhalter gestaltet und auch gelöst hast fällt mir das Problem samt Lösung auch wieder ein (zu spät und sinnlos).
Man könnte es als Spam werten oder als Bestätigung, dass Deine gefundene Lösung die richtige ist
Delphi-Quellcode:
case Message.LParamLo
of
WM_RBUTTONUP:
begin
SetForegroundWindow(
Handle);
PopupMenu1.Popup(
tp.x,
tp.y);