您的位置：程序门 -> vb -> 基础类



取得进程标识符源码是什么啊


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


取得进程标识符源码是什么啊[已结贴,结贴人:plmokm697]
发表于：2007-05-04 14:59:48 楼主
取得进程标识符源码是什么啊

private   sub   timer1_timer（)
dim   hwnd   as   long   '   储存   findwindow   函数返回的句柄
hwnd   =   findwindow（vbnullstring,   "client.exe ")   '   取得进程标识符
'只要把windows   media   player换成游戏的名称就可了！
if   hwnd   =   0   then
label1.caption   =   "游戏未运行 "
else
label1.caption   =   "游戏已运行 "
end   if
end   sub


findwindow   总是这里错     子程序或函数未定义

请问正确的源码是什么啊?
发表于：2007-05-04 15:08:371楼 得分:20
你要添加声明啊:
private   declare   function   findwindow   lib   "user32 "   alias   "findwindowa "   （byval   lpclassname   as   string,   byval   lpwindowname   as   string)   as   long

说明  
寻找窗口列表中第一个符合指定条件的顶级窗口（在vb里使用：findwindow最常见的一个用途是获得thunderrtmain类的隐藏窗口的句柄；该类是所有运行中vb执行程序的一部分。获得句柄后，可用api函数getwindowtext取得这个窗口的名称；该名也是应用程序的标题）  
返回值  
long，找到窗口的句柄。如未找到相符窗口，则返回零。会设置getlasterror  
参数表  
参数   类型及说明  
lpclassname   string，指向包含了窗口类名的空中止（c语言）字串的指针；或设为零，表示接收任何类  
lpwindowname   string，指向包含了窗口文本（或标签）的空中止（c语言）字串的指针；或设为零，表示接收任何窗口标题  
注解  
很少要求同时按类与窗口名搜索。为向自己不准备参数传递一个零，最简便的办法是传递vbnullstring常数
发表于：2007-05-04 17:33:482楼 得分:20
private   declare   function   findwindow   lib   "user32 "   alias   "findwindowa "   （byval   lpclassname   as   string,   byval   lpwindowname   as   string)   as   long
发表于：2007-05-04 20:33:023楼 得分:0
想写外挂的初学者:)
发表于：2007-05-04 20:37:114楼 得分:10
private   declare   function   findwindow   lib   "user32 "   alias   "findwindowa "   （byval   lpclassname   as   string,   byval   lpwindowname   as   string)   as   long

相关文章
其他资讯

快速检索
分类导航标签a

最新资讯
热门点击