如何实现象Delphi7那样的菜单，可以随便拖放？

Question

如何实现象Delphi7那样的菜单，可以随便拖放？
特别是看上去象一个Panel。

Answer 1

panel DOCK属性。拖拽是这个属性吧。书上有介绍的

Answer 2

1.放一个TcontrolBar到窗体上，将Align设为alTop,AutoSize设为True
2.拖一个ToolBar到TconTrolBar上
3.拖一个TmainMenu到桌面上，将下拉菜单设计出来
4.在ToolBar上建立和TmainMenu中主菜单项个数一样多的按钮，将每一个按钮的  MenuItem设为相应的下拉菜单的第一项的菜单项名字，比如说要实现Delphi的菜单，那么第一个按钮的Name就要设为File的Name属性一样的名字，Caption属性设为相应的菜单的Caption的属性，比如说设为"文件",当然了，ToolBar的ShowCaptions属性要设为True.
5.将Tform的Menu属性清空。
6.运行，你可以发现你的菜单可以拖放了.

Answer 3

使用ABC控件，最容易做到，网上很多下载的

Answer 4

1.放一个TCoolBar到窗体上，将Align设为alTop,AutoSize设为True
2.拖一个TToolBar到TconTrolBar上
3.拖一个TmainMenu到桌面上，将下拉菜单设计出来
4.将ToolBar的Menu属性设为第三步的MainMenu
5.将Tform的Menu属性清空。
6.运行，你可以发现你的菜单可以拖放了.