Childobject of a window

[soumyas]

Hi,

I am using the following code to highlight & name the childobjects of "calculator" (calc)in windows:

Code:

Set DescObj=Description.Create

Window("Calculator").Activate
Set childObject=Window("Calculator").Childobjects(DescObj)
msgbox childObject.count

For i=0 to childObject.count-1
    childObject(i).highlight
    msgbox childObject(i).GetROProperty("Class Name")
Next

Thought the count of the childobjects is 31, for the last iteration the following error is displayed:

Code:

General run error.
Line (10): "childObject(i).highlight".

I have used the above code on other windows application like windows address book (wab). the result is the same.

However if I use a similar code on a Dialog box, there is no error displayed. Ex: Flight reservation dialog box

Code:

Set DescObj=Description.Create

Dialog("Login").Activate
Set childObject=Dialog("Login").Childobjects(DescObj)
msgbox childObject.count

For i=0 to childObject.count-1
    childObject(i).highlight
    msgbox childObject(i).GetROProperty("Class Name")
Next

Please let me know as why is this happening.

Thanks,
Soumya

[cbeggs]

I tried this myself but I wasn't able to record my test so I used Descriptive Programming and it worked.

Code:

Dim desCalc
Set DescObj=Description.Create

Set desCalc = Description.Create()
desCalc("title").value = "Calculator"
Window(desCalc).Activate
Set childObject=Window(desCalc).Childobjects(DescObj)
msgbox childObject.count

For i=0 to childObject.count-1
childObject(i).highlight
msgbox childObject(i).GetROProperty("Class Name")
Next

To get the number code of the General Run Error you are getting, try inserting

Code:

msgbox Err.Number

after the line where error occurred.

[soumyas]

I am getting this error evein with descriptive programming..
I am using QTP 9.5 (if this info helps!)
Somebody plz help!

Cheers,
Soumya

[cdesserich]

I don't think all objects support the Highlight function. Child object number 31 must be one of those?

[Anu123]

I did try above code, error thrown after 29th object heighlight.
And error thrown for existance of the object also

[manishbhalshankar]

What object is it?
Check if that object supports Heighlight method.