Puts Your form on top.
Original Author: Demian Net
API Declarations
‘Put this in a module
Public Sub FormOnTop(FormName As Form)
Call SetWindowPos(FormName.hwnd, HWND_TOPMOST, 0&, 0&, 0&, 0&, FLAGS)
End Sub
Public Sub FormNotOnTop(FormName As Form)
Call SetWindowPos(FormName.hwnd, HWND_NOTOPMOST, 0&, 0&, 0&, 0&, FLAGS)
End Sub
Code
'To make your form on top:
FormOnTop Form1
'To take you off off of on top:
FormNotOnTop Form1