我 在做一个进循环语句,然后把进度显示在进度条上,我的写法如下: ProgressBar1.max:=1000;
for i:=1 to 1000 do
begin
....
 ProgressBar1.StepBy(i);
i:=i+1;
end;在运行的中,进度条很快就被全填满了,但循环还才循环到300,我该如何设置其进度是在我循环程序结束,其进度条才逐渐全被填满