Wie kann ich in guter Qualität 24Bit zu 8Bit konvertieren ?

[thomas2009]

hi

natürlich wenn man ein Bitmap von oben von 24Bit nach unten 8Bit die Farbe reduziert, verliert das Bild ein Bisschen Qualität

muss man eine Funktion erstellen, die das Bitmap von 24Bit zu 8Bit konvertiert ?

oder reicht es, wenn ich folgendes machen

Delphi-Quellcode:

var
my8bit : TBitmap;
begin
my8Bit:=TBitmap.Create;
my8Bit.assign(Image1.Picture.Bitmap); // image1: 24Bit
my8Bit.Pixelformat:=pf8Bit;
...