Does TC Support this control?

Question

Does TestComplete support the Yahoo.widget.TreeView ? See here: http://developer.yahoo.com/yui/docs/YAHOO.widget.TreeView.html

We have a webapp that uses this for file/folder listings and my goodness it seems almost impossible to wrap my head around this. I think the expand node had 45 parents. Is there native TC support for this control?

I tried taking the HTML of the control and parsing it through a custom written controller for it and.. well my skills aren't that good I guess, because I couldn't wrap my head around it. Does anyone have any kind of suggestion on how I can code something for this control? I want to be able to traverse it and select and deselect items at will similar to a Win32 treeview.

I tried to add this under Object Mapping > Swing Controls > Tree, but it doesn't meet the criteria.

vex · Answer

Ok so I took a different approach using FindAllChildren.

I'm making HUGE progress here, but I'm still running into a snag. In order for this to work right, I have to expand all of the folder nodes of the tree first. No biggie, since all of the + nodes have a className = ygtvspacer and are in their own cells/tables.

But.. Oddly enough, tehre are more than 500 items that should match this, but TC only finds like 6... sometimes just 3... what's wrong with this code?

PropArray      = Array("className")

  ValuesArray    = Array("ygtvspacer")



  Set pnlData    = Aliases.WebBrowser.page.panelContainer.form.panelContent.FileFolderList

 

  ndeFolder      = pnlData.FindAllChildren(PropArray, ValuesArray, 20000, True)



  For i = 0 to UBound(ndeFolder)

    If ndeFolder(i).Exists Then ndeFolder(i).Click

  Next

   

  Log.Message "Total Found: " & (UBound(ndeFolder) + 1)

julia_k · Answer

Hello Vince, Does TestComplete support the Yahoo.widget.TreeView ? Currently, TestComplete does not support this control.&nbsp; If you are interested in implementing support for this control (and other Yahoo controls) in TestComplete, you can vote for this control on the following web page: TestComplete Feature Survey.Thank you. Oddly enough, tehre are more than 500 items that should match this, but TC only finds like 6... sometimes just 3... what's wrong with this code? I failed to reproduce the behavior you describe. This problem may be specific to your application under test. Could you please use this Contact Support web form to send us your project and application (or a sample application demonstrating the problem)? That would help us to reproduce the problem.Thanks in advance.Also, to access items of the tree view, you can try finding them by their class name (ygtvitem) or caption text (specified by the innerText property). For example, the following sample code iterates through tree view items and expands them if they are collapsed:Sub Test&nbsp; URL = http://developer.yahoo.com/yui/examples/treeview/folder_style_clean.html&nbsp; ' Obtains the tree view object and processes all of its items&nbsp; Set TreeObj = Sys.Process("iexplore").Page(URL).Panel("treeDiv1").Panel("ygtv0").Panel("ygtvc0")&nbsp; ProcessItems(TreeObj)End SubSub ProcessItems(Obj)&nbsp; Dim PropArray, ValuesArray, Children, InnerChildren, Table, Spacer&nbsp; PropArray = Array("className")&nbsp; ValuesArray = Array("ygtvitem")&nbsp; ' Obtains the collection of tree view items&nbsp;&nbsp; Children = Obj.FindAllChildren(PropArray, ValuesArray, 1)&nbsp; For i = 0 To Ubound(Children)&nbsp;&nbsp;&nbsp; ' Checks whether the item has child subitems&nbsp;&nbsp;&nbsp;&nbsp; PropArray = Array("className")&nbsp;&nbsp;&nbsp; ValuesArray = Array("ygtvchildren")&nbsp;&nbsp;&nbsp; Set InnerChildren = Children(i).FindChild(PropArray, ValuesArray, 1)&nbsp;&nbsp;&nbsp; If InnerChildren.Exists Then&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; If InnerChildren.ChildCount &gt; 0 Then&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; ' Checks whether the subitems are visible on the screen&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; If Not InnerChildren.VisibleOnScreen Then&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; If Not InnerChildren.Visible Then&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; PropArray = Array("className")&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; ValuesArray = Array("ygtvtable*")&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Set Table = Children(i).FindChild(PropArray, ValuesArray, 1)&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; If Table.Exists Then&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; PropArray = Array("className")&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; ValuesArray = Array("ygtvspacer")&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Set Spacer = Table.FindChild(PropArray, ValuesArray, 2)&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; If Spacer.Exists Then&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; ' Expands the item&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Spacer.Click&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; End If&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; End If&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; End If&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; End If&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; ' Processes the current item's subitems&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; ProcessItems(InnerChildren)&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; End If&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; End If&nbsp; NextEnd SubOr instead of the FindAllChildren method you can use the EvaluateXPath method to get tree view items.For example, the following sample code obtains all A elements whose class attribute is set to "ygtvspacer" and then simulates a click on each element:Sub Test&nbsp; URL = "http://developer.yahoo.com/yui/examples/treeview/folder_style_clean.html"&nbsp;&nbsp; Set Page = Sys.Process("iexplore").Page(URL)&nbsp;&nbsp;&nbsp; Nodes = Page.EvaluateXPath("//A[@class='ygtvspacer']")&nbsp;&nbsp;&nbsp; If VarType(Nodes) &lt;&gt; varNull Then&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; For i = 0 To UBound(Nodes)&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Nodes(i).Click&nbsp;&nbsp;&nbsp; Next&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; End IfEnd SubI hope this information helps you. Please let us know if you have any additional questions.Good luck.

vex · Answer

Julia,This is incredible help. &nbsp;Thank you so much. &nbsp;Voted to have YUI support btw.I'm gonna work on tailoring this into my app and see if I run into better luck. &nbsp;The problem with my original FindAllChildren and why it kept finding different results was due to the fact that the YUI control apparently hides (or something?) objects that aren't expanded. &nbsp;For example, if I left it uncollapsed it might only find 3 objects, but if I expanded some nodes, it might find 15-20 objects.The key is to expand all objects first, find what I'm looking for, and expand click on the object to show the file. &nbsp;At least until TC gets some level of support in for this control, which hopefully will happen in the future.Thanks again Julia for the help here. &nbsp;Much, much appreciated :).

vex · Answer

So I tried your code to try to understand it better .....and it doesn't work :(

The XPath one will click only the root folders, and using FindAllChildren looks like it should work but it doesn't - InnerChildren.ChildCount is always 0.

This control is such a headache :( But you've given me a headstart at least, I can at lease try to work with this and see if I can come up with something :). Please post if you come up with something, too.

vex · Answer

This is probably a really bad way to do this, but I had to make some modifications but the below code appears to work great!Do you have a better way I should go about coding this?&nbsp; It does work, so I'm thrilled.&nbsp; You got me on the right path, so thanks!&nbsp; Set pgRestore&nbsp; = Aliases.WebBrowser.Page("*")&nbsp; &nbsp; Nodes = pgRestore.EvaluateXPath("//TD[@class='ygtvlp']//DIV[@class='ygtvspacer']")&nbsp; MidNodes = pgRestore.EvaluateXPath("//TD[@class='ygtvtp']//DIV[@class='ygtvspacer']")&nbsp;&nbsp; &nbsp;&nbsp; &nbsp; While VarType(Nodes) &lt;&gt; varNull&nbsp;&nbsp;&nbsp; Indicator.PushText "Finding Nodes..."&nbsp;&nbsp;&nbsp; Nodes = pgRestore.EvaluateXPath("//TD[@class='ygtvlp']//DIV[@class='ygtvspacer']")&nbsp;&nbsp;&nbsp; Indicator.PushText "Finding MidNodes..."&nbsp;&nbsp;&nbsp; MidNodes = pgRestore.EvaluateXPath("//TD[@class='ygtvtp']//DIV[@class='ygtvspacer']")&nbsp;&nbsp;&nbsp; Indicator.PopText &nbsp;&nbsp;&nbsp;&nbsp; If VarType(Nodes) &lt;&gt; varNull Then&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; For i = 0 To UBound(Nodes)&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; If Nodes(i).Exists = TRUE Then&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Nodes(i).Click&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Call Delay(1000)&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; End If&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Next&nbsp;&nbsp;&nbsp; End If&nbsp;&nbsp;&nbsp; If VarType(MidNodes) &lt;&gt; varNull Then&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; For j = 0 to UBound(MidNodes)&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; If MidNodes(j).Exists = TRUE Then&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; MidNodes(j).Click&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Call Delay(1000)&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; End If&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Next&nbsp;&nbsp;&nbsp; End If&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; &nbsp;&nbsp; WEnd

Forum Discussion

Does TC Support this control?

Related Content

Does ReadyAPI supports Dark Themes now?

Does Soap UI supports XSLT transformations Automation

Does Collaborator 9 support StarTeam?

Does SoapUI 5.6.0 has log4j vulnerability?

Does JSON RegEx assertions support regex shortcuts

Recent Discussions

How to stop TestComplete from failing a test when unrelated processes crash?

Shared user form between projects and event management

How to add external files to a project?

Unintended actions during keyword test run

Test Execution Summary is null