Movemouse l'api sendmessage

Messages postés
26
Date d'inscription
lundi 12 avril 2010
Dernière intervention
3 octobre 2016
-
Allo, besoin d'aide un problème avec ce bout de code.


Public Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal _
hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As Long

Public Const WM_MOUSEMOVE = &H200

Public Function LoWord(wParam As Long) As Integer
   If wParam And &H8000& Then
      LoWord = &H8000& Or (wParam And &H7FFF&)
   Else
      LoWord = wParam And &HFFFF&
   End If
End Function

Public Function MAKELONG(wLow As Long, wHigh As Long) As Long
  MAKELONG = LoWord(wLow) Or (&H10000 * LoWord(wHigh))
End Function

Public Sub MoveMouse(hwnd As Long, X As Long, Y As Long)
Call SendMessage(hwnd, WM_MOUSEMOVE, 0, MAKELONG(X,Y))
End Sub

merci d'avance
Afficher la suite 

Votre réponse

1 réponse

Messages postés
18039
Date d'inscription
lundi 7 décembre 2009
Statut
Modérateur
Dernière intervention
11 avril 2018
0
Merci
Bonjour
Tu veux de l'aide ?
Elle est bien évidemment impossible sans connaître les tenants et les aboutissants précis, ni savoir par quel code tu appelles la procédure publique MoveMouse

EDIT : si tu ne le sais pas, cela voudrait dire que le bout de code montré a été simplement copié/collé sans le comprendre et sans même comprendre qu'il n'était qu'un bout de code à insérer dans un projet dont certaines lignes de code (probablement dans un Timer) en lancent l'exécution ! Développer est tout, sauf ce type d' "approche" ...

________________________
Nul ne saurait valablement coder ce qu'il ne saurait exposer clairement.
Commenter la réponse de ucfoutu

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.