Cómo mostrar imagenes irregulares?

[Softhem]

Gracias Lepe,

Efectivamente, con imágenes BMP no hay problema, hasta el Delphi 4 funciona bien. Sin embargo no funciona con las JPG. Probablemente requiere alguna variante de los formatos JPG, no obstante los manuales dicen que basta con incluir en uses la unidad "Jpeg", pero no funciona. Tambien dicen que el componente TImage hace la transparencia sobre el color que tiene el último pixel de abajo a la izquierda de la imagen involucrada.

Creo que no habrá más que usar imágenes BMP.

Ahora mi problema se reduce a que permanezca la imagen anterior al sobreponerle una nueva. Desafortunadamente estoy comenzando a manejar gráficos en Delphi y no sé muchos de los trucos, propiedades y valores de éstos.

Te agradezco mucho el apoyo que me haz dado. Saludos

[[Lepe]]

Empezado por Softhem

no obstante los manuales dicen que basta con incluir en uses la unidad "Jpeg", pero no funciona. Tambien dicen que el componente TImage hace la transparencia sobre el color que tiene el último pixel de abajo a la izquierda de la imagen involucrada.

Creo que no habrá más que usar imágenes BMP.

Ahora mi problema se reduce a que permanezca la imagen anterior al sobreponerle una nueva. Desafortunadamente estoy comenzando a manejar gráficos en Delphi y no sé muchos de los trucos, propiedades y valores de éstos.

Pues entonces debo decir que con JPG también funciona la transparencia, eso del último pixel me pasó algo extraño.

Al menos en Delphi 7 si fue añadir el uses jpeg y listo. después cargué la imagen sin problemas, eso sí, desde el IDE, no sé en ejecución como irá, pero debería ser igual.


Si abres las dos imágenes, verás que están de color azul y rojo el fondo, pues bien, con el paint estuve cambiando de color rojo el fondo con la utilidad aerógrafo sólo una parte de la foto, y ya en delphi, en JPG me hizo la transparencia a esa parte que tenía en rojo. Quizás tu último pixel es de otro color o tonalidad... no lo sé.

Saludos

[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