Bonjour,
Lorsque j'appelle la fonction "GetCursorPos", j'ai ce message d’erreur :
Voici ma déclaration :Un appel à la fonction PInvoke 'FollowTool!FollowTool.FollowTool::GetCursorPos' a déséquilibré la pile. Cela peut se produire, car la signature PInvoke managée ne correspond pas à la signature cible non managée. Vérifiez que la convention d'appel et les paramètres de la signature PInvoke correspondent à la signature non managée cible.
La structure de POINTAPI :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2 Declare Function GetCursorPos Lib "user32" (ByVal lpPoint As POINTAPI) As Boolean
L'appelle de la fonction :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5 Public Structure POINTAPI Public x As Integer Public y As Integer End Structure
Merci pour votre futur aide
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4 Dim Position_Curseur As POINTAPI GetCursorPos(Position_Curseur) MsgBox("X = " & Position_Curseur.x & ", Y = " & Position_Curseur.y)![]()
Partager