TestComplete的Sys对象

TestComplete的Sys对象

Q!ri5x1J/B!qX3f0陈能技
PA9E2} u6r{ IOW`02007-9-1451Testing软件测试网,{t+] n#|*`

TestComplete提供一个叫Sys的对象来访问很多系统相关的对象和属性。

Clipboard51Testing软件测试网\$TN|:V6pI
用于访问剪贴板的数据，或设置粘贴板的数据。51Testing软件测试网4l9AI7p K
例如下面脚本把图像和文本放到粘贴板并且从粘贴板读出数据：
HZu3p-{(g
t-S0// 把窗口图像复制到粘贴板
4d*zkCj N0Sys.Clipboard := Sys.Process('notepad').Window('Notepad', 'Untitled - Notepad', 0).Picture();
$D*fW&YT:W,F0Log.Picture(Sys.Clipboard);51Testing软件测试网&X7jBj'~
 
M:dj4n4[2v/\
V0// 把文本复制到粘贴板
7u"q!S9ZK0u#X!M0Sys.Clipboard := Sys.Process('notepad').Window('Notepad', 'Untitled - Notepad', 0).WndCaption;
/z!R0U$q} xle:?B0Log.Message(Sys.Clipboard);51Testing软件测试网u+`8HWM"Z(z }\7te

CORBA51Testing软件测试网?LGSR5f`-~ ~"S
Sys.CORBA对象让你可以访问本机或远程的计算机上的CORBA对象。

例如以下脚本访问某个CORBA对象：
fV\|(Lz7xGC0var
}9mXp!S-j0  IOR : OleVariant;51Testing软件测试网oblT9m?;Lx
. . .
/O3HX,\O&I'_0IOR := 'IOR:000000000000002149444c3...';
u0b.RB:d }p5~6K T2q2c'h0Log.Message(Sys.CORBA.DispObject[IOR].balance);51Testing软件测试网#}^@\6rH8K2z

注意，目前TC只支持以下CORBA数据类型：
As#[6I2BH4S ^0· CORBA::tk_char51Testing软件测试网!G7p"Z2A|
· CORBA::tk_short51Testing软件测试网5lU3xyFB`
· CORBA::tk_long
^-Fl'Y0S"e0· CORBA::tk_float
OF5I f$U#qy%e*}z0· CORBA::tk_double51Testing软件测试网c} Lg~%n~@Jq_
· CORBA::tk_boolean51Testing软件测试网-`0m:u4KA%s*k%c
· CORBA::tk_string
Nv,E"x)S2u#iY0· CORBA::tk_wstring
$P"t7Gn*p'?0· CORBA::tk_objref51Testing软件测试网kMabf
· CORBA::tk_octet51Testing软件测试网;Y#U1r(e1?
OLE对象
-S#PEe;w0用Sys.OleObject返回一个OLE对象。例如下面脚本返回Word对象：51Testing软件测试网 PkO Q.sp-qg

J9iG"J;BKb0Obj := Sys.OleObject('Word.Application');51Testing软件测试网qTSj|4{

WB[t%a)A;p0Desktop51Testing软件测试网+V BB,U)T}.{3H
S
Sys.Desktop返回Windows桌面对象，从而让你可以获取或设置当前鼠标的坐标、获取截屏、获取一个激活的或焦点所在的窗体等。

例如下面脚本让鼠标水平移动50个像素点：
[4}'gza#[0d := Sys.Desktop;
Z&?eZR7i0d.MouseX := d.MouseX + 50;51Testing软件测试网#Z+a:FH \

*r5H:X E\Ib|0用Desktop.PictureUnderMouse返回以当前鼠标位置为中心的指定范围的图像。也可以用Desktop.Picture方法返回指定区域的屏幕图像。51Testing软件测试网(p,N\(Q'D

W b?ZNeOY0用Desktop.ActiveWindow返回当前最顶层的窗体对象（当前正在与用户交互的窗体），用Desktop.FocusedWindow返回当前焦点所在的窗体。如果你知道某个窗体的Handle，还可以通过Desktop.WindowFromHandle方法返回窗体对象。而用Desktop.ObjectFromPoint方法也可返回指定位置的对象。

用Desktop.KeyDown、Desktop.KeyUp或Desktop.Keys方法来模拟键盘按键，例如，下面脚本模拟用户按下CTRL+Esc键（显示操作系统开始菜单的快捷键）：51Testing软件测试网R*V:~%i{6yLP9F
Sys.Desktop.Keys('^[Esc]');

h sm!h*w&yR&sm0用Desktop.MouseDown和Desktop.MouseUp来模拟鼠标按键操作。

(m_$zYTR] G0机器相关信息
:LXz+TMh0d0通过Sys.DomainName返回当前机器所在的域。通过Sys.HostName返回机器名。通过Sys.UserName返回当前操作系统用户名。51Testing软件测试网.mx3Vh4~/v

7g!H8?K,Eq+f/s(e-W0Sys.CPU返回本机的CPU处理器的相关信息。返回信息包括CPU型号和频率。例如通过脚本Log.message(Sys.CPU)返回的信息类似如下：51Testing软件测试网*}8e*x9lk4|/Pt3I

Intel(R) Pentium(R) M processor 1.60GHz, Frequency: ~1600 MHz.  51Testing软件测试网 w3W&x^{Z?)t|/T

另外还可以用Sys.CPUUsage返回当前操作系统和所有正在运行的进程的CPU时间的百分比。（注意，如果有几个CPU，则返回平均值。此属性只在Windows NT，2000和XP操作系统可用）用Sys.CPUCount返回本机的CPU处理的个数。

7[NKJJ(^ r3Es0通过Sys.MemUsage返回当前操作系统和所有正在运行的进程使用的内存情况。

操作系统相关信息51Testing软件测试网K"@Eo;_{&y
通过Sys.OSInfo对象获取有关操作系统的各种信息，包括操作系统的版本、SP的版本、操作系统安装路径等。

:[ ]p;@
Js%a0还可以通过MediaCenter属性判断TC当前运行的操作系统版本是否是 Windows XP Media Cnter 版本的。通过TabletPC属性判断是否是在Windows XP Tablet PC版本下运行。通过VMWare属性判断是否是在VMWare虚拟机上运行。通过Windows64bit属性判断是否是在64位版本的操作系统下运行。

Vq;tX'T1U\7V0通过NetCoreCount属性返回安装的不同版本的.NET Framework的个数，通过NetCoreVersion返回.NET Framework的名称，例如：
!@;V8eO$HV0procedure TestProc;51Testing软件测试网.wU QrB(m
R6L{&ve
Var
fy5o.XgPz)n~0  inf : OleVariant;
Y)`5smyhp0  i : integer;51Testing软件测试网/N T8KE0C\$T
Begin51Testing软件测试网)QD2M)rkd7|
  inf:=Sys.OSInfo;51Testing软件测试网 [qFF8a3T7}:_/Wk
  For i:=0 to inf.NetCoreCount - 1 do51Testing软件测试网4m-Uu\4n4isj4t
  Begin
p+IQ$^8}h5z0    Log.Message( inf.NetCoreVersion( i ) );
:`0vpz)A0  End;
HrM6Kr4S8uzec0End;

`en]OIHi/P\0