|
今天发现QTP的一个缺陷,我想应该是缺陷:
用GetRoProperty获取VbEdit对象的Enabled属性值时,发现跟实际不符,不论怎样,获取的值总是为True,而实际上Enabled的值为False。用Objece Spy查看对象的属性也是False。
后来我直接用 对象实例.object.Enabled查看他的Runtime值时,确实是false
我不知道为什么这个GetRoProperty在这里会出问题,坛子里边的高手解释一下
另外,因为上述原因我没有办法使用 对象实例.CheckProperty "Enabled"来做检查了(正是因为这个检查到Enabled的值也是True,我才想到用GetRoProperty去返回一下),我只能自己写个对象属性检查的函数,但是不知道对象属性的数据类型是什么,实参赋给形参的时候该如何转化,所以到obj.object.varProperty,系统总是报提示属性或方法不正确。函数如下:
Function Check_Object_Property(obj,varProperty,strExpectedValue)
Dim strActualValue
strActualValue = Cstr(obj.object.varProperty)
If strActualValue = strExpectedValue Then
Reporter.ReportEvent micPass,"Check_Object_Property:" & obj,"Property " & varProperty_ & " have the same actual value with expected value:" & strExpectedValue
Else
Reporter.ReportEvent micFail,"Check_Object_Property:" & obj,"Property " & varProperty_ & " actual value is " & strActualValue &", expected value is :" & strExpectedValue
End If
End Function |
|