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 ?
Delphi-Quellcode:
var
LInput, LOutput: TFileStream;
LUnZip: TZDecompressionStream;
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