Delphi TProgressBar的具体用法

Question

我目前需要一个TProgressBar,来进行监督程序运行的情况.但是我不知道TProgressBar怎么使用.希望某位大侠级别人物给说说吧.我举个例子,您按照这个例子给我写点代码,最好告诉我为什么这么做.
例如:
for i:=0 to 100 do 
....
我希望在这个循环执行过程中,能够使用TProgressBar,看到从i:=0  一直执行到i=100结束.

Answer 1

var
  i:Integer;
begin
  ProgressBar1.Max := 100;
  for i := 1 to 100 do
  begin
    ProgressBar1.StepBy(1);
  end;
end;

Answer 2

先设置下ProgressBar1.Max 或者for i := 0 to progressbar1.max

Answer 3

在循环体中加上 application.processmessages;

Answer 4

报错了 List index out of bounds(149) 
149就MAX
end;