关于OfficeXP样式的菜单!~~~

OfficeXP样式的菜单是如何实现的?  就是在菜单上面有一小条, Drag它可以把它Drag出一个小的工具条!~~~    谢谢大家?(想了好长时间还是想不通, 没办法只好麻烦大家了)

解决方案 »

  1.   

    省事的办法：用XPMENU控件。
    不省事的办法：CoolBar + ToolBar
      

  2.   

    用Delphi7里自带的ActionMainMenuBar+ActionManager就可以了。
      

  3.   

    呵呵, 我问的不是这个, 这些我都知道,,
        你们仔细看一下, 是Drag, 是在菜单中实现拖动, 把菜单里的一项拖出来, 变成一个工具栏,!~~~
      

  4.   

    用控件：DevExpress ExpressBar 4.2及以上版本
    里面有个BarManager控件，可以实现菜单与工具栏的运行时定制功能。下载地址忘了，你可以在网上搜索一下。
    4.2版的SN：ODFAKSDFESDFODG
      

  5.   

    用Delphi7里自带的ActionMainMenuBar+ActionManager就可以了。
      

  6.   

    ActionMainMenuBar+ActionManager
    看看delphi自带的范例就可以了！
      

  7.   

    我晕, 看样我还没说明白, ActionMainMenuBar ActionManager我早就知道了, 
       我问的是拖拽,就是Word里的插入菜单里有一个自动图文集, 其中的第一个子菜单可以拖出来, 如何实现这样的功能!~~~to: Ix130(阿生), 你说的DevExpress我有， 但是安装不上，不好用，
      

  8.   

    在窗体上放一个ControlBar，在ControlBar1中放一个ToolBar，设置ToolBar1的dragking属性为dkDock，ToolBar就能拖出来了。
      

  9.   

    不是要ToolBar拖动出来,   这么说吧, 就以Delphi来说吧, 我想把Delphi里的File菜单里的Open拖出来,