有关progressbar！

Question

for i:=1 to 10 do
begin
  label1.text:='第'+inttostr(i)+'个任务！';
  sleep(100);
  progressbar1.position:=0;
  for j:=1 to 50 do
  begin
    ...
    progressbar1.stepit;
  end;
end;我想在进度条执行以前先显示该进度条执行的是第几个任务，可是每次运行的时候，进度条执行完了以后，label1的内容才显示过来。请教一下各位，怎么样在进度条执行以前显示label1相应的内容？

Answer 1

for i:=1 to 10 do
begin
  label1.text:='第'+inttostr(i)+'个任务！';
  sleep(100);
  progressbar1.position:=0;
  for j:=1 to 50 do
  begin
    ...
    progressbar1.stepit;
    Application.ProcessMessage;
  end;
end;

Answer 2

label1.text:='第'+inttostr(i)+'个任务！';
  label1.UpDate;  // 插入此句应该可以。
  sleep(100);