来自非十进制数的百分比

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);