Ich habe den Fehler gefunden...
label1.Caption:=IntToStr(GetGValue(RGB1));
label2.Caption:=IntToStr(GetGValue(RGB1));
label3.Caption:=IntToStr(GetBValue(RGB1));
label4.Caption:=IntToStr(GetRValue(RGB2));
label5.Caption:=IntToStr(GetGValue(RGB2));
label6.Caption:=IntToStr(GetBValue(RGB2));
GetRValue wäre natürlich richtig gewesen.
Es wird wirklich Zeit fürs Bett
