Hallo und Danke für die Antworten.
Ich hätte nicht gedacht, dass es so einfach durch
RGB zu berechnen ist
(
HSL ist ja durch
RGB abzuleiten)
Die Form für ein beliebiges Verhältnis ist dann
Delphi-Quellcode:
verhaeltnis := 0.33;
// 33% zu 77%
r := round(verhaeltnis * getrvalue(color1.Color) + (1-verhaeltnis)*getrvalue(color2.Color));
g := round(verhaeltnis * getgvalue(color1.Color) + (1-verhaeltnis)*getgvalue(color2.Color));
b := round(verhaeltnis * getbvalue(color1.Color) + (1-verhaeltnis)*getbvalue(color2.Color));
mixedcolor.Color :=
rgb(r, g, b);