在 sample 中有一个guage 不知道能否满足你的条件
解决方案 »
- 已知一个进程名,怎么样杀掉此进程
- 谁用过DevExpress QuantumGrid4.5 for delphi6.0 快来啊 高分求救~~~~~~
- 关于在INTRAWEB中使用数据库的问题?
- 用了线程,PageControl1上的 Memo1就显示不了了。
- 祝兄弟们新年圣诞快快乐乐~~~顺便问一个关于类型转换的问题 :)
- 为什么我的dbgrid不能显示负值?
- MDI窗体问题
- activeform客户端下载问题('我是小新'快来)
- 用bde连接ado数据库,如何不出现密码登陆窗体?
- 如何通过win98实现ip转发?(delphi高级)
- 谁有财务中用到的录入凭证时现金格式的控件?
- dlephi的字符串操作函数有那些?
begin
ProgressBar1.Position:=Round(I/1000);
label1.Caption:=inttostr(Round(i/1000))+'%';
label1.repaint;
//或者form1.refresh
end;
在timer事件中
gauge1.Progress:=gauge1.Progress+1;