La Web del Programador: Comunidad de Programadores
 
    Pregunta:  14074 - COMO ARRASTRAR OBJETOS DENTRO DE OTROS OBJETOS MANUALMENTE
Autor:  omar hamden
Hola, He intentado arrastrar un objeto tshape, dentro de otro tshape manualmente, y no lo he conseguido....modifique la propiedad del tshape (DRAGMODE) a Manual, Para Controlarlo yo con codigo, y la propiedad DRAGKIND no se si dejarla a DOCk o a DRAG,,porque la dejo en DRAG y en el evento ON MOUSE DOWN le digo
BEGINDRAG(FALSE);

  Respuesta:  Sebastián Mayorá
Además de lo que has utilizado debe manejar los eventos OnDragOver y OnDragDrop. El DragKind dejalo en drag.
OnDragOver debes usar accept para decir si aceptas que se arrastre sobre el objeto.
en OnDragDrop debe codificar lo que deseas que suceda al soltar el objeto