Treeview - some Questions

[narkuma]

Hi,

do You have a documentation of the methods and properties?

Actually I have not much time to explore and investigate and I have some tasks to do.
Main question is:

-How do I expand a whole tree from the root to the top?



Thanx
Narkuma

[TiKu]

Hi,

there's no helpfile available for ExplorerTreeView 1.x. Version 2.x does have an auto-generated one.

-How do I expand a whole tree from the root to the top?

Here's an example for ExplorerTreeView 1.x:

Code: Select all

Private Sub DoCompleteExpand(ByVal hParentItem As Long)
  Dim hSubItem As Long

  ExTvw1.ItemExpand hParentItem
  hSubItem = ExTvw1.ItemGetFirstSubItem(hParentItem)
  While hSubItem <> -1
    DoCompleteExpand hSubItem
    hSubItem = ExTvw1.ItemGetNextItem(hSubItem)
  Wend
End Sub

  DoCompleteExpand ExTvw1.GetFirstItem

HTH
TiKu