本文主要是介绍TC中等待测试对象的问题,希望对大家解决编程问题提供一定的参考价值,需要的开发者们随着小编来一起学习吧!
在编写自动化测试脚本时,等待测试对象出现,然后针对该测试对象执行相关的操作,是一个常见的脚本设计问题。在TC中,有如下几种方法:
(1)Web页面的等待。
在QTP中,可以使用Browser().page().sync 的方法来等待某个页面完成加载,而在TC中,可使用Page.ToUrl、Page.Wait 或 WaitPage 等方法,例如下面的例子用于等到指定URL地址所指的页面加载完成并出现指定的页面元素:
' Obtain the Page object
' We assume that the browser window belongs to the IExplore process, not Explorer
Set p1 = Sys.Process("iexplore")
Set w1 = p1.Window("IEFrame", "*", 1).Window("Shell DocObject View", "", 1).Window("Internet Explorer_Server", "", 1)
Set Pg = w1.Page("*")
' Opening the page
Pg.ToUrl "my url"
' Waiting for frames
waitFrm = true
While waitFrm
For i = 0 To Pg.document.frames.ChildCount - 1
Set Frame = Pg.document.frames.Child(i)
If Frame.Exists Then
waitFrm = waitFrm And (Frame.readyStateValue <> 4)
End If
Next
If waitFrm Then
BuiltIn.Delay(100)
End If
WEnd
...
(2)等待进程。
等待某个进程出现,可使用WaitProcess方法,例如下面的例子:
Set p = Sys.WaitProcess("winword", 2000)
If p.Exists Then' if the process exists ...
...
(3)等待窗口。
等待窗口创建完毕,可以使用WaitWindow方法,例如下面的例子:
Set p = Sys.Process("Notepad")
' Waits 10 seconds for the window
Set w = p.WaitWindow("*", "Open*", -1, 10000)
If w.Exists Then
w.Activate
Log.Picture w, "Open dialog picture"
Else
Log.Warning "Incorrect window"
End If
(4)等待对象属性。
等待某个对象的属性等于指定的状态值,可使用WaitProperty方法,例如下面的例子:
Set btn = Sys.Process("MyApp").Window("TMainFrm","MyApplication *").Child(2)
If btn.WaitProperty("Enabled", True, 2000) Then
' Button is enabled
Else
' Button is disabled
WEnd
(5)等待某个儿子对象的出现。
等待测试对象下的某个儿子对象的出现可用WaitChild方法,例如下面的例子:
If Obj.WaitChild(ChildObjectName, 0).Exists Then
' Child object exists
Else
' There is no such a child
End If
这篇关于TC中等待测试对象的问题的文章就介绍到这儿,希望我们推荐的文章对编程师们有所帮助!