来自非小数的百分比

Question

我有这段代码可以在我的程序中录制视频：

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

现在我的问题是我想在我的程序上放置一个标签，该标签将在显示下一个视频之前显示一个计时器，我尝试了这个：

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

但它会显示从 100 开始的百分比% 直到达到 0%（因此将显示下一个视频）。
如何将百分比从实数中的 % 更改为 10、9...直到 0？

Answer 1

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

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