性能测试工作室:http://www.cnblogs.com/preftest
个人博客: http://hi.baidu.com/higkoo
QTP调用系统user32.dll —— FindWindow
上一篇 /
下一篇 2007-01-10 13:02:37
/ 个人分类:测试技术
用QTP调用自己写的DLL失败,不顺利。 51Testing软件测试网F"]x1OO_现在来调用 Windows 自带的,代码如下:Extern.Declare micHwnd, "FindWindow", "user32.dll", "FindWindowA", micString, micString//声明 FindWindow 方法
51Testing软件测试网xk u`kC
qExtern.Declare micLong, "SetWindowText", "user32.dll", "SetWindowTextA", micHwnd, MicString'声明 SetWindowText 方法
{"A `UxQT)uYXlx0P)S
[;yX8dSH%y0hwnd = Extern.FindWindow( "notepad","无标题 - 记事本")'获取记事本窗口的 HWND
$q#P4y6ct$m:k8Rp]051Testing软件测试网kBb`K
N{if hwnd = 0 then51Testing软件测试网5@kh9r?
51Testing软件测试网4a"T%I [ b9KMsgBox "找不到指定窗口"51Testing软件测试网v BPl[0Dh4V
51Testing软件测试网3K/N?(W
c/sb*Oelse51Testing软件测试网 V+^e&T`p
.C5@$Qrq%N0msgbox hwnd51Testing软件测试网6Pf"s#bG
K3G.J"Z
L
6M6s1nLF }0res = Extern.SetWindowText(hwnd, "Set Title") '在此也可看出SetWindowText的用法了 '更改记事本窗口的标题
6mRsa+mtK
\u0lm!~h:IJn;q#F
NW0end if
+~P3u"\-_*A%W*j051Testing软件测试网_"OX;uNRaFindWindow函数用于查找窗体 51Testing软件测试网7g+Cm'W$GT8}
rV
函数原型51Testing软件测试网4xdOi;bcMyq,w
HWND FindWindow(
5G hK.y3WR'T sa@_:C0LPCTSTR lpClassName,// pointer to class name51Testing软件测试网
j!c%D6|X5mt1W!Q
LPCTSTR lpWindowName// pointer to window name
)v B:c8a[i"[0);
0g?.x2r%BR0lpWindowName是要查找窗体的标题,即这里的“无标题 - 记事本”。
i$l~%H,W+P7iZ)v0如果找到窗体,函数返回该窗体的句柄;如果找不到,函数返回空值或者零 。51Testing软件测试网Q;zd~9]k8g
51Testing软件测试网h6Lp iFn
g/R"v.g1N2u+y7ABs0句柄和窗口标题,若只知其中之一,""要用vbNullString表示
Qf2t3zP Dm-Z0
收藏
举报
TAG:
测试技术
计算机
软件
编程
代码
软件测试