MouseMove

Посылает событие движения указателя мыши в указанных координатах. Координаты должны указывать на точку в пределах окна браузера, в противном случае событие произведено не будет. Координаты указываются относительно левого верхнего угла окна браузера.

Синтаксис

PASCAL

procedure TTab.MouseMove(aPoint: TPoint); overload;
procedure TTab.MouseMove(aX: Integer; aY: Integer); overload;

ECMA

TTab.mouseMove(aPoint); 
TTab.mouseMove(aX, aY); 

Параметры

Параметр Тип (PASCAL) Тип (ECMA) По умолчанию Описание
aPoint TPoint TPoint - Объект, описывающий положение точки внутри окна браузера
aX Integer Number - Координата X точки события
aY Integer Number - Координата Y точки события

Возвращаемое значение

Тип (PASCAL) Тип (ECMA) Описание

Примеры

PASCAL

  1. //{$MODE PASCAL}
    TABS[0].Load('tests://drawing-1.html');
    var rect := TABS[0].GetElements('#container')[0].Rect;
    for var i := 0 to 300 do
    	TABS[0].MouseMove(rect.Left + RandomInt(50) + i, rect.Top + RandomInt(50) + i);

  1. //{$MODE PASCAL}
    TABS[0].Load('tests://drawing-2.html');
    var rect := TABS[0].GetElements('#container')[0].Rect;
    TABS[0].MouseDown(rect.Left, rect.Top);
    for var i := 0 to 250 do
    begin
    	var rndX := RandomInt(50);
    	var rndY := RandomInt(50);
    	TABS[0].MouseMove(rect.Left + rndX + i, rect.Top + rndY + i, true);
    	if i = 250 then
    		TABS[0].MouseUp(rect.Left + rndX + i, rect.Top + rndY + i);
    end;

ECMA

  1. //{$MODE ECMA}
    TABS[0].load('tests://drawing-1.html');
    var rect = TABS[0].getElements('#container')[0].rect();
    for (var i = 0; i < 300; i++){
    	TABS[0].mouseMove(rect.Left + Math.random() * 50 + i, rect.Top + Math.random() * 50 + i);
    }

  1. //{$MODE ECMA}
    TABS[0].Load('tests://drawing-2.html');
    var rect = TABS[0].GetElements('#container')[0].Rect;
    TABS[0].MouseDown(rect.Left, rect.Top);
    for var i = 0 to 250 do
    begin
    	var rndX = RandomInt(50);
    	var rndY = RandomInt(50);
    	TABS[0].MouseMove(rect.Left + rndX + i, rect.Top + rndY + i, true);
    	if i = 250 then
    		TABS[0].MouseUp(rect.Left + rndX + i, rect.Top + rndY + i);
    end;