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

# TShrinker

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

Child of TCompressor that implements the Shrink compression method

## Declaration

Source position: zipper.pp line 280

`type TShrinker = class(TCompressor)`
`public`
`constructor Create(); override;` |  | Constructor for the class instance
`destructor Destroy; override;` |  | Destructor for the class instance
`procedure Compress; override;` |  | Compresses input values using LZW (shrink) compression
`class function ZipID; override;` |  | Return Zip algorithm ID
`class function ZipVersionReqd; override;` |  | Minimum zip algorithm required
`function ZipBitFlag; override;` |  | Zip bitness flag
`end;`

## Inheritance

`TShrinker` |  | Child of TCompressor that implements the Shrink compression method
`TCompressor` |  | Compressor object
`TObject`

## Description

TShrinker implements the LZW lossless data compression algorithm created by Abraham Lempel, Jacob Ziv, and Terry Welch also known as "shrink" compression.