Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Gráficos (https://www.clubdelphi.com/foros/forumdisplay.php?f=8)
-   -   Compresion BMP (https://www.clubdelphi.com/foros/showthread.php?t=16102)

Luciano 15-11-2004 23:55:10

Compresion BMP
 
Hola.

Necesito comprimir una imagen BMP que tomo desde un scaner. Para ello estoy utilizando la libreria Easy Compression. El caso es que escaneo la imagen (1.60mb), la comprimo y obtengo un archivo de 200kb. Lo curioso es que si abro el Paint, y guardo un BMP desde ahi (mismo tamaño), y lo comprimo, obtengo un archivo de 10kB!!. Probe comprimir con el WINZIP, por ej, y sucede lo mismo. En resumen, si guardo una imagen con el Paint, y la comprimo, el archivo se reduce a por lo menos 10kb; de cualquier otra forma (por ej, Tbitmap.savetofile(xxxx)), sobrepasa los 100kb. Necesito como mínimo reducir el BMP a 20kb.

¿Qué puedo hacer? ¿Qué le hace el Paint al BMP?

Muchas Gracias.

andres1569 16-11-2004 11:14:17

Hola:

Aunque no lo he probado, asegúrate de estar guardando la imagen a la misma profundidad de color (24 bits, 256 colores ... etc). Esto lo puedes configurar en el objeto TBitmap mediante la propiedad PixelFormat (pf32Bits, pf24Bits...etc). Que yo sepa, el objeto TBitmap usa el API Windows para almacenar los BMPs, debiera coincidir con el algoritmo que usa el Paint, aunque es una suposición.

Ya nos dirás

Saludos

Luciano 16-11-2004 23:58:08

Gracias por responder. Acabo de probar lo que me dijiste, tocando la propiedad PixelFormat del Tbitmap, modificandola a 24bits, la profundidad en que el Paint guarda los BMP, pero no funciona: cuando comprimo el archivo lo sigue dejando a 200kb. Tambien probe con otras profundidades, pero igualmente no anda.

¿No hay alguna forma de acceder al Paint mediante línea de comando, o algo así?

Saludos.


La franja horaria es GMT +2. Ahora son las 09:05:26.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi