Implementación de un Canvas para modificar Objetos en Delphi parte II

Continuando con las mejoras de la aplicación, desde ésta se pueden dibujar diferentes conexiones entre cajas. Con la siguiente imagen veréis las cosas un poco más claras:

Ahora, podemos seleccionar una de las cajas, y realizar una conexión hacia la otra. Simplemente hay que acompañar el mouse y automáticamente generará la conexión entre centros de caja. Ahora he modificado la clase para que contenga diferentes apuntadores a otros objetos:

De ésta manera guardo un apuntador al objeto conectado y luego puedo acceder fácilmente a éste para realizar el dibujado de la línea de conexión. Ahora el sentido es único y solo admite una conexión por caja, pero bueno eso cambiará en breve. Aquí os dejo la última versión de la aplicación "Thundax Box Manager v1.0.0.6". Dentro de poco os mostraré los patrones utilizados y una versión mucho más mejorada, con mejor control de eventos que ésta versión beta en fase de desarrollo.