Etendre une partie d'un treeview par le code

Version imprimable

Bonjour,

J'ai un petit souci avec mon treeview. Je le remplis grâce à 3 dicos Mais j'aimerais pouvoir étendre les nœuds pas le code.

Voici ce que je fait pour remplir le treeview:

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
 
 
    Private tvParent As TreeNode
    Private tvType As TreeNode
 
 
    Private Sub loadClasses()
 
        Dim line As String
        TreeView1.Nodes.Clear()
 
        If myClasses.ObjDesc.Count > 0 Then
            For Each key As String In myClasses.ObjDesc.Keys
                tvParent = TreeView1.Nodes.Add(key, key, 0, 0)
                tvType = tvParent.Nodes.Add("CFG", "CFG", 0, 0)
                For Each key2 As String In myClasses.ObjDesc(key).Cfg.Keys
                    line = key & " , " & myClasses.ObjDesc(key).Cfg(key2).Name & " , " & _
                        myClasses.ObjDesc(key).Cfg(key2).ExpliciteName & " , " & myClasses.ObjDesc(key).Cfg(key2).Acces & " , " & _
                        CStr(myClasses.ObjDesc(key).Cfg(key2).vbType) & " , " & myClasses.ObjDesc(key).Cfg(key2).Limitation & " , " & _
                        CStr(myClasses.ObjDesc(key).Cfg(key2).Use) & " , " & Format(myClasses.ObjDesc(key).Cfg(key2).UseVersion, "##,#")
                    tvType.Nodes.Add(line, line, 0, 0)
                    tvType.ExpandAll()
                Next
                tvType = tvParent.Nodes.Add("DATA", "DATA", 0, 0)
                For Each key2 In myClasses.ObjDesc(key).Data.Keys
                    line = key2 & " , " & myClasses.ObjDesc(key).Data(key2).Name & " , " & _
                       myClasses.ObjDesc(key).Data(key2).ExpliciteName & " , " & myClasses.ObjDesc(key).Data(key2).Acces & " , " & _
                       CStr(myClasses.ObjDesc(key).Data(key2).vbType) & " , " & myClasses.ObjDesc(key).Data(key2).Limitation & " , " & _
                       CStr(myClasses.ObjDesc(key).Data(key2).Use) & " , " & Format(myClasses.ObjDesc(key).Data(key2).UseVersion, "##,#")
                    tvType.Nodes.Add(line, line, 0, 0)
                    tvType.ExpandAll()
                Next
            Next
        End If
        TreeView1.Scrollable = True
    End Sub

Ce treeview à donc 3 niveaux, celui de base (niveau 1) ou j'ai les "key" puis dessous 2 objets appelés CFG et DATA puis sous chaque j'ai plusieurs ligne regroupant plusieurs informations.
Le niveau 2 et 3 est étendu dés que j'étend manuellement le niveau 1.

Ce que j'aimerais c'est pouvoir étendre l'un des niveaux 1 par le code et fermé les autres.

En faite le treeview n'est qu'un visualiseur de mes données, à coté j'ai le détail de l'un des objet que je peux modifier, en ajouter ou supprimer.

Idéalement il faudrait aussi que la vue se place de façon à voir l’intégralité du nœud étendu puisque j'ai les ascenseurs d'actif "TreeView1.Scrollable = True"

J'ai essayé avec "TreeView1.SelectedNode" mai je n'arrive pas à lui donner la bonne information.

A l'inverse il faut que lorsque l'on clique manuellement dans le treeview que je puisse récupérer le texte nœud de base ainsi que CFG ou DATA et la ligne sélectionné du niveau 3.

Merci

Bon ba je viens de trouver, excusez moi.

dans le cmbObject_SelectedIndexChanged (un combobox ou j'ai tous mes objets racine)

Code:

1
2
3
4
5
6
7
8
9
10
 
 
For Each nd As TreeNode In TreeView1.Nodes
                If nd.Text = cmbObject.Text Then
                    nd.ExpandAll()
                Else
                    nd.Collapse(True)
                End If
 
            Next

il me reste à positionner l'affichage correctement et a faire l'inverse, au clic dans le treenode

[EDIT]

Pour l'affichage de la sélection:

Code:

1
2
3
4
5
6
7
            For Each nd As TreeNode In TreeView1.Nodes
                If nd.Text = cmbObject.Text Then
                    TreeView1.SelectedNode = nd
                    Exit For
                End If
 
            Next

30/03/2015, 14h34
chaparo

Pour l'avoir déjà utilisé,

il faut bien que tu lise les propriétés sur la msdn et que tu fasses la différence entre la classe Treeview et la classe TreeNode

TreeNode Sur cette page tu devrais regarder
Parent Noeud précédent voir aussi le fonctionnement de PrevNode et NextNode et la différence avec PrevVisibleNode et NextVisibleNode
CollapseAll reduire le noeud (et ses enfants selon la surcharge)
Level niveau du noeud
FirstNode Lien père à la base de l'arborescence

TreeView Ici tu auras aussi
CollapseAll tout reduire
SelectedNode Noeud à sélectionner

Je n'ai pas mon projet ou je l'ai utiliser sous la main, je pourrais jeter un oeil ce soir.
30/03/2015, 14h44
megamario

Citation:

Envoyé par chaparo

Pour l'avoir déjà utilisé,

il faut bien que tu lise les propriétés sur la msdn et que tu fasses la différence entre la classe Treeview et la classe TreeNode

TreeNode Sur cette page tu devrais regarder
Parent Noeud précédent voir aussi le fonctionnement de PrevNode et NextNode et la différence avec PrevVisibleNode et NextVisibleNode
CollapseAll reduire le noeud (et ses enfants selon la surcharge)
Level niveau du noeud
FirstNode Lien père à la base de l'arborescence

TreeView Ici tu auras aussi
CollapseAll tout reduire
SelectedNode Noeud à sélectionner

Je n'ai pas mon projet ou je l'ai utiliser sous la main, je pourrais jeter un oeil ce soir.

Super merci, je regarde sa.