在delphi7中不使用任何第三方控件,实现放在工具栏上可拖动的xp风格菜单.
来源:百度文库 编辑:神马文学网 时间:2024/05/12 16:50:54
对于不想第三方控件但又想加点效果的朋友可能有点用.实现的效果如图:
步骤一:把Win32面板上把CoolBar组件加到窗体上
步骤二:把Additional面板上的ActionMainMenuBar组件加到CoolBar组件上.(注意一定要放在CooBar 组件上)
步骤三:把Win32面板上的PageScroller组件同样加到CoolBar组件上.
步骤四:把Additional面板上的ActionToolBar组件加到PageScrooler组件上(注意放在PageScroolerh 上)
步骤五:把Additional面板上的ActionManager组件加到窗体上
步骤六:把CoolBar组件的AutoSize属性设为True
步骤七:选择ActionManager组件,双击它的的ActionBars属性,在弹出的Editing ActionManager1.ActionBars框中增加两个TActionBarItem,选择第一个TActionBarItem,双击它的Items属性,在弹出的框中增加两个ActionClientItem,把两个ActionClientItem的Caption属性分别设成"文件" ,"编辑", 再在ActionClientItem中的Items属性增加ActionClientItem, 并把它们的Caption属设成"新建","打开"之类的.如果你想在新建里面再出现子菜单,那么就在它的Items属性再增加ActionClientItem,设好Caption内容. 选择第二个TActionBarItem,按照上面所讲的方法同样增加ActionClientItem,并设好Caption属性.
步骤八:选择第一个TActionBarItem, 设它的ActionBar属性为ActionMainMenuBar,选第二个TActionBarItem,设它的ActionBar属性为ActionToolBar.
步骤九:运行程序,相信你已经看到所图所示的效果.致于其它很多属性,读者自己去分析.
_xyz
步骤一:把Win32面板上把CoolBar组件加到窗体上
步骤二:把Additional面板上的ActionMainMenuBar组件加到CoolBar组件上.(注意一定要放在CooBar 组件上)
步骤三:把Win32面板上的PageScroller组件同样加到CoolBar组件上.
步骤四:把Additional面板上的ActionToolBar组件加到PageScrooler组件上(注意放在PageScroolerh 上)
步骤五:把Additional面板上的ActionManager组件加到窗体上
步骤六:把CoolBar组件的AutoSize属性设为True
步骤七:选择ActionManager组件,双击它的的ActionBars属性,在弹出的Editing ActionManager1.ActionBars框中增加两个TActionBarItem,选择第一个TActionBarItem,双击它的Items属性,在弹出的框中增加两个ActionClientItem,把两个ActionClientItem的Caption属性分别设成"文件" ,"编辑", 再在ActionClientItem中的Items属性增加ActionClientItem, 并把它们的Caption属设成"新建","打开"之类的.如果你想在新建里面再出现子菜单,那么就在它的Items属性再增加ActionClientItem,设好Caption内容. 选择第二个TActionBarItem,按照上面所讲的方法同样增加ActionClientItem,并设好Caption属性.
步骤八:选择第一个TActionBarItem, 设它的ActionBar属性为ActionMainMenuBar,选第二个TActionBarItem,设它的ActionBar属性为ActionToolBar.
步骤九:运行程序,相信你已经看到所图所示的效果.致于其它很多属性,读者自己去分析.
_xyz
在delphi7中不使用任何第三方控件,实现放在工具栏上可拖动的xp风格菜单.
Delphi中不使用第三方控件实现XP风格
可拖动的菜单
树形菜单(使用xtree控件实现)
在VFP中定制自己的工具栏
在vfp5.0中使用 treeview控件
VC程序中树型控件节点拖动的完美实现
在Dreamweaver中轻松实现滑动折叠菜单
图解在Windows XP中使用NetMeeting的方法
图解在Windows XP中使用NetMeeting的方法
在WEB项目中多维下拉菜单的实现技巧和方法
您的安全设置不允许网站使用安装在您的计算机上的ActiveX控件
在C#中使用属性控件添加属性窗口
如何在 Windows XP 中向“发送到”菜单添加菜单项
在Visual FoxPro中使用TreeView控件|TreeView 控件 VFP|时...
如何在 JavaScript 中实现拖放(上)
如何在 JavaScript 中实现拖放(上)
哪里有让窗体显示XP风格的DELPHI控件?
可以放在网页任何位置的日历特效代码
cxGrid在内置右键菜单的后面增加菜单项并实现诸多功能
青蛙小得可放在铅笔上
剪贴板工具栏的使用
可以自定义打字效果的个性留言板(可放在51,QQ的主页上)
怎样在工具栏上添加或删除按钮?