從非十進制數百分比

Question

我有這樣的代碼來記錄我的節目的視頻：

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

現在我的問題是，我希望把我的節目一個標籤，將在未來的視頻前顯示計時器將被顯示，我嘗試這樣做：

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

但是，直到它達到0％，將顯示從100％的百分比（所以下一個視頻將被顯示）。
我怎樣才能從一個實數如從10,9到0的變化百分比？

Answer 1

您顯示的代碼行不是有效的Delphi語法。你必須使用單獨的語句：

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