Cómo mostrar imagenes irregulares?

[Softhem]

Hola amigos,

Soy novato para el manejo de gráficos en Delphi. Quisiera que me orientaran sobre cómo mostrar imágnes irregulares, en tiempo de ejecución, llamadas todas ellas mediante botones (que he colocado en la parte inferior de la pantalla). El efecto que busco es como armar un rompecabezas de piezas irregulares, donde las piezas las vas colocando sin una secuencia y al final muestra la figura completa. También les agradeceré me recomienden el formato de imagen más adecuado para que el programita no pese mucho.

[[Lepe]]

En principio, un TImage con la propiedad Transparent en True, strecht a true, Autosize en false. Con eso ya tienes las piezas.

El moverlas, podría ser por botones (cambiando el top y left de cada imagen) o arrastrar y soltar.

El formato de imagen pues JPEG, tienes que añadir el "uses jpg" para poder usar ese formato.

¿te sirve?

Saludos

[Lord Delfos]

Algo para mirar que puede ayudarte con el tema de arrastrar y soltar.

http://www.delphiforfun.org/programs...gImageDemo.htm

[jandres007]

Que buen enlace, a mi tambien me sirvio

[Softhem]

Gracias por las sugerencias. Las pondré en práctica ya y comento que pasa.

Saludos.

[Softhem]

Empezado por Lepe

En principio, un TImage con la propiedad Transparent en True, strecht a true, Autosize en false. Con eso ya tienes las piezas.

El moverlas, podría ser por botones (cambiando el top y left de cada imagen) o arrastrar y soltar.

El formato de imagen pues JPEG, tienes que añadir el "uses jpg" para poder usar ese formato.

¿te sirve?

Saludos

Hola, hola, FireBird:

Disculpas, creo que no me expliqué bien. Trato de armar algo parecido a un rompecabezas, en el que las piezas tienen formas no definidas (una parte es hembra y la otra macho, para ensamblarse), vamos como si se tratase de la división política de un país: Texas, California, Miami, etc. Las imágenes las tengo por ahora en formato GIF, rodeadas de una zona que debe ser transparente y no ocultar la imagen que quedase abajo, sino acoplarse a ella.

Gracias.

[[Lepe]]

Te he entendido bien.

La idea es usar un TImage que será transparente, la imagen por tanto debe tener un color de fondo que después puede obligarse a ocultar. El resultado que ves en pantalla es sólo la imagen irregular. ¿se llega a ver el borde cuadrado del Timage?

Ese es el método fácil.

El método algo más complejo y laborioso, es crear una ventana irregular, es decir, en tiempo de diseño creas una ventana te tamaño de la pieza y ahora con las propiedades de la ventana:
-Color := clRed
- TransparentColor := clRed
- Transparent := true
pones un Timage con la imagen cargada de la pieza.

Cuando muestres esa ventana, será igual que el windows Media Player o esos reproductores de mp3 tan chulos con agujeros y demás. Pero esto tiene un fallo, si la imagen de la pieza tiene un color rojo puro, se creará un hueco en ese sitio.

Como estás haciendo un puzzle y es más que probable que uses todos los colores, no te recomiendo esta opción.

Saludos

[Softhem]

Hola Lepe,

Sigo tratando de mostrar la imágenes de manera que se vaya formano la imagen final, pero lo que no logro hacer es que el color que rodea a las imágenes irregulares se transparente. Siempre se ve el color que las rodea, en este caso ya he probado con distintos colores como fondo y nada. Las imágenes son JPG, y al colocar una sobre la otra desaparece la que queda abajo.

Es más, probé iniciar el programita con una de las imágenes, activando Transparent en el TImage, y tampoco logro la transparencia. Seguramente algo estoy haciendo mal, usé Delphi 4, 5 y 7 y en ninguno logro la transparencia.

Heeeelp!!!

Saludos.

[[Lepe]]

He hecho pruebas con delphi 7 y con jpeg es cierto que no va las transparencias. Quizás usando un componente de terceros.

Aquí he hecho una prueba con bmp y si funciona correctamente, de hecho el color de fondo de cada pieza es distinta y funciona bien con el Transparent en cada imagen.

Si no recuerdo mal Delphi coge el pixel (0,0) de la imagen y después aplica la transparencia a ese color en todo el Timage.

Saludos