Mostrar formulario por encima de aplicación activa

Mr. Keanu
04 de Febrero del 2003
Hola a tod@s, estoy intentando hacer un reloj que tenga la posibilidad de activar alarmas. Cuando salta la alarma se muestra un formulario con un mensaje. El problema está en que si el reloj no es la aplicación activa (estoy usando el explorer por ejemplo), este formulario queda oculto. ¿Hay alguna forma de hacer que se muestre por encima de cualquier aplicación sin importar cuál está activa?
Gracias

webJose
04 de Febrero del 2003
La que se me viene a la mente es always on top:

Private Const HWND_TOPMOST As Long = -1
Private Const SWP_NOMOVE As Long = &H2
Private Const SWP_NOSIZE As Long = &H1

Private Declare Function 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) As Long

public sub ColocarFormularioOnTop(byval hWnd as long)
setwindowpos hwnd, hwnd_topmost, 0,0,0,0, swp_nomove or swp_nosize
end sub