Содержание

MoveToPoint

Emulates mouse movement to the specified point relative to the upper left corner of the window.

Syntax

procedure MoveToPoint(aPoint:TCSPoint; aPointCount:integer=0;
  aInterval:integer=0; aLeftButton: boolean = false); overloaded;
 
procedure MoveToPoint(aX:integer; aY:integer; aPointCount:integer=0;
  aInterval:integer=0; aLeftButton: boolean = false); overloaded;

Parameter

  • aPoint
    • type: TCSPoint
    • functions: target point
  • aX
    • type: integer
    • functions: X coordinate of the target point
  • aY
    • type: integer
    • functions: Y coordinate of the target point
  • aPointCount
    • type: integer
    • functions: number of intermediate points
  • aInterval
    • type: integer
    • functions: delay (in milliseconds) between movements from point to point
  • aLeftButton
    • type: boolean
    • functions: emulation of the pressed left mouse button

Examples

  1. var Point:TCSPoint;
    Point.X:=500;
    Point.Y:=400;
    //Emulate mouse movement to a point Point;
    MoveToPoint(Point);
  2. //Emulate mouse movement to a point (500,400);
    MoveToPoint(500,400);