Unir dos o más imágenes

[BlackDaemon]

Hola

Bueno, no sabía que título poner a este tema, pues buscando en el foro he encontrado que ya se había tratado esto de unir 2 o más imágenes en forma lineal y hacer una sola, en este hilo tocan el tema:
http://www.clubdelphi.com/foros/show...=unir+imagenes

Y bueno, el problema es que consume mucha memória y delphi creo qu eno puede manejar imágenes muy grandes.

Ahora mi problema o más bien lo que quiero hacer es poder unir 4 imágenes o más, pero en forma de tablero, osea si tengo las imágenes 0,0 - 0,1 - 1,0 - 1,1, lo que quisiera hacer es un cuadrado de 2x2 con las 4 imágenes, y lo mismo si tengo más imáganes, no siempre tendrá que ser un cuadrado, puede ser un rectángulo, osea una sola imágen de 2x3 por ejemplo, no se como manipular imáganes en delphi, pero bueno, tendré que aprender, al parecer es crear un Timage del tamaño del total de todo el ancho x largo de la suma de las imágenes de ahí ya no sé qué propiedads tendrá el canvas para esto.. y bueno, a ver si alguien me puede ayudar con esto, por cierto, las imágenes son .jpg y quisiera guardar el resultado en el mismo formato, ahora bien, como estoy tratando con múuuchas imágenes me imagino que el resultado final será bastante grande.

Saludos!

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

En mi página web hay un ejemplo justo de lo contrario, trocear una imagen en N dividiendo la inicial en forma de tablero. Ya se que no es exactamente lo mismo, pero creo que si revisas el código te pueda dar la idea de cómo hacerlo.

Creo que la idea es muy similar, y las herramientas paa conseguirlo, las mismas. En una, se divide el canvas y se guardan las partes, en el otro (el tuyo), se trata de crear un canvas más grande e ir añadiendo los trozos.

Un saludo.

[BlackDaemon]

Hola

Pues he bajado el ejemplo y poco o nada le entiendo jeje, primero tengo una duda, ¿por que siempre trabajan con mapa de bits (.bmp)? y no con un jpg o png ?

Bueno, lo que no se muy bien como hacer es a la hora de crear mi Timage, de que tamaño lo crearía ? de la suma de todos los lados por anchos de las imágenes a unir ?? O iría agrandando de acuerdo a lo que necesite ?
ya que como comenté antes, la imágen resultante puede ser _muy_ grande.. por cierto, hasta cuanto de tamaño puedo crear una imágen en delphi ? ya que había pensando que si se necesita más grande, pues que se creen 2 o 4, dependiendo del máximo soportado por delphi

Saludos!

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

Empezado por BlackDaemon

¿por que siempre trabajan con mapa de bits (.bmp)? y no con un jpg o png ?

Porque es un ejemplo.
Entre otras cosas, porque el ejemplo es antiguo y Delphi sólo soporta PNG desde la última versión. En cuanto a JPEG supongo que se podrá hacer sin problemas.

Empezado por BlackDaemon

Bueno, lo que no se muy bien como hacer es a la hora de crear mi Timage, de que tamaño lo crearía ? de la suma de todos los lados por anchos de las imágenes a unir ??

Pues eso sería bastante lógico. Crear un TCanvas con la dimensión total (si es que la conoces) y pegar en cada punto la imagen que toca.

Empezado por BlackDaemon

O iría agrandando de acuerdo a lo que necesite ?
ya que como comenté antes, la imágen resultante puede ser _muy_ grande.. por cierto, hasta cuanto de tamaño puedo crear una imágen en delphi ? ya que había pensando que si se necesita más grande, pues que se creen 2 o 4, dependiendo del máximo soportado por delphi

El ir agrandando no creo que te solucione el problema; Si tienes problemas con una imagen grande, aunque empieces con ella pequeña, cuando la vayas agrandando llegarás a tener el mismo problema.

No se a qué te refieres con muy grande. Supongo que los límites vienen dados por la memoria; De todas formas cualquier tratamiento con imágenes grandes va a ser lento y tedioso. Das pocas explicaciones de qué vas a hacer luego con esa imagen tan grande, pero yo optaría por no trabajar con imágenes gigantescas, sino con imágenes más pequeñas que luego combinas para simuñar una más grande.

[BlackDaemon]

Hola

Bueno, me a quedado todo claro, y tienes razón en eso de ir haciendo más grande las dimenciones del Timage, mejor lo hago a la primera, y si, si conozco el tamaño que tendrá al final.

Ahora lo que intento hacer es esto:
1.- .Crear una clase derivada de Timage (la cual contendrá todo el tablero)
2.- Asignarle el tamaño de si ancho y alto (suma de todas las dimenciones de imágenes pequeñas)
3.- Crear otra clase derivada de Timage (la cual contendrá la imágen pequeña)
4.- Cargo la primera imágen pequeña
5.- Ahora la copiaría a la esquina superior izquiera de Timage grande (Cómo hago esto??)
6.- Lo mismo que 5, pero abajo de la primera
7.- ahora a la derecha y por último abajo de la imágen de la derecha

Bueno, esto suponiendo que tengo 4 imágenes y que para unirlas tendría que seguir esto:

0,0 - 1,0
0,1 - 1,1

So tendría de 3x3 pues así:

0,0 - 1,0 - 2, 0
0,1 - 1,1 - 2, 1
0,2 - 1,2 - 3, 2

Bueno, creo que la lógica la sé, pero lo que no sé es que funciones, propiedades usar para copiar, pegar de un Timage a otro

Luego supongo que con 2 bucles anidados solucionaría el problema

A ver si alguien me puede guiar con un poco de código, desde ya muchas gracias

Saludos!

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

Empezado por BlackDaemon

Bueno, creo que la lógica la sé, pero lo que no sé es que funciones, propiedades usar para copiar, pegar de un Timage a otro

De ahí venía la recomendación del ejemplo.
Debes Copiar un TCanvas (n directamente el TImage) sobre otro (cosa que hay en el ejemplo).
TRabajas con TImage, pero para copiar/pegar porciones, lo haces con la propiedad Canvas del TImage.