看流星社区

 找回密码
 注册账号
查看: 2810|回复: 2

通过鼠标解决游戏双开双挂问题.......

[复制链接]

该用户从未签到

发表于 2011-3-13 09:41:00 | 显示全部楼层 |阅读模式
游戏双开的解决主要是对窗口句柄的获取。现在的窗口句柄获取,一般采用窗口名称获取句柄。这样就会出现一个问题,只要有多个同名窗口,就无法对单一的窗口进行操作。
而采用鼠标获取窗口句柄,就能完美解决这个问题。以下为鼠标获取窗口句柄的代码。  
Dim pt As POINTAPI
Dim hwd As Long   '存放窗体句柄  
Private Sub Image1_MouseDown(Button As Integer, Shift As Integer, x As Single, y As Single)
  SetCapture Form1.hwnd   '使鼠标在窗口外部移动时仍能得到鼠标事件  
  Form1.MousePointer = 2 '鼠标在窗口外部移动时的鼠标指针  
End Sub

Private Sub Image1_MouseMove(Button As Integer, Shift As Integer, x As Single, y As Single)
Dim str As String
  str = Space$(256)
  If Button <> 1 Then Exit Sub '判断鼠标左键是否处于按下状态  
  Call GetCursorPos(pt) '得到光标的当前位置  
  hwd = WindowFromPoint(pt.x, pt.y) '得到光标所在点的窗口句柄  
End Sub

以上为源码文件,对于API的声明就很简单了,在这里就不写了,如果需要请回帖我会补发的。

该用户从未签到

发表于 2011-3-13 09:41:17 | 显示全部楼层
我的多开方法是通过辅助程序打开游戏
得到游戏的PID,再从PID得到hWnd,从而实现多开

该用户从未签到

发表于 2011-3-13 09:41:34 | 显示全部楼层
其实有个简单办法 你做个循环 浏览所有进程 取符合游戏标题窗口的pid就好 函数:EnumWindowsProc
点击按钮快速添加回复内容: 支持 高兴 激动 给力 加油 苦寻 生气 回帖 路过 感恩
您需要登录后才可以回帖 登录 | 注册账号

本版积分规则

小黑屋|手机版|Archiver|看流星社区 |网站地图

GMT+8, 2024-5-4 01:46

Powered by Kanliuxing X3.4

© 2010-2019 kanliuxing.com

快速回复 返回顶部 返回列表