Содержание

ScrollByPath

Эмулирует скролл через промежуточные точки.

Синтаксис

procedure ScrollByPath(aPath: TCSMovePath);

Параметры

Замечания

Примеры

  1. //В результате выполнения страница будет прокручена на 500 точек вниз, постепенно замедляясь
    var path:TCSMovePath;
    var point:TCSMovePoint;
    var i:integer;
    for i:=0 to 50 do
      begin
        point.X:=0;
        point.Y:=-10;
        point.Duration:=i*2;
        path.add(point);
      end;
    ScrollByPath(path);