Как сделать в делфи анимацию: шарик движется по заданной окружности?

[tatee]

как сделать в делфи анимацию: шарик движется по заданной окружности?

[Zeraim]

Cos(t)*R + Ox
Sin(t)*R + Oy

[tatee]

извините, я не понимаю эту запись...
у меня такая окружность:

 with Image1.Canvas do
  begin
   Brush.Style:=bsClear;
   Pen.Color:=clBlack;
   Ellipse(70,40,200,170);
  end;

и какой нибудь кружочек-шарик должен ее описать секунд так за 4

[mihali4]

Zeraim дал вам формулы для вычисления координат, где нужно рисовать ваш "шарик".
По таймеру вычисляете (с нужным вам шагом) и рисуете...