- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 快捷菜单的问题 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=98742)
-- 发布时间：2017/4/6 11:04:00
-- 快捷菜单的问题
在窗口的工具栏的某个项目上显示一个快捷菜单怎么实现？
-- 发布时间：2017/4/6 11:20:00
--
做一个隐藏的button，放在工具栏下面，适当调整坐标即可
Dim btn As WinForm.Button = e.form.controls("Button1")
btn.ShowContextStrip(0, 0, e.Form.Strips("快捷菜单1"))
-- 发布时间：2017/4/6 11:48:00
--
我看了下动态生成菜单项目这个 我也可以考虑代码生成 但是工具栏好像没有相关方法啊
-- 发布时间：2017/4/6 11:49:00
--
Dim Strip As WinForm.Strip
Strip = e.Form.Strips("工具栏1")
strip.Items("打印").Add("发货单", "发货单", "", StripItemTypeEnum.MenuItem)
---------------------------
错误
---------------------------
编译错误:“Add”不是“WinForm.StripItem”的成员。
错误代码：strip.Items("打印").Add("标准发货单", "标准发货单", "", StripItemTypeEnum.MenuItem)
---------------------------
确定
---------------------------
-- 发布时间：2017/4/6 12:05:00
--
strip.Items("打印").items.Add("发货单", "发货单", "", StripItemTypeEnum.MenuItem)
-- 发布时间：2017/4/6 12:18:00
--
以下是引用rjh4078在2017/4/6 11:48:00的发言：
我看了下动态生成菜单项目这个 我也可以考虑代码生成 但是工具栏好像没有相关方法啊
我看了下动态生成菜单项目这个 我也可以考虑代码生成 但是工具栏好像没有相关方法啊
没看懂你的意思，红色的位置，不是可以任意修改？
Dim btn As WinForm.Button = e.form.controls("Button1")
btn.ShowContextStrip(0, 0, e.Form.Strips("快捷菜单1"))
-- 发布时间：2017/4/6 12:42:00
--
此主题相关图片如下：qq截图20170406124044.png
窗口菜单事件中 执行的时候报错
.NET Framework 版本：2.0.50727.8745
Foxtable 版本：2017.3.18.1
错误所在事件：窗口,销售订单,ItemClick
详细错误信息：
未将对象引用设置到对象的实例。
-- 发布时间：2017/4/6 14:55:00
--
没看懂你要做什么，实例上传上来。
-- 发布时间：2017/4/6 16:53:00
--
就是在工具栏的一级菜单下再生成二级菜单
-- 发布时间：2017/4/6 16:57:00
--
以下是引用rjh4078在2017/4/6 16:53:00的发言：
就是在工具栏的一级菜单下再生成二级菜单
就是在工具栏的一级菜单下再生成二级菜单
动态显示一个快捷菜单不就行了？
http://www.foxtable.com/webhelp/scr/3116.htm