Setting Mouse Position with SetCursorPos

[SoonerToucan]

I am attempting to set the position of the mouse to set coords in another window. I have been able to set the position by using SetCursorPos but for some reason I cannot get it to set the position in the other window. I am pretty sure I need to set the window by using the ClietToScreen() yet I am not able to get it to work. I am using the following code

    Private Declare Function ClientToScreen Lib "user32" (ByVal hwnd As IntPtr, _
    ByVal lpPoint As POINTAPI) As Integer

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

    Private Structure POINTAPI
        Dim X As Long
        Dim Y As Long
    End Structure

        Dim pt As POINTAPI

        pt.X = txtX.Text
        pt.Y = txtY.Text
        ClientToScreen(myHandle, pt)
        SetCursorPos(pt.X, pt.Y)

I have also tried varriations of this:

        Dim pt As POINTAPI

        ClientToScreen(myHandle, pt)
        pt.X = pt.X + txtX.Text
        pt.Y = pt.Y + txtY.Text
        SetCursorPos(pt.X, pt.Y)

I have the correct handle for the window (tried both as Integer and IntPtr) when I try the program with out the ClientToScreen function the mouse is moved to the coords based on my desktop, not on the window whos handle I pass. If I use the Integer or IntPtr it erros out with (Additional information: Object reference not set to an instance of an object)

Any help would be appreciated,
Patrick

[crpietschmann]

You don't need to use Win32 API calls to do either of those function calls in with the .NET Framework. Just use the following code:

Dim myPoint As New Point(100, 100)
myPoint = Form1.PointToScreen(myPoint)
System.Windows.Forms.Cursor.Current.Position = myPoint

[SoonerToucan]

That does seem to be a better way to move the mouse cursor. The problem I am having is that I am trying to move the cursor to a point relative to a seperate window.

I am attempting to find out where the window(the window of another program such as winamp) resides on the desktop. I know that the position I want my mouse to be at is 100, 100 in from the top left corner of the winamp window. Because I am trying to find the location of the winamp window it needs to be variable in case the winamp window moves.

If you know how to find the coords of a certain windows application I can use the code above to move the mouse.

Thanks,
-P

[crpietschmann]

You can get the position of a window with the GetWindowRect function.

http://pietschsoft.com/programming/v...indowrect.html

[MrGTI]

Dim myPoint As New Point(100, 100)
myPoint = Form1.PointToScreen(myPoint)
System.Windows.Forms.Cursor.Current.Position = myPoint

That code doesn't work crpietschmann.

The bolded section returns the error "Reference to a non-shared member requires an object reference."

[crpietschmann]

Are you sure Form1 is an object?