[求助] 获取当前控件在屏幕的坐标 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助] 获取当前控件在屏幕的坐标

共有1915人关注过本帖树形打印复制链接主题：[求助] 获取当前控件在屏幕的坐标

gryvip

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：一尾狐帖子：479 积分：4505 威望：0 精华：0 注册：2008/9/4 14:40:00

[求助] 获取当前控件在屏幕的坐标 发帖心情

Post By：2016/3/22 16:22:00 [显示全部帖子]

各位前辈及学友，向单击按钮在制定位置打开窗口，下面代码不正确，请给予指正，谢谢。

Gryvip

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：一尾狐帖子：479 积分：4505 威望：0 精华：0 注册：2008/9/4 14:40:00

Post By：2016/3/22 16:22:00 [显示全部帖子]

各位前辈及学友，向单击按钮在制定位置打开窗口，下面代码不正确，请给予指正，谢谢。

forms("动态窗口").show(e.form.Controls(e.Sender.name).Left+e.Sender.Width,e.form.Controls(e.Sender.name).Top+e.Sender.Height)

Gryvip

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：一尾狐帖子：479 积分：4505 威望：0 精华：0 注册：2008/9/4 14:40:00

Post By：2016/3/22 16:34:00 [显示全部帖子]

谢谢红袍回复，意思不同，效果差不多，谢谢。

Gryvip

小大 4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：一尾狐帖子：479 积分：4505 威望：0 精华：0 注册：2008/9/4 14:40:00

Post By：2016/3/22 16:57:00 [显示全部帖子]

参考“按钮菜单”例子，获取正确控件坐标，p.x及p.y，有需要的学友可参考。

Dim P As Point = e.Form.panel.PointToScreen(e.Sender.Location)

forms("动态窗口").show(p.x+e.Sender.Width,p.y+e.Sender.Height)

主题：[求助] 获取当前控件在屏幕的坐标