Farbe herabsetzen

[hadschi92]

Ich versuche in einem Bild die Farben herabzusetzen. Ich habe z.B. ein Bild und möchte dieses Bild auf 16 festgesetzte Farben bringen. Ganz einfach würde das gehen wenn ich Bild.PixelFormat := pf4bit setzen würde. Doch dabei werden Farbverläufe von z.B. Weiß nach Rot in Grau dargestellt. Im Anhang zwei Bilder, an denen man dies sehen kann.

Wie kann man solch eine Funktion schreiben, die auch hellrote Farben in Rot umwandelt? Das Problem ist dabei auch, dass die eine Farbe für den einen Menschen mehr nach Rot, für den anderen mehr nach Weiß aussieht. Fertige Tabellen wird es wohl nicht geben, bzw. für jede dieser 16 Farben einen Farbraum per Hand zu bestimmen wäre auch zu aufwändig. Kann man sowas vielleicht ausrechnen? Oder gibt es andere Vorgehensweisen?