BOT MOUSE
Ae gente, fiz um bot ja está quase completo ja tem auto click e sendkeys só falta eu posicionar o mouse onde o bot vai clicar, alguem ae sabe como fazer isso, tipo, quero que o mouse vá procentro depois cliquei, depois va um poco pra direita etc, só me falar a rotina que o restou eu fasso
procura um sistema que captura o x e o y do mouse tinha uns exemplos ja e um passo pra voce....
aqui uma exemplo de uso de api pra capturar o x e o y do mouse
Use API. Coloque um Label no Form e o código abaixo:
Citação:
Private Declare Function GetCursorPos Lib [Ô]user32[Ô] (lpPoint As POINTAPI) As Long
Private Type POINTAPI
* * X As Long
* * Y As Long
End Type
Dim Posicao As POINTAPI
Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
* * GetCursorPos Posicao
* * CurrentX = 0
* * CurrentY = 0
* * Label1 = [Ô]X=[Ô] & CStr(Posicao.X) + [Ô], Y=[Ô] & CStr(Posicao.Y)
End Sub
Use API. Coloque um Label no Form e o código abaixo:
Citação:
Private Declare Function GetCursorPos Lib [Ô]user32[Ô] (lpPoint As POINTAPI) As Long
Private Type POINTAPI
* * X As Long
* * Y As Long
End Type
Dim Posicao As POINTAPI
Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
* * GetCursorPos Posicao
* * CurrentX = 0
* * CurrentY = 0
* * Label1 = [Ô]X=[Ô] & CStr(Posicao.X) + [Ô], Y=[Ô] & CStr(Posicao.Y)
End Sub
e para mover o mouse eu troco a posição X e Y do muito no private form? ex
* *CurrentX = 5
* * CurrentY = 8
??
* *CurrentX = 5
* * CurrentY = 8
??
Só definir os pontos...
Windows.Forms.Cursor.Position = New System.Drawing.Point(0, 0)
Tópico encerrado , respostas não são mais permitidas