蜂鸟栗子 发表于 2014-7-6 10:24:03

QTP 视频图像鼠标右键的录制

一.对下面的视频图像录制鼠标右键操作,代码如下:




Setting.WebPackage("ReplayType") = 2//修改值为2,代表使用鼠标运行鼠标操作

Window("CU客户端").Static("Static").Check CheckPoint("Static") //Static对象是指WS静态文本,图像控件,此处利用Bitmap Checkpoint插入对图像的检查点

Window("CU客户端").Static("Static").Click,,micRightBtn //Window("CU客户端").Static("Static").WinMenu("ContextMenu").Select ""    QTP直接录制的语句,是不能正常回放的

wait 3

set wshShell=CreateObject("WScript.Shell")

wait 1

wshShell.SendKeys"{DOWN}"//键盘向下的箭头,指向“停止播放”

wait 5

wshShell.SendKeys"{DOWN}"//键盘向下的箭头,指向“前端参数配置”

wait 5

wshShell.SendKeys"{ENTER}"//回车键

wait 1

Setting.WebPackage("ReplayType")=1//切换回浏览器事件模式

解析1. 静态对象Static设置检测点

Static对象是指Windows静态文本和图像控件,可以利用Check方法插入对图像的检查点,在录制过程中,选择菜单“Insert\Checkpoint\Bitmap Checkpoint”然后选择指定的图像区域。

运行后如果图像跟录制时采集的不一致会报错的。如下图:





解析2

QTP直接录制的语句,是不能正常回放的。可以利用静态对象方法Click,实现鼠标右键的选择。

(1)QTP直接录制的语句:

Window("CU客户端").Static("Static").WinMenu("ContextMenu").Select ""

(2)修改后鼠标右键单击的代码:

Window("CU客户端").Static("Static").Click,,micRightBtn

Click事件有三种:

micleftBtn 0代表鼠标左键



micRightBtn 1 代表鼠标右键

micMiddleBtn 2代表鼠标中间键
页: [1]
查看完整版本: QTP 视频图像鼠标右键的录制