TestComplete，调用DotNet Assemblies（二）

 51Testing软件测试网#`vM Me9k:n

前面讲过调用DotNet的程序集有两种方式。

1. 通过dotNET对象调用
2. 通过应用程序域调用

第一种方式已经介绍过，以下介绍第二种方式：

 51Testing软件测试网!^6`hF#v4]

通过应用程序域调用

所有.NET的应用程序进程的通信都有一个AppDomain（应用程序域）方法，通过这个方法可以访问应用程序的域。通过封装的AppDomain方法可以返回一个.NET应用程序域对象。为了增强.NET应用程序域对象的功能性，TestComplete的应用程序域对象提供了dotNET的属性，这个属性提供了访问定义在应用程序中的类，定义在程序集里的类也可以通过这个属性访问。

AppDomain.dotNET属性类似于dotNET对象，并且通过AppDomain调用类成员的语法也类似于dotNET对象，如下：

l        Sys.Process("MyProcessName").AppDomain("AppDomainName").dotNET.namespace.class.subclass.method(parameters)

l        Sys.Process("MyProcessName").AppDomain("AppDomainName").dotNET.namespace.class.subclass.property(parameters)51Testing软件测试网`&B+v u-y A

同样，当要使用一个非静态的方法或者属性时，必须先通过调用类构造器或者一个静态成员（通过一个新类实例创建）创建这个类的实例。51Testing软件测试网OE j9t%P
vJ`

另外，AppDomain.dotNET属性的优于dotNET，是在于通过它，能直接创建应用程序的类的实例，而不需要把应用程序的程序集(DLL、EXE)添加到项目的CLR Bridge列表中。

以下的例子就说明了如何通过两种方式（AppDomain.dotNET、dotNET）调用程序集(UserApp.exe)里定义的方法:

procedure CallUserAssemblyMethods;

const51Testing软件测试网!G/Vhk1D?x_Y

 USD_RATE = 1.09;

var51Testing软件测试网 [)R%Q?*z g

 Salary: OleVariant;

 FrmDemo: OleVariant;

 I: Integer;

begin51Testing软件测试网-_:H?I5w6`E

 Log.PushLogFolder(Log.CreateFolder('Call the method from the user-defined assembly'));51Testing软件测试网A4Uife3gPd

 for I := 1 to 5 do51Testing软件测试网{(C VtRO9vYS,~

 begin

      Log.PushLogFolder(Log.CreateFolder('Step #' + VarToStr(I)));51Testing软件测试网-}2[2b U%{ V0c

   //通过程序集(UserClassLib.dll，已经加入到CLR Bridge列表)创建CSalary类实例

   Salary := dotNET.UserClassLib.CSalary.zctor();51Testing软件测试网7PRv%|
Z}YI

      Salary.Initialize(6000 + I*10, 0, 0, 0);     

   //调用程序集中的Calculate方法，并把结果写到日志中51Testing软件测试网 W'k1CE7K

   Log.Message(Format('Salary (USD) = %f', [Salary.Calculate(2)]));

   //调用程序集中的Convert及Calculate方法，并把结果写到日志中

   Log.Message(Format('Salary (EURO) = %f', [Salary.Convert(Salary.Calculate(2), USD_RATE)]));

   Log.PopLogFolder();51Testing软件测试网p]*Uk}OB

 end;

 Log.PopLogFolder();

 //方式1：通过AppDomain.dotNET对象创建frmDemo类实例51Testing软件测试网6hB G!O8a(vL

FrmDemo :=Sys.Process('UserApp').AppDomain('UserApp.exe').dotNET.UserApp.frmDemo.zctor();51Testing软件测试网Xc:G6R A'jG_2Z0|

//方式2：通过dotNET(UserApp.exe，已经加入到CLR Bridge列表)创建frmDemo类实例51Testing软件测试网PcRC"K*MZ

 FrmDemo := dotNET.UserApp.frmDemo.zctor(); 

 Log.PushLogFolder(Log.CreateFolder('Call the method from the user-defined executable'));51Testing软件测试网g;C NG+YDyQ

 for I := 1 to 5 do51Testing软件测试网-Q#jT|4~/D1ND1?Oz8Cw

 begin

   Log.PushLogFolder(Log.CreateFolder('Step #' + VarToStr(I)));51Testing软件测试网7h(sQ)ny ~7e

   //初始化frmDemo类的实例51Testing软件测试网o Wz(GHS^-n{1G ph

   FrmDemo.SalaryInitialize(6000 + I*10, 0, 0, 0);

   //调用程序集中的SalaryCalculate方法，并把结果写到日志中51Testing软件测试网J` F J-YL[)eA-cU

   Log.Message(Format('Salary (USD) = %f', [FrmDemo.SalaryCalculate(2)]));51Testing软件测试网(y$pz|{
j

   //调用程序集中的SalaryCalculate及SalaryCalculate方法，并把结果写到日志中

   Log.Message(Format('Salary (EURO) = %f', [FrmDemo.SalaryConvert(FrmDemo.SalaryCalculate(2), USD_RATE)]));

   Log.PopLogFolder();51Testing软件测试网Pm/Rg,W,`Ca-HC

 end;

 Log.PopLogFolder();51Testing软件测试网&`R Kl3d$xK