Hi,
bisher habe ich gz-Dateien immer mit dem folgenden Code ausgelesen:
Delphi-Quellcode:
function TPriceItemCompress.gzUnzip(filename:String):TStringList;
var
LInput:TFileStream;
LUnZip:TZDecompressionStream;
begin
Result:=TStringList.Create(true);
LInput:=TFileStream.Create(filename,fmOpenRead + fmShareDenyNone);
LUnZip:=TZDecompressionStream.Create(LInput,15+32);
Result.LoadFromStream(LUnzip);
LUnZip.Free;
LInput.Free;
end;
Jetzt habe ich eine gz-Datei vom Kunden, die nicht vollständig ausgelesen wird, sondern es werden nur die ersten 75 Zeilen ausgelesen. Hatte jemand schon mal dieses Problem?
Grüße, Philipp