首页 ┆ 源码下载 ┆ IT学院 ┆ 字体下载 ┆ 模板下载 ┆ 源码发布 ┆ 广告合作 ┆ 网站地图 ┆ 虚拟主机 ┆ 中文域名

►►您当前的位置：源码园 → IT学院 → 软件开发 → Delphi编程 → 文章内容

Delphi3中制作快速按钮条

作者：佚名来源：网上收集发布时间：2005-12-10 0:21:43

快速按钮条上的每一个图形按钮都代表着一项常用的功能保庑┩夹伟磁コ叽缃掀胀ǖ耐急甏螅梢苑胖酶蟆⒏蜗蟮耐夹危踔量梢源霞蚨痰奶崾荆舛杂谟没е葱凶畛Ｓ玫墓δ芎苡邪铩≈；谏鲜鲈颍嚼丛蕉嗟腤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。

[] [返回上一页] [打印]

关于本站 - 网站帮助 - 广告合作 - 下载声明 - 友情连接 - 网站地图 - 源码发布

Copyright © 2003-2009 Ymyasp.Com. All Rights Reserved .
备案序号:粤ICP备07029071号