Imprimir Página - Simular posicion del mouse y posteriormente clickearse

Título: Simular posicion del mouse y posteriormente clickearse
Publicado por: renga73 en 25 Abril 2006, 10:02 am

Lo q quiero hacer es simular q en un determinado momento el puntero del mouse se ubique en una cierta posicion la cual conozco y luego se clickee.
Suponer q la posicion es 400x250. Bueno quiero q cuando clickee un boton el puntero se ubique ahi y se clickee.
No hace falta ver q el puntero se mueva, me interesa q se ubique en esa posicion y se clickee.

Título: Re: Simular posicion del mouse y posteriormente clickearse
Publicado por: dekland en 8 Julio 2006, 18:30 pm

Para posicionar el mouse tenes que:

Código:

Private Declare Function SetCursorPos Lib "user32" _
(ByVal x As Long, ByVal y As Long) As Long

Private Sub Command1_Click()
SetCursorPos 500, 233
End Sub

Te recomiendo que fijes la posicion del formulario, porque como esta puede variar al menos un poco, se puede ir es misma resposicion a otro lado.

Título: Re: Simular posicion del mouse y posteriormente clickearse
Publicado por: NYlOn en 9 Julio 2006, 01:51 am

Con SetCursorPos no podes simular los clicks del mouse. Para eso necesitas la API mouse_event. Un ejemplo seria asi:

Código:

Private Declare Function SetCursorPos Lib "user32.dll" (ByVal x As Long, ByVal y As Long) As Long
Private Declare Sub mouse_event Lib "user32.dll" (ByVal dwFlags As Long, ByVal dx As Long, ByVal dy As Long, ByVal cButtons As Long, ByVal dwExtraInfo As Long)
Private Const MOUSEEVENTF_LEFTDOWN As Long = &H2
Private Const MOUSEEVENTF_LEFTUP As Long = &H4

Private Sub Command1_Click()
    SetCursorPos 25, 750
    mouse_event MOUSEEVENTF_LEFTDOWN Or MOUSEEVENTF_LEFTUP, 0, 0, 0, 0
End Sub

Si queres simular otros botones del mouse busca otras constantes que empiecen con MOUSEEVENTF...

Saludos.-

Foro de elhacker.net

Programación => Programación Visual Basic => Mensaje iniciado por: renga73 en 25 Abril 2006, 10:02 am