进度条控件怎样用？

Question

我有一个函数占用很多系统资源，想显示速度出来，怎样用progressbar

Answer 1

for i := 0 to 100 do
begin
  ProgressBar.position := i;
  Application.ProcessMessage;
end;

Answer 2

估计一下你的函数占用的时间，然后就可以用progreessbar来作了。
或者，函数执行完，发送一个消息，驱动progreessbar 完成进程，都可以的

Answer 3

以你估计的最大时间或某一个全局计数的值bar的长度，然后在值的变化处改变bar的position值。

Answer 4

在函数中向progreessbar发指令拉