薄 薄荷 Unregistered / Unconfirmed GUEST, unregistred user! 2002-12-24 #22 首先，你估计一下你的任务量，比如你的OnShow里是1000次的循环。那么你把processbar 的Max设为100，然后在OnShow的循环里 if i mod 10 = 0 then // i是10的倍数。 ProcessBar1.position := ProcessBar1.Position +1; 不把Max设为1000，主要是因为频繁的更改processbar的position是一件很费时的事。 如果还不行。你就把你的Onshow里的代码贴出来看看。
首先，你估计一下你的任务量，比如你的OnShow里是1000次的循环。那么你把processbar 的Max设为100，然后在OnShow的循环里 if i mod 10 = 0 then // i是10的倍数。 ProcessBar1.position := ProcessBar1.Position +1; 不把Max设为1000，主要是因为频繁的更改processbar的position是一件很费时的事。 如果还不行。你就把你的Onshow里的代码贴出来看看。
H hnzgw Unregistered / Unconfirmed GUEST, unregistred user! 2002-12-24 #23 to delphiland及各位大侠 谢谢你提供宝贵的意见,这个问题我基本上能实现了,但我还想问一下,如果我把Gauge1 换用ProgressBar1。 procedure TForm1.ShowProgress(var Msg: TMsg); begin ....................? end; 怎么写，我很差的，这个解决好后我把自己的一点小分给大家
to delphiland及各位大侠 谢谢你提供宝贵的意见,这个问题我基本上能实现了,但我还想问一下,如果我把Gauge1 换用ProgressBar1。 procedure TForm1.ShowProgress(var Msg: TMsg); begin ....................? end; 怎么写，我很差的，这个解决好后我把自己的一点小分给大家
D delphiland Unregistered / Unconfirmed GUEST, unregistred user! 2002-12-24 #24 ProcessBar1.position :=Msg.message;
