Hallo,
das sehe ich genauso. Mein Problem liegt darin, daß ich wie bereits erwähnt mehrere Dateien mit
ZLIB gepackt habe. Wie entpackt man diese wieder?
Delphi-Quellcode:
var
InputStream, OutputStream: TFileStream;
DeCompressionStream:
ZLib.TDeCompressionStream;
begin
InputStream:=TFileStream.Create(sSkinDir +'
\'+ cSkinZipFile, fmOpenRead);
try
OutputStream:=TFileStream.Create('
c:\temp\a.zip', fmCreate);
try
DecompressionStream:=TDecompressionStream.Create(OutputStream);
try
DecompressionStream.CopyFrom(InputStream, InputStream.Size);
finally
DecompressionStream.Free;
end;
finally
OutputStream.Free;
end;
finally
InputStream.Free;
end;
hiermit kriege ich nur eine Datei raus. Was muss ich machen, damit alle Dateien entpackt werden?
MfG
Sebastian