TAbLZMADecompressionStream

type TAbLZMADecompressionStream = class(TStream)

protected

  FSourceStream: TStream;

  FCompressedDataBuffer: array [0..CompressedDataBufferSize-1] of Byte;

  FUncompressedDataBuffer: array [0..UncompressedDataBufferSize-1] of Byte;

  FReadBufferSize: Integer;

  FReadBufferAvailableBytes: Integer;

  FCompressedDataBufferSize: Integer;

  FCompressedDataBufferPosition: Integer;

  FUncompressedSize: Int64;

  FBytesDecompressed: Int64;

  FLzmaState: CLzmaDec;

  function InternalDecompressToBuffer();

  function GetBytesRead;

  function GetSize; override;

public

  constructor Create();

  destructor Destroy; override;

  function Read(); override;

  function Write(); override;

  function Seek();

  property BytesRead: Int64; [r]

end;

TAbLZMADecompressionStream

TObject