Delphi 如何下调Mianmenu的位置

一:由于Mainmenu通常默认是置顶,如下图所示: 二:因此Mianmenu想将顶部的菜单,向下移动一定的距离,单独的通过操作组件Mainmenu是不行的。因

一:由于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 .重新运行下就可以呢。

运行结果如下图所示: