TDeflater
TCompressor
OnPercent
OnProgress
TObject