qtp delphi程序 delphi-addin的问题

sixleon 发表于 2008-10-10 11:55:02

qtp在录制delphi程序的时候，要加载MicDelphiAgent.pas这个文件，并编译；之后才可以进行脚本的重放。

此时：在录制脚本的时候，有个做窗口的判断，如此“
If DelphiWindow("FrmReceiver").Exist(3) then
DelphiWindow("FrmReceiver").Activate
DelphiWindow("FrmReceiver").DelphiButton("退出(E)").Click
End if ”
如果把if 换成while时，同样在判断超时的时候，要等到默认的超时时间，而不是3秒。

==============================================
我怀疑是否市那个需要编译的文件没有放到程序中呢？？

附件中包括delphi程序编译需要的文件。

li_sy 发表于 2008-10-31 17:35:26

QTP +Delphi回放失败

MicDelphiAgent.pas
如何使用能不能说具体一点？谢谢！

smartlee007 发表于 2008-11-19 14:31:27

HP QUICKTESTPROFESSIONAL 支持Delphi 程序指南

默认情况下HP QUICKTESTPROFESSIONAL 不支持DELPHI开发的控件，如果你的系统是DELPHI开发的，而你又希望用HP QUICKTESTPROFESSIONAL对其进行测试，请按照如下步骤操作：

1. 至HP官方网站下载DELPHI插件，并安装。最新版为9.5版。
2. 将HP QUICKTESTPROFESSIONAL提供的 MicDelphiAgent.pas集成到你的程序中。
a) 将<QuickTest Professional Installation folder>\dat\Extensibility\Delphi 包含到你的工程。通过设置library path或者将该文件夹复制到你的工程所在目录等方式都可以。
b) 添加 MicDelphiAgent到工程文件的Uses部分。例如：
program flight;
uses
   MicDelphiAgent,
   Forms,
Windows;
($R*.RES)
begin
   Application.Initialize
   Application.Title :='Flight Reservation';
   Application.Run;
end.
3. 重新编译
4. 如果delphi程序中用到了TwwDBGrid控件，对工程文件的USES部分做如下修改即可实现对TwwDBGrid控件的支持。
program flight;
uses
   MicDelphiAgent,
   MicWWSupport,
   Forms,
   Windows;
($R*.RES)
begin
   Application.Initialize
   Application.Title :='Flight Reservation';
   Application.Run;
end.

huiloo 发表于 2009-5-26 15:38:17

回复 1# 的帖子

能提供个ＱＴＰ　的ｄｅｐｈｉｌ插件吗？谢谢

huiloo 发表于 2009-5-31 17:47:41

能给一个MicDelphiAgent.pas吗？？？？

测试精英 发表于 2009-6-10 17:52:03

:handshake :handshake

hotsmile99 发表于 2011-3-24 23:13:17

顶了！！！！！！！！！！

TIB 发表于 2011-3-28 19:26:28

QTP10之后不需要下载安装单独的Delphi插件，只需要在安装QTP时选择定制安装，把Delphi插件选上即可

安装后按照Delphi插件的使用指南测试一般的标准的Delphi控件，对于第三方控件或自定义控件，需要编写插件扩展包来支持，否则无法识别和控制对象

如果嫌插件扩展开发比较麻烦，可以考虑用其他工具，例如TestComplete、SilkTest等

页: [1]

51Testing软件测试论坛 's Archiver