使用DELPHI实现WIN98感应式菜单?

Delpher 2000-06-02 12:27:00
在DELPHI5.0中怎样才能实现WIN98中OFFICE软件或IE5.0的那种鼠标一指即表面“浮起”的感应式菜单?现在的DELPHI5.0中的菜单组件不支持这种视觉效果。请不吝赐教!
...全文
211 8 打赏 收藏 转发到动态 举报
写回复
用AI写文章
8 条回复
切换为时间正序
请发表友善的回复…
发表回复
synergy 2000-06-17
  • 打赏
  • 举报
回复
在Form上放一个ControllBar,将其Align设为alTop,然后在其中在放置一个ToolBar,Flat属性设为True;建立数目与MainMenu主菜单数目相同的Button,在每个Button的MenuItem中填上MainMenu每一菜单的Name.最后将MainMenu的AutoMerge属性设为True。用这种方法可以模仿Office的下拉菜单,菜单的位置还可以移动,若不用ControlBar,还可以用CoolBar,那么看起来的效果就和IE5的一样.试试看吧.
zxghl 2000-06-16
  • 打赏
  • 举报
回复
你可以到“www.borland.com”下载一个“Menubar.pas”的单元。
此单元提供了一个“TMemuBar”的控件,可以将TMainMenu轻松改造成TToolBar。
配合TCoolBar、TControlBar即可实现IE、OFFICE风格菜单。
如果你找不到此文件,请告知EMail
jll 2000-06-16
  • 打赏
  • 举报
回复
浮动效果Delphi当然支持,只要flat一下就OK了...
Hibin 2000-06-16
  • 打赏
  • 举报
回复
诸位都说的很对,Delpher,你试过没有?尊重一下别人的劳动!!!
ToolBar设置Flat,MenuItem,ShowCaption属性。
thinking_man 2000-06-08
  • 打赏
  • 举报
回复
Lin说的对,其实,SpeedButton也有这个属性。
Lin 2000-06-08
  • 打赏
  • 举报
回复
谁说不支持,悄悄地告诉你:其实那不是菜单,而是一个TToolButton!ToolBar设置Flat属性。
Axiong 2000-06-02
  • 打赏
  • 举报
回复
现有的好象不行。网上有这中控件,
halfone 2000-06-02
  • 打赏
  • 举报
回复
在TToolBar的每个ToolButton的MenuItem属性加入菜单。不知可以吗?

5,379

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 开发及应用
社区管理员
  • VCL组件开发及应用社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

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