Déplacer un noeud dans un TreeView

Question

Je suis surpris qu'il n'y ait pas de m&#233;thode simple pour d&#233;placer un noeud dans un Treeview (je ne cherche pas  &#224; avoir une explication sur le  Drag and Drop, mais bien sur le fond, soit d&#233;placer le noeud) une m&#233;thode type couper le noeud (avec ces fils) et le d&#233;placer &#224; une position sp&#233;cifi&#233;e.
Apr&#232;s de nombreuses recherche, il s'emblerait que la meilleur m&#233;thode consiste &#224; passer par un tableau pour sauvegarder les infos key du noeud et de ces fils (avec une fonction r&#233;cursive pour l'optimisation) pour les recr&#233;er (avec la fonction Add)  &#224; l'endroit souhait&#233;.
Pour info si cela int&#233;resse quelqu'un voici un tuto tr&#232;s d&#233;taill&#233; sur l'utilisation d'un treeview et de la fonction ADO. http://jacma.developpez.com/treeview/
Qu'en pensez vous ?

econs · Answer

Salut,

Deux boutons (Command1 et Command2) + 1 treeview (tv)

Le code suivant te convient-il ?





Private Sub Command1_Click()

Dim Father As Node

    

    With tv

        .LineStyle = tvwRootLines

        .Nodes.Clear

    End With

    Set Father = tv.Nodes.Add(, 4, "ROOT", "ROOT")

    Set Father = tv.Nodes.Add("ROOT", 4, "PERE1", "PERE1")

    Set Father = tv.Nodes.Add("ROOT", 4, "PERE2", "PERE2")

    Set Father = tv.Nodes.Add("ROOT", 4, "PERE3", "PERE3")



    For k = 1 To 10

        Set Father = tv.Nodes.Add("PERE2", 4, "KEY" & CStr(k), "KEY" & CStr(k))

    Next k



End Sub





Private Sub Command2_Click()

    tv.Nodes.Remove ("KEY2")

    Set Father = tv.Nodes.Add("ROOT", 4, "KEY2", "KEY2")

End Sub


Manu

cs_M51 · Answer

Tout d'abord merci de m'avoir répondu.
Cependant je ne pense pas que ta réponde corresponde à ma demande (je n'ai peut  être pas était assez clair)
Ton code si je ne m'abuse fait:
Bouton 1: crée des noeuds pour l'exemple,1 noeud principale ROOT avec 3 noeuds pères et sur le noeud père 2 tu ajoutes 10 fils au même niveau.
Bouton 2: tu supprimes le noeud avec la clef Key2, soit le fils n°2 du père 2.
Puis tu recrées un noeud sous le noeud principale ROOT qui porte la clef Key2.

Or ma demande est: déplacer 1 noeud (et ces fils, dans le terme fils on peut avoir plusieurs niveaux sous-fils)
pour le déplacer dans un autre noeud.
Ton programme détruit un noeud (sans sauver ses caractéristiques. Entre autre, comme le tag, et ses sous-fils éventuels...) et en recrée un plus loin.

Donc désolé mais ce n'est pas cela ma demande.

Déplacer un noeud dans un TreeView

2 réponses

Discussions similaires