QTP调用系统user32.dll —— FindWindow

上一篇 / 下一篇 2007-01-10 13:02:37 / 个人分类：测试技术

查看( 1303 ) / 评论( 0 ) / 评分( 0 / 0 )

用QTP调用自己写的DLL失败，不顺利。

现在来调用 Windows 自带的，代码如下：

Extern.Declare micHwnd, "FindWindow", "user32.dll", "FindWindowA", micString, micString//声明 FindWindow 方法

0m&s9v|+f5KUaSQ0Extern.Declare micLong, "SetWindowText", "user32.dll", "SetWindowTextA", micHwnd, MicString'声明 SetWindowText 方法

hwnd = Extern.FindWindow( "notepad","无标题 - 记事本")'获取记事本窗口的 HWND

if hwnd = 0 then

c/c2W|4i5M:}*P0MsgBox "找不到指定窗口"

L#z8qh{!RXcgx0else

msgbox hwnd

res = Extern.SetWindowText(hwnd, "Set Title") '在此也可看出SetWindowText的用法了 '更改记事本窗口的标题

&F$V:F4k+Ip0end if

FindWindow函数用于查找窗体
g%Rf@C$e5y0函数原型
HC?6}8{ Dj4[4l\8@*d0HWND FindWindow(51Testing软件测试网L#W:rTp*K
LPCTSTR lpClassName,// pointer to class name51Testing软件测试网 G#m E%F1^I/c
LPCTSTR lpWindowName// pointer to window name
*P |\N}t0);51Testing软件测试网qTy+^0\.Y%|
lpWindowName是要查找窗体的标题，即这里的“无标题 - 记事本”。
如果找到窗体，函数返回该窗体的句柄；如果找不到，函数返回空值或者零。51Testing软件测试网 Uo%?)Nsff