От процента в недесятичных числах

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