Marti,
I would like to save a TIFF Lab.
Up to now , I have done the folowing :
POut[i].Red := L2Fix(Lab.L);
POut[i].Green := round(Lab.a);
POut[i].Blue := round(Lab.b);
where
function L2Fix(L: extended): byte;
begin
try
result := round(L * 2.55);
except
end;
end;
but when writting R:=255, G=0 and B= 0 (Lab 100, 0 , 0) I don't have a pure
white. (litlle bit blueish..)
any idea?
thanks
Armindo
-------------------------------------------------------
This sf.net email is sponsored by:ThinkGeek
Welcome to geek heaven.
http://thinkgeek.com/sf
_______________________________________________
Lcms-user mailing list
[EMAIL PROTECTED]
https://lists.sourceforge.net/lists/listinfo/lcms-user
