diagrams de flujo con canvas helpp!!

[[seoane]]

Supongo que si es un trabajo para la escuela el uso de componentes que lo hagan todo esta desaconsejado, porque existen componentes muy buenos para hacer diagramas de flujo, busca en el foro y veras.

Pero si lo tienes que hacer tu, aquí te dejo un ejemplo de como dibujar formas simples (rectángulos y círculos) en un TPaintBox. Podrás moverlos, cambiar su tamaño y color. Para mover una figura pulsa sobre ella y arrastrala, para cambiar su tamaño pulsa cerca del borde de la figura y arrastra. Para cambiar el color selecciona una figura haciendo clic sobre ella y utiliza el menú editar.

Bueno, aquí te lo dejo. Lo acabo de realizar ahora así que puede que tenga algún fallo

Edito: Este ejemplo se continuo en otro hilo dando como resultado el Ejemplo31.zip, que se puede encontrar en ese hilo. Si alguien esta interesado:

http://www.clubdelphi.com/foros/showthread.php?t=36508