WaitUntilChanged Method Example

This example will wait until text in the defined target area has changed.

Sub Main

 Dim Sys as Object, Sess as Object

 Set Sys = CreateObject("Extra.System")

 'assumes an open session.....

 Set Sess = Sys.ActiveSession

 

 Dim Area as Object

 Set Area = Sess.Screen.Area(1,1,5,10)

 ret = Area.WaitUntilChanged()

 

 If ret Then

  Msgbox "Text in target area changed before timeout occurred!"

 Else

  Msgbox "Text in target area did not change before timeout occurred!"

 End If

End Sub