Delphi 从非十进制数字的百分比

我有以下代码在我的程序中录制视频：

pbVideoProgress.Percent := Round((vidrec / MAX_REC) * 100);

现在我的问题是，我想在我的程序上贴一个标签，在下一个视频播放之前显示一个计时器，我尝试了以下方法：

Label1.Caption :=inttostr(pbVideoProgress.Percent) ;

但它将显示从100%到0%的百分比，因此将显示下一个视频。

---

我如何才能将百分比从%更改为实数，例如从10、9。。。在0之前？

显示的代码行不是有效的Delphi语法。您必须使用单独的语句：

pbVideoProgress.Percent := Round((vidrec / MAX_REC) * 100);
...
Label1.Caption := IntToStr(100 - pbVideoProgress.Percent);

---

谢谢我试试看。你真的给了我一个主意。你想在视频结束前10秒显示标题并开始倒计时吗？