社区
Delphi
帖子详情
如何取得当前鼠标在屏幕中的位置?
getdelphi
2003-09-14 11:03:54
如何取得当前鼠标在屏幕中的位置?
...全文
112
9
打赏
收藏
如何取得当前鼠标在屏幕中的位置?
如何取得当前鼠标在屏幕中的位置?
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
9 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
tjff2000
2003-09-14
打赏
举报
回复
var point:Tpoint;
begin
GetCursorPos(point);
Edit1.Text:=inttostr(point.x);
end;
getdelphi
2003-09-14
打赏
举报
回复
能不能给个例子?
sixgj
2003-09-14
打赏
举报
回复
需要用到API函数 getcursorpos();
tjff2000
2003-09-14
打赏
举报
回复
getcursorpos();
tohail
2003-09-14
打赏
举报
回复
在 OnMouseMove事件中
procedure TForm1.FormMouseMove(Sender: TObject; Shift: TShiftState; X,
Y: Integer);
var
MyPoint:Tpoint;
begin
GetCursorPos(MyPoint); //获取屏幕坐标
X:=MyPoint.X; //重定位X坐标值
Y:=MyPoint.Y; //重定位Y坐标值
Label1.Caption:='X: '+IntToStr(X)+' Y: '+ IntToStr(Y); //将坐标显示出来
end;
dyf2001
2003-09-14
打赏
举报
回复
呵呵,是呀
Mouse.CursorPos.X
Mouse.CursorPos.Y
xudong51
2003-09-14
打赏
举报
回复
楼上的方法最方便
FrameSniper
2003-09-14
打赏
举报
回复
直接用全局变量Mouse的属性CursorPos!
大地精灵
2003-09-14
打赏
举报
回复
var
x:integer;
begin
x := GetCursorPos(point).x;
end;
【c#解放双手】模拟
鼠标
键盘纯自动化操作
这节课教大家去写自动化软件,也就是让电脑自动模拟用户行为,自动去打开软件,自动点击按钮。这个技能非常实用,用的好可以一本万利,实现财务自由。很多人靠写一个自动化工具,一个月就能卖个好几百万单,挣得盆满钵满。这就是技术优势,而对于大多数人来说根本就写不出来,也就只能在低处观望。这是客户花费了两万多让我制作的一个自动化软件,我把里面的核心功能与代码提取出来,视频讲解并分享给大家。最后再把价值两万的源码分享给大家。当然如果想自己去研究的同学也可以花一两个月时间自己去找资料研究,时间成本差不多也是两万。 各大行业都可以使用,在电脑上人为手动的操作,都可以进行模拟,让程序自动化去完成你的所有动作。比如:财务记账自动填充数据自动去提交,软件自动化测试,游戏自动挂机脚本,远程电脑操控,电商商品自动录入,以及自媒体自动化营销。 课程内容有:模拟
鼠标
与键盘,自动电脑里的软件,图像识别算法点击
屏幕
里的按钮,远程服务操控电脑
unity,如何让
当前
物体获取
鼠标
位置
,转向
鼠标
在
屏幕
中
的
位置
?
unity,如何让
当前
物体获取
鼠标
位置
,转向
鼠标
在
屏幕
中
的
位置
?
如何获取
鼠标
当前
在
屏幕
中
的什么
位置
?
坑:如何获取
鼠标
当前
在
屏幕
中
的什么
位置
?
UE4_蓝图节点 获取
屏幕
大小 和设置
鼠标
在
屏幕
中
的
位置
Get View Port Size 获取视口大小节点 获取
屏幕
的长高,输出Vector2D值。 Set Mouse Size 设置
屏幕
位置
节点 输入玩家控制器目标和要显示的
屏幕
空间坐标
位置
(坐标(0,0)在
屏幕
左上角),如果要将
鼠标
设置在
屏幕
中
心,可将视口长高各除2后输入到XY接口。 ...
AHK 键盘控制
鼠标
点击
屏幕
不同
位置
按键控制
鼠标
点击
屏幕
特定
位置
按键控制重设
屏幕
点击
位置
按键显示
当前
鼠标
在
屏幕
上的
位置
代码功能: 按 F6 和 F7 分别对应点击两个单独的
屏幕
坐标 按 Ctrl + F6 和 Ctrl + F7分别对应重新设置两个单独的
屏幕
坐标
位置
按Ctrl + / 来弹窗显示
当前
光标在
屏幕
上的坐标 x := 300 ; 要点击
位置
的横坐标(默认值) y := 400 ; 要点击
位置
的纵坐标(默认值) x2 := 300 ; 要点击
位置
的横坐标(默认值) y2 := 400 ; 要点击
位置
的纵坐标(默认值) .
Delphi
5,388
社区成员
262,729
社区内容
发帖
与我相关
我的任务
Delphi
Delphi 开发及应用
复制链接
扫一扫
分享
社区描述
Delphi 开发及应用
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章