Как задать движение объекта с ускорением?

@панкратий · Регистрация: 07.06.2014

Есть код на движение: прописан в таймер.

Pascal

begin //перемещение влево
      Sr:=Sr + PixPerMM*V*Timer1.Interval/1000;
      iSr:=PosOx - Round(Sr);
      If iSr>LeftLimit then
        begin
          ShapeR11.Left:=iSr;
          ShapeR12.Left:=ShapeR11.Left;
          ShapeR21.Left:=ShapeR11.Left;
          ShapeR22.Left:=ShapeR11.Left;
        end

Что нужно изменить, чтоб объект shape начал двигаться с ускорением 1 м/с^2, и так же плавно останавливался?

@volvo · 09.06.2014, 11:58

При равноускоренном движении:

$https://www.cyberforum.ru/cgi-bin/latex.cgi?x = x_0+v_0t+\frac{at^2}{2}$

, ускорение у тебя есть, начальная скорость тоже, начальная координата есть. Где проблема-то?

@volvo Супер-модератор 30660 / 20009 / 7827 Регистрация: 22.10.2011 Сообщений: 34,836 Записей в блоге: 6
	09.06.2014, 11:58	2
	При равноускоренном движении: $https://www.cyberforum.ru/cgi-bin/latex.cgi?x = x_0+v_0t+\frac{at^2}{2}$ , ускорение у тебя есть, начальная скорость тоже, начальная координата есть. Где проблема-то? 0

Опции темы