Delphi菜单如何做成word2000的可停靠样子
- 发布于:2024-02-14
- 共 128 人围观
Delphi控件多有Dock的属性,关键就在这
先在窗体上放一个CoolBar
在CoolBar上放一个ToolBar添加几个按钮
设置ShowCaption的属性为True;
做一个MainMenu并添加几个菜单项
将窗体的menu属性设置为空
ToolBar的按钮AutoSize设为True
把按钮的MenuItem设为相应的MainMenu项,注意:其List属性true时图标在左,否则,在上。
看一看是不是有点意思
对了,菜单还不能自动弹出,也不能拖出CoolBar的范围
这个好说
把按钮的Group属性设一下怎么样?变了没有,是不是可以自动弹出了?是不是很像Delphi5的IDE界面菜单.
把ToolBar的拖拽属性和停泊(Dock)属性设一下(你不会不知道哪个是这两个属性吧:-( )
快和Word200的菜单比一比吧.