Bonjour j'ai , il a peu de temps , poster un message pour un petit prog et
je remercie les personne de m'aoir renseigner.
Cependant un point reste encore obscure : Comment declancher un MOUSE DOWN.
( ou un click souris ).
J'ai trouvé les Code des touches mais je ne c pas si c ca qu'il faut utliser
et surtout comment l'utiliser.
Merci de poster les réponses au groupe afin d'en faire profiter à tous
"laurent Barthet" <babemagus@wanadoo.fr> wrote in message
news:bm6its$v5g$1@news-reader5.wanadoo.fr...
Bonjour j'ai , il a peu de temps , poster un message pour un petit prog
et
je remercie les personne de m'aoir renseigner.
Cependant un point reste encore obscure : Comment declancher un MOUSE
DOWN.
( ou un click souris ).
J'ai trouvé les Code des touches mais je ne c pas si c ca qu'il faut
Merci de poster les réponses au groupe afin d'en faire profiter à tous "laurent Barthet" wrote in message news:bm6its$v5g$
Bonjour j'ai , il a peu de temps , poster un message pour un petit prog
et
je remercie les personne de m'aoir renseigner.
Cependant un point reste encore obscure : Comment declancher un MOUSE
DOWN.
( ou un click souris ). J'ai trouvé les Code des touches mais je ne c pas si c ca qu'il faut
utliser
et surtout comment l'utiliser.
merci de me renseigner
Magus
Guy DETIENNE
Salut ;o)
Tiré du très bon site AllApi.net:
Private Declare Sub mouse_event Lib "user32" (ByVal dwFlags As Long, ByVal dx As Long, ByVal dy As Long, ByVal cButtons As Long, ByVal dwExtraInfo As Long) Const MOUSEEVENTF_LEFTDOWN = &H2 Const MOUSEEVENTF_LEFTUP = &H4 Const MOUSEEVENTF_MIDDLEDOWN = &H20 Const MOUSEEVENTF_MIDDLEUP = &H40 Const MOUSEEVENTF_MOVE = &H1 Const MOUSEEVENTF_ABSOLUTE = &H8000 Const MOUSEEVENTF_RIGHTDOWN = &H8 Const MOUSEEVENTF_RIGHTUP = &H10
Private Sub Form_Activate()
Do 'Simulate a mouseclick on the cursor's position mouse_event MOUSEEVENTF_LEFTDOWN Or MOUSEEVENTF_LEFTUP, 0&, 0&, cButt, dwEI DoEvents Loop End Sub
Tchao
Guy DETIENNE
-- __________________________________ Tchao.net: L'informatique à votre dimension www.tchao.net Pour toute réponse, retirer le .nospam de l'adresse mail
"laurent Barthet" a écrit dans le message de news:bm6its$v5g$
Bonjour j'ai , il a peu de temps , poster un message pour un petit prog
et
je remercie les personne de m'aoir renseigner.
Cependant un point reste encore obscure : Comment declancher un MOUSE
DOWN.
( ou un click souris ). J'ai trouvé les Code des touches mais je ne c pas si c ca qu'il faut
utliser
et surtout comment l'utiliser.
merci de me renseigner
Magus
Salut ;o)
Tiré du très bon site AllApi.net:
Private Declare Sub mouse_event Lib "user32" (ByVal dwFlags As Long, ByVal
dx As Long, ByVal dy As Long, ByVal cButtons As Long, ByVal dwExtraInfo As
Long)
Const MOUSEEVENTF_LEFTDOWN = &H2
Const MOUSEEVENTF_LEFTUP = &H4
Const MOUSEEVENTF_MIDDLEDOWN = &H20
Const MOUSEEVENTF_MIDDLEUP = &H40
Const MOUSEEVENTF_MOVE = &H1
Const MOUSEEVENTF_ABSOLUTE = &H8000
Const MOUSEEVENTF_RIGHTDOWN = &H8
Const MOUSEEVENTF_RIGHTUP = &H10
Private Sub Form_Activate()
Do
'Simulate a mouseclick on the cursor's position
mouse_event MOUSEEVENTF_LEFTDOWN Or MOUSEEVENTF_LEFTUP, 0&, 0&, cButt, dwEI
DoEvents
Loop
End Sub
Tchao
Guy DETIENNE
--
__________________________________
Tchao.net: L'informatique à votre dimension
www.tchao.net
Pour toute réponse, retirer le .nospam de l'adresse mail
"laurent Barthet" <babemagus@wanadoo.fr> a écrit dans le message de
news:bm6its$v5g$1@news-reader5.wanadoo.fr...
Bonjour j'ai , il a peu de temps , poster un message pour un petit prog
et
je remercie les personne de m'aoir renseigner.
Cependant un point reste encore obscure : Comment declancher un MOUSE
DOWN.
( ou un click souris ).
J'ai trouvé les Code des touches mais je ne c pas si c ca qu'il faut
Private Declare Sub mouse_event Lib "user32" (ByVal dwFlags As Long, ByVal dx As Long, ByVal dy As Long, ByVal cButtons As Long, ByVal dwExtraInfo As Long) Const MOUSEEVENTF_LEFTDOWN = &H2 Const MOUSEEVENTF_LEFTUP = &H4 Const MOUSEEVENTF_MIDDLEDOWN = &H20 Const MOUSEEVENTF_MIDDLEUP = &H40 Const MOUSEEVENTF_MOVE = &H1 Const MOUSEEVENTF_ABSOLUTE = &H8000 Const MOUSEEVENTF_RIGHTDOWN = &H8 Const MOUSEEVENTF_RIGHTUP = &H10
Private Sub Form_Activate()
Do 'Simulate a mouseclick on the cursor's position mouse_event MOUSEEVENTF_LEFTDOWN Or MOUSEEVENTF_LEFTUP, 0&, 0&, cButt, dwEI DoEvents Loop End Sub
Tchao
Guy DETIENNE
-- __________________________________ Tchao.net: L'informatique à votre dimension www.tchao.net Pour toute réponse, retirer le .nospam de l'adresse mail
"laurent Barthet" a écrit dans le message de news:bm6its$v5g$
Bonjour j'ai , il a peu de temps , poster un message pour un petit prog
et
je remercie les personne de m'aoir renseigner.
Cependant un point reste encore obscure : Comment declancher un MOUSE
DOWN.
( ou un click souris ). J'ai trouvé les Code des touches mais je ne c pas si c ca qu'il faut
