51Testing软件测试论坛

标题: 当前位置双击操作 [打印本页]

作者: muquanyifan 时间: 2007-12-3 17:37
标题: 当前位置双击操作
发现QTP里面的双击操作都是绑定在控件上, 并且需要以x,y坐标作为参数的.
有什么方法让鼠标在当前位置双击一下吗(就是鼠标已经移动到位了,只需要双击)?

作者: cdq1010 时间: 2007-12-3 17:54
tools>>web event recording configration中的custorm Settings
选择Any Web Objects，点击Event菜单->add->ondblclick，将Listen改为Always
然后重新录制脚本，就一切搞定

作者: muquanyifan 时间: 2007-12-13 16:49
.NET 工程示例代码
      Dim handle
Dim objIntPtr, objCursor
Dim xxx, yyy

handle = objTreeView.GetROProperty("hwnd")
Set objIntPtr = DotNetFactory.CreateInstance("System.IntPtr","",handle)

Set objCursor = DotNetFactory.CreateInstance_("System.Windows.Forms.Cursor","System.Windows.Forms",objIntPtr)
xxx  = CInt(objCursor.Position.x)
yyy = Cint(objCursor.Position.y)

Set dr = CreateObject("Mercury.DeviceReplay")
dr.MouseDblClick  xxx, yyy, 0

欢迎光临 51Testing软件测试论坛 (http://bbs.51testing.com/)