Hi, the attached file is a .wav file created on Windows and compressed with TPAbbrevia's DeflateStream method of AbZipPrc unit.
I need to decompress it using fpc and save to a folder, to be played with
mplayer.
This snippet shows what I'm doing to decompress the file, but I'm getting
"buffer error" in DeCompress method.
lcompressedStream := TMemoryStream.Create;
lUncompressedStream := TMemoryStream.Create;
lcompressedStream.LoadFromFile('compressed.file');
lcompressedStream.Position:= 0;
lDecompressor := TInflater.Create(lcompressedStream, lUncompressedStream,
lcompressedStream.Size);
try
lDecompressor.DeCompress;
lUncompressedStream.Position:= 0;
lUncompressedStream.SaveToFile('output.wav');
finally
lDecompressor.Free;
lcompressedStream.Free; lUncompressedStream.Free;
end;
Does anyone can check the attached file to help me to uncompress it?.
Maybe TInflater is not the class that I should use to decompress this file.
Leonardo M. Ramé
http://leonardorame.blogspot.com
compressed.file
Description: Binary data
_______________________________________________ fpc-devel maillist - fpc-devel@lists.freepascal.org http://lists.freepascal.org/mailman/listinfo/fpc-devel
