| 网站首页 | JAVA文章 | AppServers | Web开发 | 应用开发 | 资源下载 | 论坛
    想学好编程,学好外语很重要  [enadd  2006年12月25日]        
设为首页 加入收藏 联系站长
您现在的位置: 编程笔记网 >> 应用开发 >> delphi >> 用户界面 >> 文章正文
轻轻松松在DELPHI3.0中实现三态按钮            【字体:
轻轻松松在DELPHI3.0中实现三态按钮
作者:不祥    文章来源:-    点击数:    更新时间:2006-12-12

轻轻松松在DELPHI3.0中实现三态按钮


---- 在许多新的软件中都用到三态按钮。所谓的三态按钮就是当鼠标还末移到时,按钮显示一种平面图像(FLAT);当鼠标移到按钮时,按钮呈现凸立体(UP);当鼠标在按钮上按下时,按钮呈现凹立体(DOWN)。


---- 由于DELPHI中有图像按钮,能够实现UP和DOWN两种状态,因此只需增加FLAT状态即可。笔者经过研究,发现有以下两种方法。


---- 1. 修改BITBTN上的GLYPH属性.


---- (1)当处于FLAT状态时,GLYPH属性设置为图像文件1,为了让按钮只是平面地显示,必须让图像文件1的尺寸大于按钮的实际尺寸,按钮就呈现平面状,可以在 FORM的ONMOUSEMOVE事件上用以下函数实现:


     Bitbtn1.glyph.loadfromfile(‘文件名1’);

---- (2)当处于UP和DOWN状态时,GLYPH设置为图像文件2。由于BITBTN构件本身就具有按钮的特性,所以对图像大小没有特殊要求。可以在BITBTN1的ONMOUSEMOVE事件上用以下函数实现:


    Bitbtn1.glyph.loadfromfile(‘文件名2’);

---- 用这种方法实现的三态按钮有一个明显的不足,由于BITBTN1不断地从图像文件LOAD图像数据,因此图像一直闪烁不定,不但影响运行速度而且效果不佳。


---- 2.修改IMAGE构件和BITBTN构件的VISIBLE属性


---- 在FORM的同一个位置设置大小完全相等的两个构件IMAGE1和BITBTN1,由于一起动FORM时,显示FLAT状态,因此把IMAGE1的VISIBLE属性初值设为TRUE;把BITBTN1的VISIBLE属性设为FALSE。


---- (1)当处于FLAT状态时,只显示IMAGE1构件。即把IMAGE1的VISIBLE属性设为TRUE,把BITBTN1的VISIBLE属性设为FALSE。于是FORM的OMMOUSEMOVE事件上调用如下语句:


        IMAGE1.VISIBLE:=TRUE;

BITBTN1.VISIBLE:=FALSE;

---- (2)当处于UP或DOWN状态时,把IMAGE1的VISIBLE属性设为FALSE;把BITBTN1的VISIBLE属性设为TRUE。因此在IMAGE1和BITBTN1的 ONCLICK事件上分别调用如下语句:


        IMAGE1.VISIBLE:=FALSE;

		BITBTN1.VISIBLE:=TRUE;

---- 使用该方法虽然多用了一个构件,但是不必频繁地装载图像数据,因此运行速度快,效果也很好。


---- 以上是我在实践的过程中发现的两种比较简单的方法,当然还有许多其它的方法也可以实现,愿与各位读者探讨。


[1]

文章录入:enadd    责任编辑:enadd 
  • 上一篇文章:

  • 下一篇文章:
  • 发表评论】【加入收藏】【告诉好友】【打印此文】【关闭窗口
    最新热点 最新推荐 相关文章
  • 如何在ListView控件中绘底图

  • DELPHI中利用对象的常用属性…

  • 在Delphi编程中创建一个启动…

  • 用Delphi制作动态菜单

  • 如何在标题栏上增加按钮

  • Delphi4的窗口融合技术

  • 控制系统菜单

  • 用Delphi4实现风Word97风格的…

  • 图形整体拉出效果

  • 用DELPHI实现无边界窗体的移…

  •   网友评论:(只显示最新10条。评论内容只代表网友观点,与本站立场无关!)
    | 设为首页 | 加入收藏 | 联系站长 | 友情链接 | 版权申明 | 管理登录 |