JclCompression

[nonex]

Hi, ich versuche gerade einen Filestream zu decomprimieren und dann als Stream zurück zu geben, aber egal was ich mache es funktioniert nich. hat vllt jemand vone uch Ahnung mit der der JclCompression unit, oder kennt eine gute alternative ?

Delphi-Quellcode:

 InputStream := TFileStream.Create(filename, fmOpenRead);
 outputstream := TStream.Create;
 DecompressionStream := TJCLGzipdecompressstream.Create(InputStream);
 OutputStream.CopyFrom(DecompressionStream, 0);
 frmmain.xml.LoadFromStream(outputstream);
 DecompressionStream.Free;
 OutputStream.Free;
 InputStream.Free;

da kommt immer "Seek is not an supported operationen"

gruß tobi

[alzaimar]

Du sollst keine TStream-Instanzen erstellen. TStream ist ein abstrakter Vorfahre für konrete Klassen. Lies die OH.

Nimm stattdessen z.B. einen TMemoryStream.

[Robert Marquardt]

Ansonsten wart mal ab. Gerade wird in der JCL an JclCompression gebaut.