Time 如何指定在Inno设置中更新剩余时间标签的时间段？

我想显示安装过程中的剩余时间，如下面的问题所示，并使用了TLama发布的代码：

代码对我有用，所以谢谢你。 但是如果你安装了更大的文件，“剩余时间标签”的更新时间太快了

所以我想问，如何更改“剩余时间标签”的更新周期，使其仅每秒钟或每半秒钟更新一次

---

提前感谢

使用

GetTickCount

记住上次更新时间。在下一次调用

CurInstallProgressChanged

时，计算差异到

CurTick

，并仅在差异足够大（1000=1秒）时更新标签

var
最新更新：德沃德；
过程curinstalprogresschanged（CurProgress，MaxProgress:Integer）；
变量
科蒂克：德沃德；
开始
CurTick:=GetTickCount；
如果（CurTick-LastUpdate）>=1000，则
开始
LastUpdate:=科蒂克；
//更新标签
终止
终止

非常感谢，这对我很有用。没想到会那么容易，现在感觉很傻。。。