Mist, dabei war ich mir so sicher
Bin auf das Problem noch nicht gestoßen, danke für die Info
//Edit:
Gerade mal ausprobiert - auch mit der Methode, wie der TS sie vorschlug, gibt es dabei Probleme. Aber allgemein stellt sich für mich die Frage: Wie bildet man die komplementäre Farbe eines Grautons (z.b. 7F7F7F / 127,127,127)?
Delphi-Quellcode:
procedure tform1.newcolors;
begin
panel1.color :=
rgb(trackbar1.position, trackbar2.position, trackbar3.position);
panel2.color := panel1.color
xor clwhite;
panel3.color :=
rgb(255 - getrvalue(panel1.color), 255 - getgvalue(panel1.color), 255 - getbValue(panel1.color));
panel1.font.color := panel2.color;
end;