Question

按键精灵 怎么对指定窗口使用

最近在研究按键精灵的后台使用，问下比如一个窗口叫X，怎样编程才能让这段程序只在X中有效？

Answer 1

例子：
Hwnd = Plugin.Window.GetKeyFocusWnd()
//获取当前可发送信息的窗口句柄赋值给Hwnd
Call Plugin.Bkgnd.KeyPress(Hwnd, 70)
//按F键
比如一个窗口模式的游戏，你点中标题栏最为当前窗口，这个程序只对标题栏起作用，应该是选中内容栏，比如说记事本的编辑模式（虽然说记事本一直处于编辑模式下），我前几天搞一个网页游戏，我用360浏览器选择窗口模式，选中标题栏不行，必须点内容，就是人物能跑能跳的情况下，运行脚本才行，上面这个程序刚刚测试过的，希望能帮到你。
ps：关于楼上的多开的情况，我也是学的不咋地，命令还没学全。这是按键精灵8.0的命令，那个回答的最多的人，发的命令是老版本的，也不知道楼主用的哪个版本的按键精灵

Answer 2

原版的就很好 一直没啥问题
一般后台找句柄就是 hwnd = Plugin.Window.Find(0,"窗口标题名字")
hwnd就是存储这要找的窗口句柄 这是找一个的，如果要多开用以下代码
hwnd = Plugin.Window.Search("窗口标题名字")
Dim hwnd_a
Dim hwnd_b
hwnd_a = split(hwnd, "|")
hwnd_b = UBound(hwnd_a)
这样hwnd_a（）数组里面就存储了所有标题含有你要的字符的窗口的句柄
hwnd_b是数组数量

Answer 3

一般后台找句柄就是 hwnd = Plugin.Window.Find(0,"窗口标题名字")hwnd就是存储这要找的窗口句柄 这是找一个的。

如果要多开用以下代码hwnd = Plugin.Window.Search("窗口标题字")Dimhwnd_aDimhwnd_bhwnd_a = split(hwnd, "|")hwnd_b = UBound(hwnd_a)这样hwnd_a（）数组里面就存储了所有标题含有你要的字符的窗口的句柄hwnd_b是数组数量。

Answer 4

要获取窗口句柄 获取句柄方法蛮多的 后台最好用别的插件 按键原版的不是很好

Answer 5

HI号,我白天都在线.

由于你的说明不是很清楚,所以只能通过交流才能更清晰的明白要所要的效果.

我会根据你的要求帮你把代码完善.
以下代码直接复制可用

Dim t1 t2
//下面这句是得到当前最前面的窗口句柄
Plugin hwnd = Window.GetKeyFocusWnd()
//下面这句用于向后台窗口句柄(变量：Hwnd)发送一个键盘(扫描码：113)按键
Plugin Bkgnd.KeyPress(Hwnd, 112)
Delay 200
//下面这句用于向后台窗口句柄(变量：Hwnd)发送一个键盘(扫描码：113)按键
Plugin Bkgnd.KeyPress(Hwnd, 113)
Delay 200
//下面这句用于向后台窗口句柄(变量：Hwnd)发送一个键盘(扫描码：114)按键
Plugin Bkgnd.KeyPress(Hwnd, 114)
Delay 1600
//下面这句用于向后台窗口句柄(变量：Hwnd)发送一个键盘(扫描码：115)按键
Plugin Bkgnd.KeyPress(Hwnd, 115)
Delay 200
//下面这句用于向后台窗口句柄(变量：Hwnd)发送一个键盘(扫描码：116)按键
Plugin Bkgnd.KeyPress(Hwnd, 116)
t2=now
t1=now
While 1=1
While 1=1
While 1=1
//下面这句用于向后台窗口句柄(变量：Hwnd)发送一个键盘(扫描码：113)按键
Plugin Bkgnd.KeyPress(Hwnd, 113)
Delay 200
//下面这句用于向后台窗口句柄(变量：Hwnd)发送一个键盘(扫描码：114)按键
Plugin Bkgnd.KeyPress(Hwnd, 114)
Delay 1600
If DateDiff("s",t1,now)>=61
Goto 按F1循环
EndIf
If DateDiff("s",t2,now)>=181
Goto 按F4F5循环
EndIf
EndWhile
Rem 按F1循环
Delay 500
//下面这句用于向后台窗口句柄(变量：Hwnd)发送一个键盘(扫描码：112)按键
Plugin Bkgnd.KeyPress(Hwnd, 112)
Delay 500
t1=now
If DateDiff("s",t2,now)>=181
Goto 按F4F5循环
EndIf
EndWhile
Rem 按F4F5循环
//下面这句用于向后台窗口句柄(变量：Hwnd)发送一个键盘(扫描码：115)按键
Plugin Bkgnd.KeyPress(Hwnd, 115)
//下面这句用于向后台窗口句柄(变量：Hwnd)发送一个键盘(扫描码：116)按键
Plugin Bkgnd.KeyPress(Hwnd, 116)
Delay 200
t2=now
If DateDiff("s",t1,now)>=61
Goto 按F1循环
EndIf
t2=now
EndWhile