- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- [求助]求自定义右键菜单思路设计 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=77464)
-- 发布时间：2015/11/18 18:15:00
-- [求助]求自定义右键菜单思路设计
想做一个自定义的右键菜单，我用一个panel上面放button,想右键单击指定列跟随显示panel菜单。
这样设计时不用窗口来回换，直接一个窗口就可以设计多个面板右键。预览时隐藏面板，右键后跟随显示菜单出来！
试过用Controls("Panel1").SetBounds 来显示位置，但坐标拾取不会。网上也没搜到这方面资料，不知从何下手
此主题相关图片如下：qq截图20151118175904.png
-- 发布时间：2015/11/19 10:13:00
--
BeforeShowContextMenu事件
e.cancel = True
Dim dp As new Point()
dp.X = Windows.Forms.Cursor.Position.X
dp.Y = Windows.Forms.Cursor.Position.Y
dp = e.Form.panel.PointToClient(dp)
e.Form.Controls("Panel1").basecontrol.left = dp.x
e.Form.Controls("Panel1").basecontrol.Top = dp.y
-- 发布时间：2015/11/19 11:51:00
--
谢谢大神，跪拜
