Dibujar circulos y arrastrarlos

[mosorio]

Hola, tiempos sin escribir.

Después de tanto tiempo de desaparición debido a la utilización de otros lenguajes por culpa del mercado, he tenido la oportunidad de retomar el Delphi, y esta vez quiero hacer unas consultas.
Necesito dibujar en un área varios circulos, en los cuales cada uno colocarle un codigo o un numero, pero ademas de eso, poderlos seleccionar con el raton y poderlos arrastrar.
He estado mirando documentación del canvas, etc y he dibujado varios circulos, pero cuando quiero cambiar las coordenadas, o sale uno encima del otro o dibuja una elipse.
Además de esto, quiero enlazar los circulos con lineas y flechas para poder crear un grafico que necesito.
He visto unos componentes que lo hacen y son gratuitos, pero este componente tiene varias formas y sólo quiero el circulo y las lineas.
Se que alguno dirá y ¿por qué no lo tomas si es gratuito?, sencillamente porque pienzo tomar ese mismo codigo del dibujo del circulo para implementar un componente que me haga el circulo y en el encapsular otras funcionalidades que necesito para el módilo que estoy haciendo, por tal motivo si tomo ese componente, adicionaré más codigo y se que me voy a liar después.
Sólo pido por favor que me orienten en cómo debo dibujar el circulo, las lineas con flechas enlazarlas y crear el área de dibujo o donde se puedan visualizar.

Muchas gracias por adelantada.
PD: Utilizo D6. por cierto no he dejado de leer el foro, pero no he tenido tiempo para contestar a las consultas de otros compañeros.

Saludos