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


  共有1721人关注过本帖树形打印复制链接

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

帅哥哟,离线,有人找我吗?
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)

 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/3/22 16:23:00 [只看该作者]

参考

 

下载信息  [文件大小:296.0 KB  下载次数:15]
图片点击可在新窗口打开查看点击浏览该文件:按钮菜单.table


 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/3/22 16:25:00 [只看该作者]

forms("动态窗口").show(System.Windows.Forms.Cursor.Position.X, System.Windows.Forms.Cursor.Position.Y)

 


 回到顶部
帅哥哟,离线,有人找我吗?
Gryvip
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:479 积分:4505 威望:0 精华:0 注册:2008/9/4 14:40:00
  发帖心情 Post By:2016/3/22 16:34:00 [只看该作者]

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

 回到顶部
帅哥哟,离线,有人找我吗?
Gryvip
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | 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)

 回到顶部