2006.01.17 07:43 "Re: [Tiff] TiffReadEncodedStrip - problem in Delphi", by Patryk Palasz

> Why are you handling the fill order in your own code? I believe that

> libtiff already handles that for you. So you are likely scrambling the > data yourself. Also, what does ChangeLinesOrder() do?

This is not the point. I was using TiffReverseBits instead of ChangeBitsOrder but in case of those two pictures this code is simply not used. ChangeLinesOrder function changes line order in bitmap from up-bottom to bottom-up (TiffReadRGBA* make it automaticall but TiffReadEncodedStrip not). I was trying with and without this function - no success :(.

>>
>> BitmapBuff := FBitmap.ScanLine[ FImgHeight - 1];
>> for i := FStripsCnt - 1 downto 0 do
>> begin

>>   read := TiffReadEncodedStrip( FTiffFile, i, Buff, -1);
>>   if read <> -1 then
>>   begin

>>     if FFillOrder <> FILLORDER_MSB2LSB then
>>       ChangeBitsOrder( Buff, read);
>>     ChangeLinesOrder( Buff, BitmapBuff, read);
>>     Inc( BitmapBuff, read);

>> end;
>> end;