TCompressor

type TCompressor = class(TObject)

public

  constructor Create(); virtual;

Creates a TCompressor object.

  procedure Compress; virtual; abstract;

Compresses input stream to output stream.

  class function ZipID; virtual; abstract;

Identifier for type of compression.

  class function ZipVersionReqd; virtual; abstract;

ZIP version required in the method.

  function ZipBitFlag; virtual; abstract;

Current bit.

  procedure Terminate;

Halts the compressor by setting the Terminated property to True.

  property BufferSize: LongWord; [r]

Size of the buffer used for compression.

  property OnPercent: Integer; [rw]

Threshold percentage which triggers an OnProgress update.

  property OnProgress: TProgressEvent; [rw]

Event handler signalled to indicate the completion percentage for the compressor.

  property Crc32Val: LongWord; [rw]

Running CRC32 value.

  property Terminated: Boolean; [r]

Set to True when the Terminate method is called.

end;

TCompressor

Compressor object.

TObject