Delphi3中制作快速按钮条

来源:百度文库 编辑:神马文学网 时间:2024/04/26 18:59:37
导航:秋雁南回首页>>逸海书城>>电脑书籍>>程序设计>>DELPHI相关>>Delphi3中制作快速按钮条
逸海书城





Delphi3中制作快速按钮条
快速按钮条上的每一个图形按钮都代表着一项常用的功能,同时,这些图形按钮尺寸较普通的图标大,可以放置更大、更形象的图形,甚至可以带上简短的提示,这对于用户执行最常用的功能很有帮 助。基于上述原因,越来越多的Windows应用程序采用快速按钮条来改善应用程序的界面。笔者在用Delphi3编程过程中,采用了两种不同的方法来实现快速按钮条,本文结合制作一个具有两组共六个按钮的快速按钮条的实例,列出了这两种方法的具体设计步骤。
一、Panel+SpeedBubbon+Bevel组合
1、在窗体上放置一个Panel1对象,作为图形按钮的载体。
2、设置Panel1的属性Caption为空,属性Align为alTop,调整其高度至合适尺寸。
3、在Panel1上放置六个SpeedButton按钮(选用SpeedButton,是因它具有浮动特性)。
4、在panel1上放置两个Bevel对象,调整其位置和大小,用于分隔按钮组。
5、调整SpeedButton1的大小及在Panel1中的位置。
6、选择SpeedButton1,设置其属性Flat为True。
7、单击SpeedButton1的属性Glyph所对应的省略号小按钮,打开PictureEditor窗口,选择一个象征“查询”的图标。设置属性ShowHint为True,属性Hint为“查询”。
8、按步骤5至7的方法,分别设置好其余几个SpeedButton按钮的属性。
这样,一个快速条就制作完成。运行时,快速按钮均以浮动方式显示,当鼠标移至其上时,即显示按钮外框,并显示小提示。
二、借用ToolBar
因TToolBar实际上是工具条组件,用它来实现快速按钮条,只能算借用。
1、在窗体上放置一个ToolBar1对象。
2、设置ToolBar1的属性EdgeBorders.ebLeft、ebTop、ebRight、ebButtom均为True;属性Flat为 True;调整ToolBar1的大小至合适尺寸。
3、选择ToolBar1,用右键呼出快速菜单,分别点击NewButton和NewSeparator增加六个按钮ToolButton和两条分隔栏线。
4、任意选择一个ToolButton按钮,调整其大小至合适尺寸,所有的ToolButton也同时被调整好。
5、设置ToolBar1的属性BorderWidth为3,以调整ToolButton的位置。
6、在窗体上放置一个ImageList1对象,设置它的属性Height和Width的数值,以适应较大尺寸的图像(这一步非常重要,读者可自己体会)。
7、双击ImageList1,通过“Add”按钮分别装入六个图像,与ToolBar1中的六个ToolButton一一对应。
8、设置ToolBar1的属性Images为ImageList1。
9、设置六个ToolButton的属性ShowHint为True,并分别设置各自的小提示属性Hint。
10、还可以设置ToolBar1的HotImages指定鼠标指向按钮时的图片集。
采用ToolBar实现的快速条在外观上与第一种方法类似。
三、孰优孰劣?
以上两种方法均能实现快速按钮条,但各有千秋:第一种设计过程较为简单,第二种方法则提供了更多的功能,如可用HotImages指定鼠标指向按钮时的图片集。读者不妨从中选择一种,并可继续完善其功能,例如将其放入CoolBar中。编程环境为Win 95、Delphi3。
(湖北省枝江市委办公室 曹祖权 443200)EasySea.COM

逸海书城 版权所有 (C) 2002秋雁南回:www.backbird.com 骄阳网:www.oksun.com

_xyz