Was passiert, wenn du SetForegroundWindow ans Ende des Blocks packst?
Delphi-Quellcode:
WM_RBUTTONDOWN:
begin
GetCursorPos(point);
popupmenu1.popup(point.x,point.y);
SetForegroundWindow(
Handle);
end;
//Edit: Wobei das ja eigentlich auch schwachsinnig ist...