[fuzo]

Собственно сабж. Использовать нужно элемент Canvas.
Даже не представляю как это можно выполнить. Помогите пожалуйста.

[Страдалецъ]

Что-бы это заработало, вам надо сделать простейшую трансформацию. Скажем линия в координатах 50,50,60,100 должна быть перемещена в новые координаты 50,50,90,100 за 10 шагов. Вы разбиваете траекторию перемещения на 10 шагов, для каждого из шагов получаете новое положение линии. Последовательно выводите линию в новых координатах убирая ее из старых.
Вот когда вы сделаете это, тогда уже все остальное сделать будет элементарно.

[fuzo]

а как правильно задать эти кординаты для конваса?
какой командой

[v1s2222]

Код:

Рисование на канвасе?
Canvas.MoveTo - переместить по нужным координатам.
Canvas.LieTo - нарисовать линию.

[fuzo]

вот с горем пополам нарисовал этого человечка

Код:

Canvas.Brush.Color:=clRed;
Canvas.Ellipse(15,15,50,50);
Canvas.MoveTo(30,50);
Canvas.LineTo(30,130);
Canvas.MoveTo(30,130);
Canvas.LineTo(20,170);
Canvas.MoveTo(30,130);
Canvas.LineTo(40,170);
Canvas.MoveTo(10,80);
Canvas.LineTo(50,80);

Но как его заставить двигаться без понятия

[ryderx34]

посмотри вот этот код, в качестве примера:
man_walk.zip