浏览代码

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

Michaël Van Canneyt 1 月之前
父节点
当前提交
7fd0c136a2
共有 1 个文件被更改,包括 2 次插入2 次删除
  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;