Decompress GZ Dateien

**DavidKlimas**

Hallo,

ich habe mehrere *.gz dateien auf meinem PC und versuche diese zu entpacken. Ich hab mal eine Beispieldatei hochgeladen:

test.mon-info.eu/adult.mon-info.eu-ssl_log-Jul-2020.gz

Leider hat die entpackte *.txt datei nur 570 einträge, die orginale GZ hat über 11 000. Wie kann man das beheben ?

markieren

Delphi-Quellcode:

			var

  LInput, LOutput: TFileStream;

  LUnZip: TZDecompressionStream;

markieren

Delphi-Quellcode:

			LInput := TFileStream.Create('C:\Exemple.gz', fmOpenRead);

    LOutput := TFileStream.Create('C:\Exemple.txt', fmCreate);

    LInput.Seek(0, soBeginning);

    LUnZip := TZDecompressionStream.Create(LInput, 15+16);

    LOutput.CopyFrom(LUnZip, LUnZip.Size);

    LUnZip.Free;

    LInput.Free;

    LOutput.Free;

Danke für Eure Hilfe

Decompress GZ Dateien

Decompress GZ Dateien

Stichworte

Forumregeln