您的位置：程序门 -> vb ->

求助一个集进程名，pid，句柄，窗口标题的vb烦题

[收藏此页] [打印本页]选择字色：背景色：字体：[大][中][小]

求助一个集进程名，pid，句柄，窗口标题的vb烦题

发表于：2007-03-29 19:14:00 楼主

开门见山，最近朋友玩了个游戏叫“飞飞”
想叫我用vb写个简单的键盘模拟
这个游戏可以双开，3开，n开都可以

现在比如说我有2个号。一个人物名叫a，一个人物名叫b。
在同一台电脑上都进了游戏
打开游戏客户端，未登陆人物时标题都是“飞飞客户端”
进程名称都是neuz.exe
窗口游戏标题分别为“飞飞客户端（a）”和“飞飞客户端（b）”
在任务管理器应用程序下也是这样显示“飞飞客户端（a）”和“飞飞客户端（b）”

目前对我来说的烦题是，在2个人物后，怎么样的通过选择的方法来获得其中一个的句柄
开始时我用findwindow来寻找窗口句柄，这样在开始时是不可行的，因为程序在登入后会自动在标题后加上所登入的人物名称，而且在双开2个号的情况下更是无法判断。
我在想是不是可以有什么办法先通过进程名称枚举出“与这个飞飞有关”的2个窗口的标题名，然后再用findwindow,等对所选窗口进行句柄，pid，进程句柄的判断。

希望高手能指点再三，如有空的给出基本的程序，万分感谢！

发表于：2007-03-29 20:39:361楼得分:0

我也想做这样的程序，可是今天忙活了一天也没用findwindow找到窗口的句柄。。一直都是0。。楼主和各位高手帮忙看看是哪不对。。

要找的窗口标题为“element client”，代码：
===============================================================
hwd = findwindow（ " ", "element client ")
getwindowthreadprocessid hwd, pid
hprocess = openprocess（process_all_access, 0, pid)
if hprocess = 0 then
msgbox "不能打开进程 ", vbokonly, "提示 "
unload form1
end if

发表于：2007-03-29 21:38:082楼得分:0

我的问题我已经基本知道原因了正在解决刚才已经成功测试了一次了
我也不太会的。。。你试下：
hwd = findwindow（vbnullstring, "element client ")
getwindowthreadprocessid hwnd, pid
hprocess = openprocess（process_all_access, false, pid)
....

发表于：2007-03-29 22:06:363楼得分:0

目前机器太破。。还试不了。。明天再弄~

你的要是成功了，麻烦也给我说说咋弄的啊^_^
e-mail:lengx7@163.com

发表于：2007-03-30 00:10:234楼得分:0

加qq20574739 这个我基本解决了

发表于：2007-03-30 08:53:265楼得分:0

楼主不是想打“完美”的主意吧？

发表于：2007-03-30 10:02:096楼得分:0

element client 确实是完美的名字...呵呵.你可以用spy++把exe的class name抓出来.指定findwindow的class name,窗体名称空着.估计能找到.你试试.不知道行不行.理论上应该可以的.

发表于：2007-03-30 11:15:317楼得分:0

先自己找到你要操作的游戏 "classname "
然后hwnd1 = findwindow（ "classname ", vbnullstring)
hwnd2 = findwindowex（0, hwnd1, "classname ", vbnullstring)
这样游戏双开的情况下仍然可以找到2个窗口的句柄hwnd1和hwnd2

getwindowtext（hwnd1, wintext1, textlen1)
getwindowtext（hwnd2, wintext2, textlen2)
这样就可以找出2个窗口的标题名

form2.label1.caption = wintext1
form2.label2.caption = wintext2
显示出来

下一篇：请问两中颜色叠加的公式是什么，就像用transparentblt的那种效果？
上一篇：mutex的释放问题,急

其他资讯