Ver Fonte

* Patch from Werner Pamler to correctly detect endianness. Fixes issue #41332

Michaël Van Canneyt há 1 mês atrás
pai
commit
7fd0c136a2
1 ficheiros alterados com 2 adições e 2 exclusões
  1. 2 2
      packages/fcl-image/src/fpreadtiff.pas

+ 2 - 2
packages/fcl-image/src/fpreadtiff.pas

@@ -634,8 +634,8 @@ begin
   {$endif}
 
   FBigTiff:=false;
-  case TIFHeader.Version of
-  42 : IFDStart:=TIFHeader.IFDStart;
+  case FixEndian(TIFHeader.Version) of
+  42 : IFDStart:=FixEndian(TIFHeader.IFDStart);
   43 : {$ifdef CPU64}
        begin
          IFDStart:=ReadQWord;