Make a window popup "on top"

Declare the following fonction :
FUNCTION BOOLEAN SetForegroundWindow( LONG HWND ) LIBRARY "USER32"
and
long hWnd
hWnd = Handle(w_my_popup)
SetForegroundWindow( HWND )