Форма выше всех других форм

Оформил: DeeCo

with Self do {Form1,...}
   SetWindowPos(Handle, // handle to window 
               HWND_TOPMOST, // placement-order handle {*} 
               Left,  // horizontal position 
               Top,   // vertical position 
               Width,
                Height,
                // window-positioning options 
               SWP_NOACTIVATE or SWP_NOMOVE or SWP_NOSIZE);

 {* Other Values: }
 HWND_BOTTOM
 Places the window at the bottom of the Z order.
 HWND_NOTOPMOST
 Places the window above all non-topmost windows
 HWND_TOP
 Places the window at the top of the Z order.
 HWND_TOPMOST
 Places the window above all non-topmost windows.
 The window maintains its topmost position even when it is deactivated.