[YVitaliy]

На

Shape

кажись других контролов бросать нельзя. Если хочешь сделять что-то типа "шага сетки", делай например так:

Код:

Label1.Left:=Label1.Left div {шаг сетки}*{шаг сетки};
Label1.Top:=Label1.Top div {шаг сетки}*{шаг сетки};

при установке новых координат лэйбла.