请问如何实现coolbar上的主菜单? 先放ControlBar,然后在他上面放coolbar就行了,可以在coolbar放其他按钮 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 在coolbar上放toolbar,toolbar上把toolbar的menu属性设置成你的menu控件就可以了,不过menu控件默认是属于窗体的,的先把窗体的么menu属性置空,才可以赋值给toolbar.menu. TControlBar+TToolbar+TMainMenu示例如下放一个TMainMenu,将AutoMerge属性设为True,新建三个菜单 1:Caption "文件" Name "FileMenu" 2:Caption "编辑" Name "EditMenu"3:Caption "帮助" Name "HelpMenu"给“文件”,“编辑”,“帮助”菜单增加几个菜单项目,如”打开,退出“等放一个TControlBar,Align属性设为alTop在TControlBar上放一个工具栏,ShowCaption设为True,DragMode属性设为dmAutomatic,DragKind属性设为drDock,新增三个按钮,设置这三个按钮的MenuItem属性:1: FileMenu 2: EditMenu 3:HelpMenu, 将每个按钮的Grouped属性设为True.大功告成!运行一下试一试! 请问怎样让系统菜单显示在ControlBar上? 如何取消打印任务 谁能提供一个delphi的中文帮助下载?另有两个小问题 sos!!!! delphi close windows TempConverter:=HTTPRIO1 as ITempConverter;中为什么要使用as?他的作用是什么? 应聘工作交作品,交什么作品比较好呢 如何编译成绿色可执行文件??? D6下数据别名的问题 又到了年底,是不是又有打算另谋高就的想法呢? 请问如何判断Active控件注册没有? 简单问题! 如何将报表内容存为RTF文档?
不过menu控件默认是属于窗体的,的先把窗体的么menu属性置空,才可以赋值给toolbar.menu.
示例如下
放一个TMainMenu,将AutoMerge属性设为True,新建三个菜单
1:Caption "文件" Name "FileMenu"
2:Caption "编辑" Name "EditMenu"
3:Caption "帮助" Name "HelpMenu"
给“文件”,“编辑”,“帮助”菜单增加几个菜单项目,如”打开,退出“等
放一个TControlBar,Align属性设为alTop
在TControlBar上放一个工具栏,ShowCaption设为True,DragMode属性设为dmAutomatic,DragKind属性设为drDock,新增三个按钮,设置这三个按钮的MenuItem属性:
1: FileMenu 2: EditMenu 3:HelpMenu, 将每个按钮的Grouped属性设为True.
大功告成!运行一下试一试!