SRL Archive - Delphi/FPC Help and Tutorials

I'm having a bit of trouble moving the mouse.

I can move the mouse just fine, but it doesn't recognize the active window's boundaries.

Meaning… I tell it to move the mouse to the form's upper-left corner (0, 0), but it moves it to to the Screen's upper-left corner. Help?

Also, what's the best command to use to move the mouse?

So far I've found:

SetCursorPos(X, Y);

Mouse.CursorPos := TPoint;

and

Mouse_Event(MOUSEEVENTF_MOVE, TPoint.X, TPoint.Y, 0, GetMessageExtraInfo);

Are there any differences between the three?

Sounds like the first is MoveMouse. You should try reconstructing the mouse procedure from SRL in Delphi. It would be great experience.

Anyways, I have no clue about your problem. I'm guessing the SetClientWindowHandle is native to SCAR? Or did it come directly from Delphi?

No clue :S Maybe you should ask freddy?

Add the client window's screen position to the coordinates you want to move the mouse to?

I guess I could do that. Mark where the client's position is in relation to the rest of the screen. I'd hate to bug Freddy about this :)

Get the wanted windows coords with

function GetWindowRect(HWnd : LongInt; var Rect : TRect)

You could use ClientToScreen.

Is it your form you are navigating around, or another window?

Ty Spky :)

It's my form, and what exactly does ClientToScreen do?

You need only use ClientToScreen. It just calculates the coords so MoveMouse(0, 0) will move to your forms Top, Left instead of the screens.

procedure MoveMouse(x, y: Integer) ;
var 
 Point: TPoint;
begin
   Point:= ClientToScreen(Point(x, y)) ;
   SetCursorPos(Point.x, Point.y) ;
end;

Awesome, Thanks :)

Easier than I thought it was gonna be.