|
|
|
|
Thread title: [VB.NET]Mouse click(coords problems) |
|
|
|
|
|
Thread tools
Search this thread
Display Modes
|
|
11-06-2007, 12:46 AM
|
#1
|
Status: Junior Member
Join date: Aug 2006
Location:
Expertise:
Software:
Posts: 58
|
[VB.NET]Mouse click(coords problems)
What i want to acomplish, to find the coordinates of my screen so like upper left corner is 0,0 but i'm getting proble with it, I want to use the SetCursorPos function later wit the coords that are recorded
I'm using the GetCursorPos function to get the coords
But when i want to see the x and y coords i get something very strange.
x = 1155346203274
y = 0
Now i want to know how can i get this fixed? :s
Code:
Structure PointApi
Dim x As Long
Dim y As Long
End Structure
Declare Function GetCursorPos Lib "User32" ( _
ByRef lpPoint As PointApi) As Long
Private Sub btnPosition_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnPosition.Click
Dim pt32 As PointApi
GetCursorPos(pt32)
txtX.Text = pt32.x
txtY.Text = pt32.y
|
|
11-06-2007, 01:28 AM
|
#2
|
Status: Member
Join date: Mar 2006
Location: t.dot canaada
Expertise:
Software:
Posts: 182
|
|
|
11-06-2007, 08:45 PM
|
#3
|
Status: Junior Member
Join date: Aug 2006
Location:
Expertise:
Software:
Posts: 58
|
|
|
11-06-2007, 10:44 PM
|
#4
|
Status: Member
Join date: Mar 2006
Location: t.dot canaada
Expertise:
Software:
Posts: 182
|
Yup, I didnt post that link because it didnt have examples, but I'm sure if you google it you'll get something, and then if you have trouble post code here, and ill help you debug it
|
|
11-07-2007, 06:19 PM
|
#5
|
Status: Junior Member
Join date: Aug 2006
Location:
Expertise:
Software:
Posts: 58
|
ok thanks
[Edit]
How do you get hwnd?
|
|
11-08-2007, 12:25 AM
|
#6
|
Status: Member
Join date: Mar 2006
Location: t.dot canaada
Expertise:
Software:
Posts: 182
|
|
|
11-08-2007, 09:57 PM
|
#7
|
Status: Junior Member
Join date: Aug 2006
Location:
Expertise:
Software:
Posts: 58
|
got that part to work thanks
but now I'm want to move cursor to a special position. I have
Code:
Declare Function 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)
mouse_event(MOUSEEVENTF_MOVE, txtX.Text, txtY.Text, 0, 0)
when running I get MarshalDirectiveException was unhandled :s
|
|
11-09-2007, 03:55 AM
|
#8
|
Status: Member
Join date: Mar 2006
Location: t.dot canaada
Expertise:
Software:
Posts: 182
|
uhh, wow I've never seen that error before lol.
post the code.
|
|
11-10-2007, 04:57 PM
|
#9
|
Status: Junior Member
Join date: Aug 2006
Location:
Expertise:
Software:
Posts: 58
|
ok full code
Code:
Public Class frmClicker
Declare Function 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)
Const MOUSEEVENTF_MOVE = &H1
Private Sub btnPosition_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnPosition.Click
System.Threading.Thread.Sleep(2000)
txtX.Text = System.Windows.Forms.Cursor.Position.X
txtY.Text = System.Windows.Forms.Cursor.Position.Y
End Sub
Private Sub btnStart_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnStart.Click
mouse_event(MOUSEEVENTF_MOVE, txtX.Text, txtY.Text, 0, 0)
End Sub
End Class
|
|
11-11-2007, 12:48 AM
|
#10
|
Status: Member
Join date: Mar 2006
Location: t.dot canaada
Expertise:
Software:
Posts: 182
|
Code:
Public Class frmClicker
Const MOUSEEVENTF_MOVE = &H1
Private Sub btnPosition_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnPosition.Click
System.Threading.Thread.Sleep(2000)
txtX.Text = System.Windows.Forms.Cursor.Position.X
txtY.Text = System.Windows.Forms.Cursor.Position.Y
End Sub
Private Sub btnStart_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnStart.Click
'get the cursor handle
Me.Cursor = New Cursor(Cursor.Current.Handle)
Cursor.Position = New Point(Convert.ToInt32(txtX.text), Convert.ToInt32(txty.text))
End Sub
End Class
try using the framework as much as possible. api is good but use it when its absolutely neccessary.
|
|
|
|
|
|
|
|
Currently Active Users Viewing This Thread: 1 (0 members and 1 guests)
|
|
|
|