对OBJECT对象的鼠标点击操作（脱离坐标）

相信大家可能会碰到过这样的情况：看起来是Button对象，但用WR的SPY看一下却是Object对象，做映射也映射不了（比如说用WR没有插件的情况下不支持的语言开发的按钮），这时我们如果录制操作该按钮的话，就发现有坐标出现。而对于脚本的移植性而言，坐标是绝对要抛弃的。那么我们有什么方法来屏蔽这些坐标呢？下面是我写的两个对这些按钮的左右键单击的操作(该函数只对类似按钮的对象起作用)：51Testing软件测试网Z+i$|"u)T~
#*************************************************************************************************
)A]"iR5B0# 51Testing软件测试网FxBuBQ)s S:h
#  Descrīption---------This function is used to LEFT Click an Object  51Testing软件测试网,qsppp%XIQo_
#
6B/[Qj.U!L w$N0#  Parameter-----------win---WindowName,obj---ObjectName 51Testing软件测试网M$][[t(U/H qY
#
a qMS
B;dP0#  Return Value-------None 51Testing软件测试网{I'^5}d@H7?d?A
#51Testing软件测试网+|
pw(E c{%g$E(VN#b
#  Tester----------------LantainWei 51Testing软件测试网(KR$A[l7cB?K
#
q
X7ZJy2|&{z-cP0#*************************************************************************************************
+D4b
T t H)Tr$j3DJF0public function Obj_LClick(in win,in obj)
B4ahA8l}0{
5E+g3}p!VFtS0        auto obj_width,obj_height;
`}n8@*l5M0        set_window(win);51Testing软件测试网hZ._,G!P;HP
        obj_get_info(obj,"width",obj_width);51Testing软件测试网$y UY"Vq
        obj_get_info(obj,"height",obj_height);
4Nm|8BN0        obj_mouse_click(obj,int(obj_width/2),int(obj_height/2),LEFT);
(D V@ L/S y:I@0}
jF |
G(y;Re6c6ND0
_W)RsK
|"X0#*************************************************************************************************
/y0OaB7pH$DL'^0#
xUmD;oF!\ VL0#  Descrīption---------This function is used to  Right Click an Object  51Testing软件测试网2h1TL`]!E!^U
#
SfP([L5~8H-T0#  Parameter-----------win---WindowName,obj---ObjectName 51Testing软件测试网?m0@{Pb
#51Testing软件测试网P#UTCxdkc
#  Return Value-------None 51Testing软件测试网s$Gpc(_+}:W3r[;hC
#
"j~/Dd"q0I0#  Tester----------------LantainWei 51Testing软件测试网z;I q O/NB6m8F2p
#
r_p4hPVX H0#*************************************************************************************************51Testing软件测试网`Q`(?o5Z+BC
public function Obj_RClick(in win,in obj)51Testing软件测试网!Bpy']y:]` i6L
{
q jFG'c%V0        auto obj_width,obj_height;
} _reI4H"B0        set_window(win);
1r`9X*fK/M0        obj_get_info(obj,"width",obj_width);
-FNm OzM6h0        obj_get_info(obj,"height",obj_height);51Testing软件测试网5DUXn2{t2?)\
        obj_mouse_click(obj,int(obj_width/2),int(obj_height/2),RIGHT);
?5dB m9v(gGo3uy#S0}51Testing软件测试网2VZknJ4W"C

4U'[6n%b5G(Rs0以上是本人写的两个非常简单的函数，大家有兴趣可以对他们进行扩充，比如双击什么的，这里我就不累赘了。
!m%M#w"N amRg{#K0如果大家发现有什么不足或建议，请大家发表自己的看法！非常感谢！
v9uww+Hh0
Bh!mNK#@H0[ 本帖最后由 lantianwei 于 2007-8-31 10:23 编辑 ]