知识大全 用DELPHI在状态栏中显示进程条[2]
Posted 知
篇首语:不积跬步,无以至千里;不积小流,无以成江海。本文由小常识网(cha138.com)小编为大家整理,主要介绍了知识大全 用DELPHI在状态栏中显示进程条[2]相关的知识,希望对你有一定的参考价值。
用DELPHI在状态栏中显示进程条[2] 以下文字资料是由(全榜网网www.cha138.com)小编为大家搜集整理后发布的内容,让我们赶快一起来看一下吧!
上面的步骤在实际编写代码时是这样实现的 //首先在FormCreate事件中编写代码procedure TForm FormCreate(Sender: TObject);var ProgressBarStyle: integer;begin //将状态栏的第二块面板设为的自绘(即psOwnerDraw) StatusBar Panels[ ] Style := psOwnerDraw; //将进程条放入状态栏 ProgressBar Parent := StatusBar ; //去除状态栏的边框 这样就与状态栏溶为一体了 ProgressBarStyle := GetWindowLong(ProgressBar Handle GWL_EXSTYLE); ProgressBarStyle := ProgressBarStyle WS_EX_STATICEDGE; SetWindowLong(ProgressBar Handle GWL_EXSTYLE ProgressBarStyle);end; //编写状态栏的自绘代码procedure TForm StatusBar DrawPanel(StatusBar: TStatusBar;Panel: TStatusPanel;const Rect: TRect);begin //注意这里的Panels[ ]指的就是第 块面板 因为默认是从 开始的 if Panel = StatusBar Panels[ ] then with ProgressBar do begin Top := Rect Top; Left := Rect Left; Width := Rect Right Rect Left ; Height := Rect Bottom Rect Top; end; end; 关键问题解决之后 我们来一个小例子 这样就可以有一个全局的印象了 控件的摆放如(图 )所示 编写代码如下 procedure TForm Button Click(Sender: TObject);vari : integer;beginProgressBar Position := ;ProgressBar Max := ;for i := to dobeginProgressBar Position := i;Sleep( );end;end; 运行一下这个小程序 点击一下按钮 看到了吧 进程条在状态栏中动起来了 cha138/Article/program/Delphi/201311/24750相关参考
用Delphi编写系统进程监控程序 以下文字资料是由(全榜网网www.cha138.com)小编为大家搜集整理后发布的内容,让我们赶快一起来看一下吧!本程序通过调用ke
如何使excel中计算公式显示在编辑栏中这个问题问得奇妙,公式一直都显示在编辑栏中的。。。你将游标点在有公式的单元格,看编辑栏,就能发现。。。你是不是想显示在单元格上?在工具-检视-视窗选项里把公式勾
用Delphi实现位图显示特技 以下文字资料是由(全榜网网www.cha138.com)小编为大家搜集整理后发布的内容,让我们赶快一起来看一下吧! 在应用程序中引入位
知识大全 重置路由器之后,无线不能用,电脑连接不上网络显示错误代码651
重置路由器之后,无线不能用,电脑连接不上网络显示错误代码651您好:重置后,要重新设置路由器的:1、打开Web浏览器,在地址栏中键入:192.168.0.1,然后按Enter键。2、在随后打开的登陆窗
在Delphi中如何维护COM+的状态信息[2] 以下文字资料是由(全榜网网www.cha138.com)小编为大家搜集整理后发布的内容,让我们赶快一起来看一下吧!
Delphi中的图形显示技巧[2] 以下文字资料是由(全榜网网www.cha138.com)小编为大家搜集整理后发布的内容,让我们赶快一起来看一下吧! 垂直交错效果
用C#监控并显示CPU状态信息 以下文字资料是由(全榜网网www.cha138.com)小编为大家搜集整理后发布的内容,让我们赶快一起来看一下吧! 简介 本文将介绍
用JS实现个性的QQ状态显示 以下文字资料是由(全榜网网www.cha138.com)小编为大家搜集整理后发布的内容,让我们赶快一起来看一下吧!现在好多网站都有QQ在线
程序开发小技巧:Delphi中的图形显示技巧 以下文字资料是由(全榜网网www.cha138.com)小编为大家搜集整理后发布的内容,让我们赶快一起来看一下吧!目前在许
在Delphi中开发使用多显示器的应用程序 以下文字资料是由(全榜网网www.cha138.com)小编为大家搜集整理后发布的内容,让我们赶快一起来看一下吧! Wind