替换“StepIt”从 ProgressBar 到 cxProgressBar

发布于 2024-11-03 05:40:22 字数 306 浏览 1 评论 0原文

我刚刚用 cxProgressBar 替换了常见的进度条,但是我注意到它没有“StepIt”方法。

我用这个替换了 StepIt:

progressbar1.Position := progressbar1.Position+1;

我不认为它是最好的选择,因为进度比 StepIt 慢得多。

为了设置最大值,我获取了 sql 表上将被转换为本地缓存的字段总数。

除了常见的 ProgressBar 之外,我从未尝试过任何其他东西,这就是我遇到这个问题的原因。

谢谢。

I've just replaced my common progress bar with a cxProgressBar, I noticed, however, that it does not have the method 'StepIt'.

I replaced StepIt with this:

progressbar1.Position := progressbar1.Position+1;

I do not think it to be the best choice since the Progress takes much slower than StepIt.

To set the maximum value I get a total counts of fields on the sql table that it's going to be converted into local cache.

I have never tried anything other than the common ProgressBar, that's why I came across this issue.

Thank you.

如果你对这篇内容有疑问,欢迎到本站社区发帖提问 参与讨论,获取更多帮助,或者扫码二维码加入 Web 技术交流群。

扫码二维码加入Web技术交流群

发布评论

需要 登录 才能够评论, 你可以免费 注册 一个本站的账号。

评论(1

小糖芽 2024-11-10 05:40:22

来自在线帮助: http://docwiki.embarcadero.com/VCL/en/ ComCtrls.TProgressBar.StepIt

将位置前进 Step 属性中指定的量。

调用 StepIt 方法将 Position 的值增加 Step 属性的值。如果Step表示进度条跟踪的流程中一个逻辑步骤的大小,则在每个逻辑步骤完成后调用Step。

下面的代码应该可以解决问题。

procedure MyStepIt(NrOfSteps);
var
  Step: integer;
begin
  Step:= Max(1,(ProgressBar1.Max - ProgressBar1.Min) div NrOfSteps);
  ProgressBar1.Position:= Min(ProgressBar1.Max, ProgressBar1.Position + Step);
end;

From the online help: http://docwiki.embarcadero.com/VCL/en/ComCtrls.TProgressBar.StepIt

Advances Position by the amount specified in the Step property.

Call the StepIt method to increase the value of Position by the value of the Step property. If Step represents the size of one logical step in the process tracked by the progress bar, call Step after each logical step is completed.

The following code should do the trick.

procedure MyStepIt(NrOfSteps);
var
  Step: integer;
begin
  Step:= Max(1,(ProgressBar1.Max - ProgressBar1.Min) div NrOfSteps);
  ProgressBar1.Position:= Min(ProgressBar1.Max, ProgressBar1.Position + Step);
end;
~没有更多了~
我们使用 Cookies 和其他技术来定制您的体验包括您的登录状态等。通过阅读我们的 隐私政策 了解更多相关信息。 单击 接受 或继续使用网站,即表示您同意使用 Cookies 和您的相关数据。
原文