De Imagen a bitmap

[ElDuc]

Hola amigo/as de Delphi.

LLevo unos día intentando hacer algo que ni siquiera sé si es posible.

Tengo 4 TImages en mi formulario.

En las 3 primeras cargo sendas imágenes del disco.

Y deseo visualizar en la cuarta TImage 3 miniaturas de las primeras.

Para hacer esto he intentado todo lo que se me ha ocurrido, pero no consigo ni que se vea una miniatura.

Básicamente, si los 4 TImages son del mismo tamaño (300x300) lo que intento es coger el bitmap de la primer TImage y con StreshDraw incorporarlo al 4 TImage con un tamaña de 100x100 y así sucesivamente, pero no se por donde continuar.

Espero que me podáis ayudar, seguro que conoceréis la sensación de no saber por donde continuar.

Gracias.

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

Pues creo que utilizando CopyRect para copiar porciones de unas imágenes hacia la nueva puedes conseguir lo que necesitas.
Revisa este hilo (http://www.clubdelphi.com/foros/showthread.php?t=63762&highlight=trocear+imagen). Habra sobre el tema de "Dividir imágenes" y sobre "juntarlas de nuevo".

Incluso tienes un par de ejemplos al respecto.

http://img638.imageshack.us/img638/7896/ejemploso.png

[ElDuc]

Muchas gracias. Perdona pero no veo el hilo que me indicas.

[ElDuc]

HE probado con CopyRect y lo que sucede es que la imagen que he cargado del disco con Imag1.Picture.LoadFromFile('Filename'), creo que se aloja en el bitmap del la TImage: "Image1.Picture.Bitmap"

Si tocas el canvas del TImage, se pierde la imagen guardada en el bitmap, es como si sólo funcionara uno o el otro y como CopyRect , creo, sólo funciona con canvas no tienes manera de tratar la imagen.

Saludos.

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

Muchas gracias. Perdona pero no veo el hilo que me indicas.

Debe ser porque no lo he puesto. :o:o
Perdona, ya está corregido (link (http://www.clubdelphi.com/foros/showthread.php?t=63762&highlight=trocear+imagen)).