Delphi3中制作快速按钮条
Delphi3中制作快速按钮条,Delphi3中制作快速按钮条
快速按钮条上的每一个图形按钮都代表着一项常用的功能保庑┩夹伟磁コ叽缃掀胀ǖ耐急甏螅梢苑胖酶蟆⒏蜗蟮耐夹危踔量梢源霞蚨痰奶崾荆舛杂谟没е葱凶畛S玫墓δ芎苡邪铩≈;谏鲜鲈颍嚼丛蕉嗟腤indows应用程序采用快速按钮条来改善应用程序的界面。笔者在用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。