很菜大家别笑(5分)

我在窗体上加了个label,加了段代码如下<br>for i:=1 to 100 do<br>label1.caption:=inttostr(i);<br>这样一来只显示1和100<br>用那个API可以让它衣次显示.别说用sleep啊!<br>

没有！<br>用sleep，timer，多线程<br>或再加一个循环for a:=1 to 99999 do Application.ProcessMessages;<br>要不去问问加速齿轮的作者

for i:=1 to 100 do<br>begin<br>&nbsp; label1.caption:=inttostr(i);<br>&nbsp; Form.Refresh;(or Label1.Refresh)<br>end;<br>

Application.ProcessMessages 是关键<br>========================================================<br>for i:=1 to 100 do<br>begin<br>&nbsp; label1.caption:=inttostr(i);<br>// &nbsp;Form.Refresh;(or Label1.Refresh)<br>&nbsp; Application.ProcessMessages; &nbsp;// 给系统一个处理 WM_PAINT消息的机会吗！<br>&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; // 不然怎画的出来？[!]<br>&nbsp; sleep(?);<br>end;<br>========================================================

多人接受答案了。