TC中等待测试对象的问题

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

原文转自：http://www.ltesting.net