知识大全 用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编写系统进程监控程序

用Delphi编写系统进程监控程序  以下文字资料是由(全榜网网www.cha138.com)小编为大家搜集整理后发布的内容,让我们赶快一起来看一下吧!本程序通过调用ke

知识大全 如何使excel中计算公式显示在编辑栏中

如何使excel中计算公式显示在编辑栏中这个问题问得奇妙,公式一直都显示在编辑栏中的。。。你将游标点在有公式的单元格,看编辑栏,就能发现。。。你是不是想显示在单元格上?在工具-检视-视窗选项里把公式勾

知识大全 用Delphi实现位图显示特技

用Delphi实现位图显示特技  以下文字资料是由(全榜网网www.cha138.com)小编为大家搜集整理后发布的内容,让我们赶快一起来看一下吧!  在应用程序中引入位

知识大全 重置路由器之后,无线不能用,电脑连接不上网络显示错误代码651

重置路由器之后,无线不能用,电脑连接不上网络显示错误代码651您好:重置后,要重新设置路由器的:1、打开Web浏览器,在地址栏中键入:192.168.0.1,然后按Enter键。2、在随后打开的登陆窗

知识大全 在Delphi中如何维护COM+的状态信息[2]

在Delphi中如何维护COM+的状态信息[2]  以下文字资料是由(全榜网网www.cha138.com)小编为大家搜集整理后发布的内容,让我们赶快一起来看一下吧!  

知识大全 Delphi中的图形显示技巧[2]

Delphi中的图形显示技巧[2]  以下文字资料是由(全榜网网www.cha138.com)小编为大家搜集整理后发布的内容,让我们赶快一起来看一下吧!  垂直交错效果 

知识大全 用C#监控并显示CPU状态信息

用C#监控并显示CPU状态信息  以下文字资料是由(全榜网网www.cha138.com)小编为大家搜集整理后发布的内容,让我们赶快一起来看一下吧!  简介  本文将介绍

知识大全 用JS实现个性的QQ状态显示

用JS实现个性的QQ状态显示  以下文字资料是由(全榜网网www.cha138.com)小编为大家搜集整理后发布的内容,让我们赶快一起来看一下吧!现在好多网站都有QQ在线

知识大全 Delphi中的图形显示技巧

程序开发小技巧:Delphi中的图形显示技巧  以下文字资料是由(全榜网网www.cha138.com)小编为大家搜集整理后发布的内容,让我们赶快一起来看一下吧!目前在许

知识大全 在Delphi中开发使用多显示器的应用程序

在Delphi中开发使用多显示器的应用程序  以下文字资料是由(全榜网网www.cha138.com)小编为大家搜集整理后发布的内容,让我们赶快一起来看一下吧! Wind