0

如何将自定义 DLL 添加到 QTP 中，实际上我需要在 DLL 文件中存在的 vbscript (QTP) 中使用某些方法，现在如何在 QTP 中引用该特定 DLL 是可能的

自从我刚接触 QTP 以来，任何人都可以帮助我吗

4

2 回答 2

1

您可以使用extern.Declare来声明驻留在 dll 中的外部函数。用于Extern.{name of function}使用该功能。

查看光标是否显示为沙漏的示例：

extern.Declare micLong,"GetForegroundWindow","user32.dll","GetForegroundWindow" 
extern.Declare micLong,"AttachThreadInput","user32.dll","AttachThreadInput",micLong,
micLong,micLong 
extern.Declare micLong,"GetWindowThreadProcessId","user32.dll",
"GetWindowThreadProcessId",micLong,micLong 
extern.Declare micLong,"GetCurrentThreadId","kernel32.dll","GetCurrentThreadId" 
extern.Declare micLong,"GetCursor","user32.dll","GetCursor" 

function get_cursor() 
    hwnd = extern.GetForegroundWindow() 
    pid = extern.GetWindowThreadProcessId(hWnd, NULL) 
    thread_id=extern.GetCurrentThreadId() 
    extern.AttachThreadInput pid,thread_id,True 
    get_cursor=extern.GetCursor() 
    extern.AttachThreadInput pid,thread_id,False 
end function 

Msgbox get_cursor()

更多使用方法可以随时参考QTP的帮助功能。它实际上非常好！

于 2013-02-04T15:24:02.283 回答
0

您可以在 vbscript 中实现相同的功能并将此函数库与您的测试相关联...

于 2013-02-04T14:20:29.537 回答