Unit 'AbUnzPrc' Package
[Overview][Classes][Procedures and functions][Index] [#pl_abbrevia]

TAbUnzipHelper

[Properties (by Name)] [Methods (by Name)] [Events (by Name)]

Declaration

Source position: AbUnzPrc.pas line 46

type TAbUnzipHelper = class(TObject)

protected

  FOutWriter: TStream;

  

  FOutStream: TStream;

  

  FUnCompressedSize: LongInt;

  

  FCompressionMethod: TAbZipCompressionMethod;

  

  FDictionarySize: TAbZipDictionarySize;

  

  FShannonFanoTreeCount: Byte;

  

  FOutBuf: PAbByteArray;

  

  FOutSent: LongInt;

  

  FOutPos: Cardinal;

  

  FBitSValid: Byte;

  

  FInBuf: TAbByteArray4K;

  

  FInPos: Integer;

  

  FInCnt: Integer;

  

  FInEof: Boolean;

  

  FCurByte: Byte;

  

  FBitsLeft: Byte;

  

  FZStream: TStream;

  

  procedure uzFlushOutBuf;

  

  function uzReadBits();

  

  procedure uzReadNextPrim;

  

  procedure uzUnImplode;

  

  procedure uzUnReduce;

  

  procedure uzUnShrink;

  

  procedure uzWriteByte();

  

public

  constructor Create();

  

  destructor Destroy; override;

  

  procedure Execute;

  

  property UnCompressedSize: LongInt; [rw]

  

  property CompressionMethod: TAbZipCompressionMethod; [rw]

  

  property DictionarySize: TAbZipDictionarySize; [rw]

  

  property ShannonFanoTreeCount: Byte; [rw]

  

end;

Inheritance

TAbUnzipHelper

  

|

TObject



CT Web help

CodeTyphon Studio