LEBLONPI
Messages postés8Date d'inscriptionmardi 24 décembre 2002StatutMembreDernière intervention31 décembre 2007
-
3 avril 2003 à 12:37
LEBLONPI
Messages postés8Date d'inscriptionmardi 24 décembre 2002StatutMembreDernière intervention31 décembre 2007
-
3 avril 2003 à 15:33
J'utilise des APIs de USER32.DLL dans une application VB6. Tout se passe bien, sauf sous un environnement Windows XP => error 6 dépassement de capacité. Savez-vous si les déclarations des APIs USER32.DLL sous Windows XP sont différentes ?
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 Function PutWindowOnTop(pFrm As Form)
Dim lngWindowPosition As Long
lngWindowPosition = SetWindowPos(pFrm.hwnd, HWND_TOPMOST, 0, 0, 0, 0, SWP_NOMOVE Or SWP_NOSIZE)
End Function
Public Function RemoveWindowOnTop(pFrm As Form)
Dim lngWindowPosition As Long
lngWindowPosition = SetWindowPos(pFrm.hwnd, HWND_NOTOPMOST, 0, 0, 0, 0, SWP_NOMOVE Or SWP_NOSIZE)
End Function