Delphi - mover objetos

necesitaria pintar shapes en el formulario y luego moverlos y tratar estos shapes algo parecido al easy case. gracia un saludo

Hola.
En tu mensaje no dices si el numero de shapes es fijo o variable. De todas formas lo mejor que puedes hacer es crearlos en el FormCreate del formulario principal y asignarle a cada objeto el evento OnMouseDown, OnMouseUp y OnMouseMove y controlar el movimiento de cada uno de ellos. No tengo el Delphi por aqui ahora (estoy en la universidad) pero sería algo tal que así:

en el Formcreate
for c:=0 to 100 do begin
S:=Tshape.Create(self);
S.OnMouseDown:=ShapeMouseDown;
S.OnMouseUp:=ShapeMouseUp;
S.OnMouseMove:=ShapeMouseMove;
end;

con los eventos ShapeMouseDown y ShapeMouseUp gestionas donde has hecho click y donde has soltado el raton
luego en el evento ShapeMouseMove sería algo así como

Desplazamiento:=PosicionActual-PosicionAnterior;
TShape(Sender).Left:=TShape(Sender).Left+Desplazamiento;
TShape(Sender).Top:=TShape(Sender).Top+Desplazamiento;

Siento hacerlo de memoria :)
Espero que te de la idea

Hola !!
Muchas gracias por responder tan rapido, lo voy a probar ahora a ver si hay suerte.
Un saludo ,Aurelio