label 控件刷新问题

[xwh_2000_0]

窗口有一控件 label1 想实时刷新 caption

var
ii:integer
begin
for ii:=0 to 1000
labe11.caption := inttostring(ii);
end.

运行时不能看到 labe1.caption 上数据变化。
请问如何解决？

[blue_coco]

labe11.caption := inttostr(ii);
涵数错了。

[zfmich]

加一句label.Update ;

[xwh_2000_0]

窗口有一控件 label1 想实时刷新 caption

var
ii:integer
begin
for ii:=0 to 1000 do
labe11.caption := inttostr(ii);
end.

运行时不能看到 labe1.caption 上数据变化。


这样也不行

[nhdj]

var
ii:integer
begin
for ii:=0 to 1000
begin
labe11.caption := inttostring(ii);
application.ProcessMessages;
endl;
end.

[zzg40280614]

var
ii:integer
begin
for ii:=0 to 1000
begin
labe11.caption := inttostr(ii);
application.ProcessMessages;
endl;
end.

[zzg40280614]

纠正一下
var
ii:integer;
begin
for ii:=0 to 1000 do
begin
labe11.caption := inttostr(ii);
application.ProcessMessages;
end;
end.

[dedema]

你的程序运行太快了，又怎么能看见label的变化呢？
加上sleep(100)吧，这样，你就可以看见它的变经了。

[dedema]

还有：inttostring这个函数我还没有用过！
我只用过inttostr的，不知道，你用过了没有？