* Merging revisions r45190 from trunk:

    ------------------------------------------------------------------------
    r45190 | michael | 2020-04-30 15:39:07 +0200 (Thu, 30 Apr 2020) | 1 line
    
    * Fix from Ondrej Pokorny to fix reading large TIFFs (bug ID 36998)
    ------------------------------------------------------------------------

git-svn-id: branches/fixes_3_2@45194 -

packages/fcl-image/src/fpreadtiff.pas

@@ -2373,7 +2373,7 @@ begin
           if OldCode <> NoCode then
             AddStringToTable(OldCode,Code);
           OldCode:=Code;
-        end else if (Code=TableCount+258) and (OldCode <> NoCode) then begin
+        end else if {(Code=TableCount+258) and} (OldCode <> NoCode) then begin
           WriteStringFromCode(OldCode,true);
           AddStringToTable(OldCode,OldCode);
           OldCode:=Code;