[Overview][Constants][Types][Classes][Index] | Reference for unit 'zipper' (#fcl)

# TCompressor

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

Compressor object

## Declaration

Source position: zipper.pp line 126

`type TCompressor = class(TObject)`
`public`
`constructor Create(); virtual;` |  | Creates a 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;`
`function ZipBitFlag; virtual; abstract;`
`property BufferSize: LongWord; [r]` |  | Size of buffer used for compression
`property OnPercent: Integer; [rw]` |  | Reference to OnPercent event handler
`property OnProgress: TProgressEvent; [rw]` |  | Reference to OnProgress event handler
`property Crc32Val: LongWord; [rw]` |  | Running CRC32 value
`end;`

## Inheritance

`TCompressor` |  | Compressor object
`TObject`

## Description

This object compresses a stream into a compressed zip stream.

Documentation generated on: Feb 26 2014