Delphi 如何下调Mianmenu的位置

一：由于Mainmenu通常默认是置顶，如下图所示：

二：因此Mianmenu想将顶部的菜单，向下移动一定的距离，单独的通过操作组件Mainmenu是不行的。因此可采用ToolBar+ControlBar+Mainmenu.

具体步骤如下

1.先用Mainmenu设置好自己需要的菜单，Form1 中menu选项中删掉Mainmenu。

2.选择controlBar组件，将contorlbar 的属性设置，DockSite:=True。

3.选择Toolbar属性，放置在controlBar组件中， Flat := True,DragKind := dkDock,DragMode := dmAutomatic,Toolbar 中的Menu设为你的MainMenu。

4 .重新运行下就可以呢。

运行结果如下图所示：