按键精灵8.0的抓图问题
RemaFindPic0,0,1300,700,"Attachment:\啊是.bmp",0.9,intX,intYIfintX>0AndintY>0ThenMoveRi...
Rem a
FindPic 0,0,1300,700,"Attachment:\啊是.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
MoveR intX, intY
Delay 500
LeftClick 1
End If
Goto a
这是代码
图片我已经附加进了 还是不行 望高手指点 展开
FindPic 0,0,1300,700,"Attachment:\啊是.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
MoveR intX, intY
Delay 500
LeftClick 1
End If
Goto a
这是代码
图片我已经附加进了 还是不行 望高手指点 展开
3个回答
AiPPT
2024-09-19 广告
2024-09-19 广告
随着AI技术的飞速发展,如今市面上涌现了许多实用易操作的AI生成工具1、简介:AiPPT: 这款AI工具智能理解用户输入的主题,提供“AI智能生成”和“导入本地大纲”的选项,生成的PPT内容丰富多样,可自由编辑和添加元素,图表类型包括柱状图...
点击进入详情页
本回答由AiPPT提供
展开全部
1)楼主试下单步调试,如果鼠标能够移到图片那儿,只是点击没有反应,那么如下改:MoveR intX+5,intY+5
2)还有,找图和判断需要加延时。第二三四行间加点延时。
3)endif,不是end if
还有个小小的建议,endif前最好加上else条件,以便在找不到图时能够停止程序,免得这玩意抽动。比如
else
Endfor
Endif
这是我的一个小脚本
Rem begin
VBSCall FindPic(0,0,1024,768,"Attachment:\King.bmp",0.9,intX,intY)
Delay 100
If intX>0 and intY>0
MoveTo intX+1,intY+1
Delay 100
LeftClick 1
Delay 100
Goto begin
Else
EndFor
EndIf
2)还有,找图和判断需要加延时。第二三四行间加点延时。
3)endif,不是end if
还有个小小的建议,endif前最好加上else条件,以便在找不到图时能够停止程序,免得这玩意抽动。比如
else
Endfor
Endif
这是我的一个小脚本
Rem begin
VBSCall FindPic(0,0,1024,768,"Attachment:\King.bmp",0.9,intX,intY)
Delay 100
If intX>0 and intY>0
MoveTo intX+1,intY+1
Delay 100
LeftClick 1
Delay 100
Goto begin
Else
EndFor
EndIf
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
2010-09-21
展开全部
第一,你可能超过屏幕了,第二,透明图片没有处理好,第三,你抓的图片可以是以文字形成的,或者同一页中有多个你的图片。第四,精度太高
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询