как заставить компонент Shape двигаться по ступенькам

[Ogurez]

как заставить компонент Shape двигаться по ступенькам или по какому нибудь другому графику типа круга овала синусоиде косинусоиде или других..

[Serge_Bliznykov]

движение ЛЮБОГО объекта, это изменение его координат.
Возьмём, например, коодинаты левого верхнего угла (Для ShapeX это будет ShapeX.Top и ShapeX.Left). Завести две переменные Xs, Ys и шаг движения - вещественного типа: var Xs, Ys, xStep : double;
дальше просто:
начало цикла:
стирайте ShapeX по координатам Top,Left:
где Left := Trunc(Round(Xs)); Top := Trunc(Round(Ys));
вычисляйте Xs := Xs + xStep;
Ys := ВашаФункцияЗависимости(Xs);
прорисовывайте новый shapeX по координатам Top,Left:
где Left := Trunc(Round(Xs)); Top := Trunc(Round(Ys));
задержка на n милисекунд;
если не выполнено условие окончания цикла перейти в начало цикла