关于按键精灵的问题。这是我的源文件,请帮我改成后台运行的
RemxznKeyPress"F11",1IfColor357,80,"3846DD",0ThenRemxuanKeyPress"F1",1Delay2000ElseGo...
Rem xzn
KeyPress "F11", 1
IfColor 357,80,"3846DD",0 Then
Rem xuan
KeyPress "F1", 1
Delay 2000
Else
Goto xzn
End If
IfColor 357,80,"3846DD",1 Then
Goto xzn
Else
Goto xuan
End If
我用的是精灵9.还有得到句柄弄了之后有什么用,我是新手。。麻烦给我解释下 展开
KeyPress "F11", 1
IfColor 357,80,"3846DD",0 Then
Rem xuan
KeyPress "F1", 1
Delay 2000
Else
Goto xzn
End If
IfColor 357,80,"3846DD",1 Then
Goto xzn
Else
Goto xuan
End If
我用的是精灵9.还有得到句柄弄了之后有什么用,我是新手。。麻烦给我解释下 展开
1个回答
展开全部
精灵7 我用的比较多。语法 给你一下,然后你自己 对照一下语法。后台你参考一下 基本命令边的全部命令的知道的。
后台,你应该知道 选点 357,80 会发生变化的!
Dim hwnd
Plugin hwnd=Window.MousePoint()
Rem xzn
Plugin Bkgnd.KeyPress(Hwnd, 122)
IfColor 357,80,"3846DD",0 Then
Rem xuan
Plugin Bkgnd.KeyPress(Hwnd, 112)
Delay 2000
Else
Goto xzn
End If
IfColor 357,80,"3846DD",1 Then
Goto xzn
Else
Goto xuan
End If
后台,你应该知道 选点 357,80 会发生变化的!
Dim hwnd
Plugin hwnd=Window.MousePoint()
Rem xzn
Plugin Bkgnd.KeyPress(Hwnd, 122)
IfColor 357,80,"3846DD",0 Then
Rem xuan
Plugin Bkgnd.KeyPress(Hwnd, 112)
Delay 2000
Else
Goto xzn
End If
IfColor 357,80,"3846DD",1 Then
Goto xzn
Else
Goto xuan
End If
更多追问追答
追问
我用的是按键精灵9 。。。这个可以吗?
追答
jige几个语法的改变,,自己找一下 .最好还是用精灵7吧。
Dim hwnd
Plugin hwnd=Window.MousePoint()
Plugin Bkgnd.KeyPress(Hwnd
IfColor 357,80,"3846DD",--------这个错了。应该是先找色,然后确认是否同色
GetColor = Plugin.Bkgnd.GetPixelColor(Hwnd, 357,80)
If getcolor = "3846DD" Then
Plugin Color1 = Bkgnd.GetPixelColor(hwnd,x坐标,y坐标)
If Color1 = 312114
AiPPT
2024-09-19 广告
2024-09-19 广告
随着AI技术的飞速发展,如今市面上涌现了许多实用易操作的AI生成工具1、简介:AiPPT: 这款AI工具智能理解用户输入的主题,提供“AI智能生成”和“导入本地大纲”的选项,生成的PPT内容丰富多样,可自由编辑和添加元素,图表类型包括柱状图...
点击进入详情页
本回答由AiPPT提供
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询