Bug in RGBToXYZ

This commit is contained in:
Raymond 2010-12-12 11:49:50 +01:00
parent 02da77c417
commit 90c8592778
1 changed files with 3 additions and 3 deletions

View File

@ -116,15 +116,15 @@ begin;
if Red > 0.04045 then
Red := Power( ( Red + 0.055 ) / 1.055 , 2.4) * 100
else
Red := Red / 7.73994;
Red := Red * 7.73993808;
if Green > 0.04045 then
Green := Power( ( Green + 0.055 ) / 1.055 , 2.4) * 100
else
Green := Green / 7.73994;
Green := Green * 7.73993808;
if Blue > 0.04045 then
Blue := Power( ( Blue + 0.055 ) / 1.055 , 2.4) * 100
else
Blue := Blue / 7.73994;
Blue := Blue * 7.73993808;
X := Red * 0.4124 + Green * 0.3576 + Blue * 0.1805;
Y := Red * 0.2126 + Green * 0.7152 + Blue * 0.0722;
Z := Red * 0.0193 + Green * 0.1192 + Blue * 0.9505;