Dibujar circulos y arrastrarlos

[dec]

Hola,

No puedo darte una respuesta, pero, se me ocurren algunas cosas luego de leer tu mensaje. Espero que no te importe que las refiera: lo haré por ver si pueden servir de algo.

Supongo que cuando hablas de que existe un componente para hacer más o menos lo que precisas te refieres al componente "TSimpleGraph" publicado en DelphiArea. Lo supongo porque se ha tratado en estos Foros sobre este componente.

Si es así el mencionado componente no es que sea gratuito, es que además es libre, esto es, de código abierto, como se dice. Entonces, ¿porqué no partes de cómo se hace allí lo que tú precisas hacer?

Por otro lado, probablemente no tengas que utilizar el componente al completo: tal vez podrías heredar de alguna clase base del mismo, si ya no te interesa utilizar toda su potencia, o quieres añadir algo por tu cuenta.

Ya ves. No se me ocurre otra cosa. Lo siento. Si he dicho lo que he dicho es porque, verdaderamente, el componente "TSimpleGraph" hace algo tan parecido a lo que pretendes que me parece una buena fuente para averiguar cómo consigue hacer lo que hace.

Probablemente alguien ofrecerá otro punto de vista o información de cómo solucionar algunas o todas las cuestiones que planteas: bienvenido sea.

[Neftali [Germán.Estévez]]

Lo que yo puedo añadir...

(1) He utilizado el componente del que habla dec y lo he modificado (incluso he mantenido un par de conversaciones con el autor por temas de bug y sugerencias) y lo encuentro muy recomendable; Ya que implementa muchas funcionalidades típicas de un editor de éste tipo y además es fácilmente ampliable; En mi caso derivé algunos de los objetos existentes para añadirles propiedades y creé algunos nuevos.

(2) De todas formas, si deseas no utilizarlo, yo optaría por utilizar objetos, en lugar de ir directamente al Canvas. Una buena opción (básica y sencilla) es utilizar TShape. Te adjunto un pequeño ejemplo que en su día posteé para mover imágenes (en su día debían ser mesas de un restaurate), pero que con unas pequeñas modificaciones funciona perfectamente con TShapes y te puede servir para hacer circulos y líneas.

De todas formas, ten en cuenta las operaciones que vas a necesitar posteriormente; Por ejemplo, si luego vas a necesitar que se puedan seleccionar los elementos, dibujarles los típicos puntos de selección que aparecen en diseño, poder cambiarles el tamaño, poder guardar y recuperar de disco, poder imprimir, poder añadirles etiquetas, cambiarles color y tipo de línea, hacer Zoom,... Todas esas operaciones son las que te brinda el componente comentado.

[mosorio]

Hola,
Les doy muchas gracias por las respuesta, de hecho es lo que he pensado y puesto manos a la obra, ayer mismo, hice un pequeño componente basado en el TShape, claro que he tomado el código donde dibuja el circulo solamente ya que es el único tipo de gráfico que necesito, con respecto al componente que mencionan, si es el mismo, pero lo que estoy haciendo es un aplicativo de la empresa que será vendido a un cliente y para evitar los temas de LOPD, prefiero realizarlo y hacer las preguntitas pertinentes del caso, se que puedo basarme en el código para algunas cosas que necesito y de hecho creo que lo haré.
Pero hasta donde llegan los temas de licenciamiento por utilizar parte de este código o basarme en él.

Gracias nuevamente