Delphi 7 - 如何将整数转换为字符串

Question

我需要我的标签来读取进度条的百分比。例如，如果进度条为13％，我需要我的标签显示13，如果它是76％，我需要它显示76。

Label1.Caption := ...

我该怎么办？

Answer 1

听起来你只是想问如何将整数转换为字符串。请使用IntToStr。例如，

Label1.Caption := IntToStr(ProgressBar1.Position);

这假定MinValue为0且MaxValue为100。否则，百分比的计算将是：

Percent := MulDiv(
  ProgressBar1.Position - ProgressBar1.MinValue,
  100,
  ProgressBar1.MaxValue - ProgressBar1.MinValue
);