Wie sieht Dein class destructor vom TZipFile aus? bei mir freet er dort jedenfalls micht direkt das FCP437Encoding...
Dies ist Delphi 10.3.3:
Delphi-Quellcode:
class destructor TZipFile.Destroy;
begin
FCompressionHandler.Free;
FCP437Encoding.Free;
end;
Bis 10.3.2 wird das noch nicht gemacht! Deswegen auch mein Hinweis auf die genaue Version, mit der ich das getestet habe.