MoveToPoint

Эмулирует движение мыши к указанной точке относительно левого верхнего угла окна.

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;

• aPoint
  • тип: TCSPoint
  • назначение: целевая точка
• aX
  • тип: integer
  • назначение: координата X целевой точки
• aY
  • тип: integer
  • назначение: координата Y целевой точки
• aPointCount
  • тип: integer
  • назначение: количество промежуточных точек
• aInterval
  • тип: integer
  • назначение: задержка (в миллисекундах) между перемещениями от точки к точке
• aLeftButton
  • тип: boolean
  • назначение: эмуляция нажатой левой клавиши мыши

1. var Point:TCSPoint;
   Point.X:=500;
   Point.Y:=400;
   //Эмулируем движение мыши в точку Point;
   MoveToPoint(Point);

2. //Эмулируем движение мыши в точку (500,400);
   MoveToPoint(500,400);