Cómo mostrar imagenes irregulares?

[Softhem]

Hola Lepe,

Sigo sin poder hacer transparentes mis imágenes JPG, ni en el Delphi 7. En uses pongo Jpeg pero no funciona. Ya limpié bien mis imágenes en las esquinas, ahora estoy usando fondos en color blanco... y nada. Me dices que tú no tienes problemas con Delphi 7y eso es más frustrante. También he trabajado en otra PC con el 7... sin éxito.

Con las imágenes BMP no tengo problemas, pero mis figuras pesan unas 90 veces más que las mismas en JPG y se nota un leve retardo al mostrar una a una. Esto ya se volvió un reto para mi...

Saludos.

[[Lepe]]

a ver, a ver.... .que tengo instalada la biblioteca GraphicEx, que permite reconocer en delphi muchos formatos de imágenes (es gratuita), a ver si es eso .

Voy a cotillear un poco sobre el tema y te informo.

Note: Transparent has no effect unless the Picture property specifies a TBitmap object.

, pos probando otra cosa.

[[Lepe]]

El problema añadido del JPG es que obviamente comprime los colores y el fondo no es realmente Rojo, puede variar algunas tonalidades.

Solución: cambiar de formato. Como te decía he usado GraphicEx (tan sencillo como descomprimir y colocar en una carpeta accesible por el library path de delphi e incluir el uses GraphicEx). Hecho esto ya puedes abrir los .png, que como saben son imágenes sin pérdida de la calidad. (Mi bmp ocupaba 33 kb, el png 6 kb). He usado Gimp para la conversión.

También he pintado sobre el canvas del form la imagen, ya que estando dentro de un TImage no salía el fondo, quizás con más tiempo se pueda mejorar.

La idea sería ocultar la barra de título del Form2 y los bordes, hacer que puedas arrastrar la ventana arrastrando en la imagen (busca por el foro por HTCAPTION)

Saludos.

[Softhem]

Gracias Lepe,

Eres muy amable en apoyarme en este reto. Haré lo que me dices y les comento. Covertiré los BMP en PNG, creo que con los JPG no se logrará la transparencia a menos que se incluyan en el Delphi componentes de terceros

Saludos.

[[Lepe]]

usa irfanview te aliviará el proceso por lotes, marcas todos los archivos y le dices convertir... listo .

Saludos

[[Crandel]]

Hola Softhem, no se si seguis interesado en el tema, si es asi, lo que necesitas es uno de los componentes que desarrollo nuestro compañero Fede (delphi.com.ar).

El componente se llama TImageTransp. Estaba disponible en su pagina web, pero por lo visto esta caida. Si no lo puedes encontrar a dicho componente, te lo busco y lo subo aqui.

[Softhem]

Empezado por Crandel

Hola Softhem, no se si seguis interesado en el tema, si es asi, lo que necesitas es uno de los componentes que desarrollo nuestro compañero Fede (delphi.com.ar).

El componente se llama TImageTransp. Estaba disponible en su pagina web, pero por lo visto esta caida. Si no lo puedes encontrar a dicho componente, te lo busco y lo subo aqui.

Gracias por tu respuesta. Sí sigo interesado en el tema. Me gustaría optimizar el proyecto que estoy realizando. Espero más información sobre el componente que mencionas.

[delphi.com.ar]

Empezado por Crandel

Hola Softhem, no se si seguis interesado en el tema, si es asi, lo que necesitas es uno de los componentes que desarrollo nuestro compañero Fede (delphi.com.ar).

El componente se llama TImageTransp. Estaba disponible en su pagina web, pero por lo visto esta caida. Si no lo puedes encontrar a dicho componente, te lo busco y lo subo aqui.

¿Alguien tiene el código de mi componente?... porque ni lo recuerdo!!

Lo que sucede si utilizamos ventanas irregulares, es que el dibujado de estas es mucho mas costoso, ya que no entra dentro de la lógica de overlapping de rectángulos. Un posibilidad concreta, es utilzar imágenes con transparencias, por ejemplo: GIF o PNG. Recomiendo las segundas, ya que tienen un canal Alpha y permiten un degradado mas suave.

Saludos!