为什么会出现这样的问题，好糊涂呀！ProgressBar1进度条的！(20分)

D

delphiere

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-19

• #1

我在panel上面显示一个label，一个ProgressBar1
用按钮控制，panel的显示。当显示panel的时候，ProgressBar1进度条开始读取资料,
可为什么panel显示的时候，进度条也在滚动，而label却没有显示，非要在停止的时候，
label才显示出来。如果panel没有隐藏这个问题是不会发生的。谢谢！
代码：
var
i:integer;
begin
panel1.Visible :=true;
ProgressBar1.Position:=0;
ProgressBar1.Step:=1;
for i:=1 to Count do
ProgressBar1.StepIt;

 

妙

妙兔无花

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-19

• #2

for i:=1 to Count do
begin
ProgressBar1.StepIt;
application.processmessages;
end;

 

J

jinmen

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-19

• #3

用application.ProcessMessages;

 

D

delphiere

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-19

• #4

加了这句还是一样呀，都是等到进度条到了最后，label才显示！

 

妙

妙兔无花

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-19

• #5

for i:=1 to Count do
begin
ProgressBar1.StepIt;
label.caption:=inttostr(i);
application.processmessages;
end;

 

D

delphiere

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-19

• #6

还有，怎么让进度条到最后的时候，消失呢？

 

妙

妙兔无花

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-19

• #7

for i:=1 to Count do
begin
ProgressBar1.StepIt;
label1.caption:=inttostr(i);
application.processmessages;
end;

ProgressBar1.Position:=0;

 

S

seven_918

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-19

• #8

设Visible为False不就可以了！

 

N

naughtboy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-19

• #9

妙兔无花后来的方法没错

 

D

delphiere

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-21

• #10

多人接受答案了。