ШАрик двигается по петли

[jomix]

помогите пжл с движением шарика по закону (это петля)
x=a*t*(1-t*t);
y=a*(1-t*t);

[Сильванович Михаил]

Сложного нет ничего. Единственное - надо осуществить переход
с мировой СК к Декартовой:
Ox: x
Oy:

var Y0: integer;
{определяем стартовую координату, когда Y2=0,
  обычно середина канвы.}
Y0:=Object1.Height div 2;

Функция, преобразующая координату:

function ConvertY(y: integer): integer;
begin
 Result:=Y0-Y;
end;

Далее осуществляем движение:
Пусть t=0
1) помещаем шарик в точку A(X,ConvertY(Y)), где
x=a*t*(1-t*t);
y=a*(1-t*t);
2) t:=t+1;
3) ждем 100-200 мс, повторяем п.1. если t<50 (напр.), иначе завершаем
цикл.

[pu4koff]

Сильванович Михаил, а координату х по вашему не следует переводить по аналогии с у? всеже вероятны отрицательные значения и я бы перевел... ConvertX = X0 + X

[Сильванович Михаил]

И то правда...