word2000的菜单是可拖出来,并可停靠(dock)的,是如何实现的呢?
delphi控件多有dock的属性,关键就在这
先在窗体上放一个coolbar
在coolbar上放一个toolbar添加几个按钮
设置showcaption的属性为true;
做一个mainmenu并添加几个菜单项
将窗体的menu属性设置为空
toolbar的按钮autosize设为true
把按钮的menuitem设为相应的mainmenu项
看一看是不是有点意思
对了,菜单还不能自动弹出,也不能拖出coolbar的范围
这个好说
把按钮的group属性设一下怎么样?变了没有,是不是可以自动弹出了?是不是很像delphi5的ide界面菜单.
把toolbar的拖拽属性和停泊(dock)属性设一下(你不会不知道哪个是这两个属性吧:-( )
快和word200的菜单比一比吧.
