Содержание

MoveByPath

Эмулирует движение мыши через указанные промежуточные точки.

Синтаксис

procedure MoveByPath(aPath:TCSMovePath; aLeftButton: boolean = false);

Параметры

Примеры

  1. //Передвигаем курсор мыши по дуге параболы
    var path:TCSMovePath;
    var point:TCSMovePoint;
    var i:integer;
    for i:=0 to 100 do
      begin
        point.X:=i*2;
        point.Y:=round(point.X*point.X/100);
        point.Duration:=round(i/10);
        path.add(point);
      end;
    MoveByPath(path);