FIX: Zip - synchronize central directory header with local file header (fixes #2542)

This commit is contained in:
Alexander Koblov 2025-10-13 21:54:30 +03:00
commit 4b4b38eb97

View file

@ -1654,6 +1654,9 @@ begin
LFH.ExtraField.Delete(Ab_Zip64SubfieldID);
end;
LFH.SaveToStream( Stream );
{ Synchronize central directory header with local file header }
FItemInfo.CompressedSize := LFH.CompressedSize;
FItemInfo.UncompressedSize := LFH.UncompressedSize;
finally
LFH.Free;
end;