FormOnTop (2)



'Dichiarazioni

Declare Sub SetWindowPos Lib "user32" (ByVal hWnd As Long, ByVal hWndInsertAfter As Long, ByVal X As Long, ByVal Y As Long, ByVal Cx As Long, ByVal cy As Long, ByVal wFlags As Long)
Global Const HWND_TOPMOST = -1
Global Const HWND_NOTOPMOST = -2

'USO per Primo Piano

Call SetWindowPos(Form1.hWnd, HWND_TOPMOST, 0, 0, 0, 0, &H3)

'USO per Secondo Piano

Call SetWindowPos(Form1.hWnd, HWND_NOTOPMOST, 0, 0, 0, 0, &H3)

(formontop2.html)- by Paolo Puglisi - Modifica del 25/3/2019