请问，有没有压缩/解压缩的进度百分比的属性或回调函数？

[frankwu-delphi]

请问，有没有压缩/解压缩的进度百分比的属性或回调函数？这个比较实用的功能。