pt 

OnProgress (TCustomZlibStream)