进度条的进度由你自己控制啊!如果想要进度同步显示,可以使用Application.ProcessMessage语句!
for i:=0 to 1000 do
begin
progressbar1.stepit;
application.processmessage;
end;
for i:=0 to 1000 do
begin
progressbar1.stepit;
application.processmessage;
end;
解决方案 »
- richedit光标定位和回车问题
- delphi 用RBuilder控件,怎样做报表。有具体步骤吗
- delphi中如何调用C写的DLL,请赐教!
- fastReport只传入一个数据集能做交叉报表吗?
- delphi7开发的dll(通过THTTPRIO访问webservice),C#调用时报地址错
- 1.为何被扣性欲分2.如何放>100分
- 升主管了,哈哈,散分理由应该值得谅解,何况马上要过年了,大家高兴高兴! 呵呵 ...
- 三层技术问题,不熟悉三层模式的同仁可以看一看?
- outlook express 把它的邮件(收到的邮件)是放到什么地方去了?我系统要重装,想把来往的邮件做个备件(不仅仅是通讯薄) 。
- 如何将grid的中的内容拖拽到,treeview中?
- 实现可能么?
- 如何打印treeview?
在你的程序中应当把Progressbar1.stepit加到你的程序进程里,并计算出这个进程的执行量C,及当前执行量I,当int( (i / c)*100 )比上一次的i大1时就Progressbar1.stepit一次,或者直接设置Progress1.Max为C,Progress1.pos为i.如果还不明白就给我发邮件.