Проблема с движением вокруг своей оси.

[intelx1989]

Нужно заставить линию двигаться вокруг своей оси(как стрелка часов.) Не могу найти формулу для указания шага стрелки. Помогите пожалуйста. Язык программирования Delphi

[Levsha100]

двигаться вокруг своей оси

Это жесть...

X`:=X0+Cos(angle*Pi/180)*r;
Y`:=Y0+Sin(angle*Pi/180)*r;

[intelx1989]

Объясни пожалуйста что такое "angle"

[intelx1989]

case i of
0:begin
form1.Canvas.MoveTo(x,y);
form1.canvas.LineTo(xn,yn);
i:=1;
end;
1:begin
form1.Canvas.MoveTo(x,y);
form1.canvas.LineTo(100+round(Cos(1/90*Pi/180)*100),
100+round(Sin(1/90*Pi/180)*100));
end;
end;

В чем ошибка?