[Lazarus] the protected property TCompressionStream.OnProgress

[闫程远]

I always use TStream based objects Like TFileStream, and forbid to my
coworkers from using AssignFile and ReadLn or WriteLn and other
functions in the same family.

-- 
Zaher Dirkey