Dibujar sobre una imagen.

[toorbye]

Gracias Seoane por el ejemplo, muchisima gracias, por ayudarme.
Un saludo

[oregon]

Me parece fantástica la posibilidad que se abre con los ejemplos 29 y 30 de seoane. Yo también ando metido en un problema parecido.
Necesito cargar una imagen (imagen de satelite) en un componente timage, y luego emplazar sobre ella dos tipos de puntos de los que más tarde necesito conocer sus coordenadas para realizar unos cálculos.
El caso es saber si es posible, en vez de dibujar, insertar un pequeño bmp (tipo icono) en el lugar deseado, y que luego se puedan mover para afinar o ajustar su posición. En realidad, no uno, sino tantos como se deseen.
Sería algo como que al pinchar sobre una opción del menu tipo "crear punto", se creara un timage, cargara una imagen pequeñita preestablecida, y permitiera colocarla únicamente sobre la imagen en la que se trabaja (como en los ejemplos), y que luego se pudiese desplazar o eliminar como en el ejemplo 30.
¿alguien sabe si es posible? ¿como? Se agradecen directrices!
Muchas gracias por vuestra ayuda y comentarios.

Ciao!

[[seoane]]

Ese icono que quieres insertar, ¿seria siempre el mismo o cada icono puede ser diferente?, si son diferentes ¿seria un numero limitado de iconos preestablecidos o podría ser cualquier icono?. si solo es un icono la solución es inmediata, si es una lista de ellos podemos usar un TImageList para almacenarlos, pero si se puede insertar cualquier icono la cosa se complica, no es imposible, pero se complica.

[oregon]

Gracias Seoane,

Se trata de usar únicamente dos iconos distintos, para marcar dos cosas distintas en la imagen de fondo.

he encontrado un programa demostrativo de algo parecido a lo que quiero hacer. Está disponible en la página web de Neftalí, y creo que es muy útil para esto, y creo que puede solucionar el problema.

De toda formas, tus ideas también son bienvenidas para resolver el asunto.

Gracias de nuevo,

[[seoane]]

Me alegro de que ya hayas resuelto el problema, sin embargo yo he seguido con el ejemplo un poco mas. Ahora en vez de usar arrays dinámicos uso TObjectList, y además ya se pueden insertar imágenes. También permite exportar la imagen resultante como un bmp.

Aquí te lo dejo, puede que te sirva, yo pido la ruta de la imagen cada vez que se quiere insertar una nueva, tu puedes usar el mismo método pero utilizando una ruta fija.

[oregon]

Pues funciona de maravilla. Es exáctamente lo que quería. Me dedicaré a destripar el codigo fuente para ver si aprendo a programar de verdad . Y a ver como lo aprovecho para mi programa.

La verdad es que da gusto este foro.

ciao!

[oregon]

Saludos,

Tras varios días pengándome con esto, creo que he conseguido apañarlo para mi aplicación. Muchas gracias seoane por los ejemplos.
Ahora tengo un par de problemas asociados. ¿cómo capturo las coordenadas de cada uno de los iconos pintados en runtime? Necesito pasar las coordenadas de cada uno de los iconos a un label o un stringgrid, pero no se como se llama cada uno de estos componentes creados en ejecución.

¿alguna idea?
Gracias!!