菜鸟问题 如何实现浮动按钮?

tianhao123 2003-10-08 10:41:10
如何实现浮动按钮?鼠标放在上面,能够实出显示。(象IE的工具条按钮样的)
...全文
32 9 打赏 收藏 转发到动态 举报
写回复
用AI写文章
9 条回复
切换为时间正序
请发表友善的回复…
发表回复
kakon 2003-11-09
  • 打赏
  • 举报
回复
轻松搞掂按钮众多效果!
看看效果:
http://www.oklong.net/sdbutton.htm
下载吧:http://www.oklong.net/download/sdflatbtn.ocx
dreamflying1980 2003-10-08
  • 打赏
  • 举报
回复
学习学习
lingll 2003-10-08
  • 打赏
  • 举报
回复
没必要用line,直接画上去就是了
fengchu2 2003-10-08
  • 打赏
  • 举报
回复
我也想知道,顶一下,谢谢射天狼!
射天狼 2003-10-08
  • 打赏
  • 举报
回复
用LINE控件模拟,用四根,根据鼠标的位置]改变线的颜色就可以!
lucidaxy 2003-10-08
  • 打赏
  • 举报
回复
image
lidaixiang 2003-10-08
  • 打赏
  • 举报
回复
其实很容易.浮动按纽的原理其实是利用视差,其实现起来是这样:鼠标未在按纽上时,按纽与"阴影"相错.当鼠在按纽上时,按纽与"阴影"重合,也就是不悬浮了.

明白了这一点,要做到就很容易了.

1,在按纽下面画一个标签,让标签的LEFT与TOP都比按纽的LEFTT和TOP大45(此值可调),标签设为FLAT,背景色为黑色;
2,设置按纽的MOUSEMOVE事件:command1.left=label1.left,command1.top=label1.top
这两行代码的作用是按纽不悬浮.
3,设置窗体的MOUSEMOVE事件:command1.left=label1.left-45,command1.top=label1.top-45
这两行代码的作用是,当鼠标离开按纽在窗体上时,按纽浮起来.
handsomge 2003-10-08
  • 打赏
  • 举报
回复
很简单,只要使用两个API:
SetCapture
ReleaseCapture

要代码的话,可以联系:vbvcasp@tom.com
rainstormmaster 2003-10-08
  • 打赏
  • 举报
回复
看:
http://vb1.myrice.com/article/interface/face027.htm

7,763

社区成员

发帖
与我相关
我的任务
社区描述
VB 基础类
社区管理员
  • VB基础类社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧