Feuille véritablement au premier plan

sb - 2 mai 2001 à 17:05
 laurent - 3 mai 2001 à 01:30
Tous les codes que je trouve sur le site à ce sujet ne permettent pas de faire passer une feuille par dessus la barre des tâches sauf si on désactive celle-ci (archaïque).

1 réponse

-------------------------------
Réponse au message :
-------------------------------

Tous les codes que je trouve sur le site à ce sujet ne permettent pas de faire passer une feuille par dessus la barre des tâches sauf si on désactive celle-ci (archaïque).

Private 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)

Private Const HWND_TOPMOST = -1&
Private Const SWP_SHOWWINDOW = &H40

Private Sub Form_Load()
SetWindowPos Me.hwnd, HWND_TOPMOST, 0&, 0&, _
PixelWidth, PixelHeight, SWP_SHOWWINDOW
0
Rejoignez-nous