请问使用按键精灵找图怎么才能不受电脑分辨率还有桌面主题的影响

 我来答
百度网友be89764
2011-09-20 · TA获得超过484个赞
知道小有建树答主
回答量:1221
采纳率:0%
帮助的人:713万
展开全部
写了个示例,自己改改吧...
Dim x,y,xcheck,ycheck
rem first
inputx = inputbox("输入边框宽度X数值")
xcheck=IsNumeric(inputx)
Select Case xcheck
Case True
x=inputx
Case False
MsgBox ("输入必须是数字!你输入的X是:"&inputx)
Goto first
End Select
inputy = inputbox("输入边框高度Y数值")
ycheck=IsNumeric(inputy)
Select Case ycheck
Case True
y=inputy
Case False
MsgBox ("输入必须是数字!你输入的Y是:"&inputy)
Goto first
End Select
MsgBox ("X等于" &x)
MsgBox ("Y等于" &y)
Dim MyVar, MyCheck
MyVar = 53 '赋值。
MyCheck = IsNumeric(MyVar) ' 返回 True。

//x=3
//=29
//边框值,偏移量
MessageBox "2秒"
Delay 2000
Hwnd = Plugin.Window.MousePoint()
Call Plugin.Window.Move(Hwnd, 0, 0)
Rem a
Sub 坐标转换

winRect = Plugin.Window.GetClientRect(Hwnd)
winPoint = Split(winRect, "|", -1, 1)
AbsX = CInt(winPoint(0)) + PosX - x
AbsY = CInt(winPoint(1)) + PosY - y
//MoveTo AbsX,AbsY
PosX = AbsX
PosY = AbsY
End Sub
PosX=579
PosY=222
Call 坐标转换()
IfColor PosX,PosY ,"E5FFFF",0 Then
Beep
Delay 1000
Else
End If
Goto a
feiyang169
2011-09-21 · TA获得超过383个赞
知道小有建树答主
回答量:993
采纳率:0%
帮助的人:435万
展开全部
Screeny = Plugin.Sys.GetScRY()
Screenx = Plugin.Sys.GetScRX()
用这2个获取分辨率,然后通过运算来确定脚本里面用到的坐标。
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式