Delphi7下的弹出式菜单问题(200分)

  • 主题发起人 主题发起人 教父
  • 开始时间 开始时间

教父

Unregistered / Unconfirmed
GUEST, unregistred user!
在Delphi中有ActionManager,用这个配合ActionMainMenuBar可以做出Office XP风格的主菜单,
但是有两个问题,我一直没有办法解决,还请各位高手指点。
1、将ActionManager的Action放到ActionToolbar上可以生成工具条按钮,但是这个按钮没有办法
显示Hint;
2、没有办法做出Office XP风格的弹出式菜单。

尽量不要让我用破解的第三方控件,免费的还可以考虑。

先谢过各位!
 
ExpressBars 4.2 for D7的应该比d7自带的好用,窑洞有,带源代码
 
我不太想用第三方控件,D7能做MainMenu,为什么不能做PopupMenu呢。
 

1。在form上创建coolbar,mainmenu,然后在coolbar上创建toolbar.toolbar.flat:=tr

ue;
2. 为mainmenu设置你所想要的items,并且mainmenu.automerge:=true;toolbar.men

u:=mainmenu即可。
为了更好看一点,可以toolbar.edgeinner:=esNone;当然,这是个人的喜好
完成,风格与ie的菜单第一行完全一样。
这样免得每个toolbar的menuitem要设置成mainmenu的某个item,很方便的,呵呵
 
to franczx:咳咳,老大,你没搞懂我的意思哦,呵呵

我试了ExpressBars,有两个问题,一个是编译后的程序一下子就多了4XXK,有点恐怖哦,我只不过
是要一个菜单而已;另一个问题是它不能做ToolButton的DropdownMenu,偏偏我就是要这个。
又试了试XPMenu,也有一些问题,PopupMenu必须在XPMenu之前被创建,偏偏我的PopupMenu的菜单项
是动态创建的,所以我只能在第一次创建菜单项的时候动态创建XPMenu,即使这样还是有问题,我不能
把新创建的菜单项插到最前面,否则那一项显示有问题。
 
你可以在创建PopupMenu之后再动态创建XPMenu的呀
 
呵呵,老兄,你再看看我上面写的。
 
toolbar2000好象可以用。试了吗?
 
教父,老版的XPmenu好像是有问题,但是我用的最新版的好像没有那些显示的问题了
 
我的已经是从它的主页上下的最新的了。
 
to 教父:
XPMenu1.Active := false;
XPMenu1.Active := true;
就这么简单 就这么容易
 
教父这个死白痴,有控件不喜欢用,中国就多这种喜欢耍小聪明的人,sb,天啊,
这人搞了这么多年计算机还是用delphi,可悲
 
qqphoenix 和 教父 真是对头:)
 
to教父:
请问你的email地址是什么,我有个问题想请教你。
 
哪里有ExpressBars 4.2 for D7下?
 
后退
顶部