Convertir un BMP de 24 Bits a 8 Bits

[TEO127]

Hola amigos alguien de ustedes sabe como convertir un BMP de 24 Bits (color verdadero) a un BMP de 8 Bits (256 Colores), idealmente usando el Tbitmap.

Obviamente se que requiere emular los colores y generar una paleta de colores (los bmp de 256 colores la usan a diferencia de los bmp de 24 bits) que se asemeje a los colores originales, tambien se que en este proceso se perderan colores, pero lo que necesito hacer esta conversion y no he dado con la solucion.


Gracias por su tiempo, se agradece cualquier propuesta o solucion.

[[poliburro]]

Te voy a recomendar un set de controles para manejo de imágenes.

Graphics32

pruébalos, son muy buenos

[[cHackAll]]

Creo que lo que requieres es la siguiente línea:

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
begin
 Image1.Picture.Bitmap.PixelFormat := pf8bit;
end;

y obviamente para guardarlo:

Código Delphi [-]
 Image1.Picture.Bitmap.SaveToFile('prb.bmp');

Utilicé un TImage para que veas que en tiempo de ejecución que funciona a la perfección. Obviamente que debes tener un BMP en la propiedad Picture del TImage de 24 bits para verlo!

Saludos!

[carlocf]

Saludos
Pues en una busqueda en internet encontre informacion acerca del formato bmp quizas te ayude:
http://www.ubicuos.com/plugins/conte...php?content.33

Un saludo
CarloCf