Déplacement "Tout en bas" d'une branche dans un Treeview !

Bonjour à tous !

Je vous présente rapidement mon problème...

J'ai un joli petit Treeview et je souhaiterais pouvoir gérer ses noeuds avec des boutons (PAS de Drag & drop).

Les fonctionnalités que je cherche à introduire sont:

   - déplacer un noeud "Tout en haut" de sa branche => c'est fait !
   - déplacer un noeud "Tout en bas" de sa branche" => Je cherche encore !
   - déplacer un noeud d'un noeud vers le haut => Je cherche encore !
   - déplacer un noeud d'un noeud vers le bas => Je cherche encore !

Donc voilà mon problème !

Pour celui auquel j'ai répondu j'ai utilisé la méthode de "réaffecter" au père le noeud en question (celà induit un repositionnement du noeud juste en dessous de son père). Et je voulais savoir si il existait des méthodes similaires, ou tout du moins "simple" pour arriver à répondre aux autres problèmes ??

Sinon je vois bien des solutions du type: Je crée un Noeud temp pour stocker le Noeud que je veux déplacer, puis je supprime ce noeud, je décale tout les noeuds "en dessous" d'un cran vers le haut, puis je colle mon Noeud temp... mais je trouve ça trés lourd pour un si simple déplacement...

SVP dites moi qu'il existe une méthode plus simple ;)

Merci de votre aide !!
Halala la prog, PES, l'infographie... heuresement que ma femme est moins jalouse que mon PC ;).

[ Dalida ]

---

Oki doki, je vais tester ça tout de suite !

Merci pour cette réponse précise et rapide :)

Je reviens ici vous dire si ça marche !

Halala la prog, PES, l'infographie... heuresement que ma femme est moins jalouse que mon ordinateur.

Oups... je crois que j'ai oublié de préciser que j'étais en VB pur et pas .NET.

Du coup le Insert et autre joyeuseté n'éxiste pas si je ne m'abuse... une idée ??

Merci !



Halala la prog, cs, l'infographie... heuresement que ma femme est moins jalouse que mon ordinateur.

J'ai essayé ça:

    Dim nParentNode As Node
    Dim nNewSelectedNode As Node
   
    Dim sKey As String
    Dim sText As String
   
    sKey = nSelectedNode.key
    sText = nSelectedNode.text
   
    Set nParentNode = nSelectedNode.FirstSibling
   
    tvMyTreeview.Nodes.Remove (nSelectedNode.key)

    Set nNewSelectedNode = tvMyTreeview.Nodes.Add(nParentNode, tvwLast, tvMyTreeview.Nodes(nSelectedNode), sText)
 

Mais du coup, seul le noeud est trasnféré en bas de la liste, il perd ses enfants au passage... il doit vraiment y avoir une astuce mais j'avoue qu'elle m'échappe...
Une idée ??




Halala la prog, PES, l'infographie... heuresement que ma femme est moins jalouse que mon ordinateur.

Moi, tu sais, les histoires de noeuds, chacun les siens....
Mais je pense qu'il faut chercher à "swapper" le node vis-a-vis de son conteneur (le parent) et éviter de supprimer; Je n'ai pas VB sous la main mais dès que j'ai, je teste et te réponds; Mais je pense que tu aura trouvé entretemps.

A+

Alain 31

Quand tu parles de swapper... c'est mettre de coté le Noeud sans le supprimer c'est ça ?? mais outre l efait que je ne sais pas comment faire ;) ) dans ce cas ne risque-je pas de perdre les fils du noeud ?? Ou alors il faut "swapper" toute la famille ?

Bref, je pense cerner ton idée mais j'ai encore quelques lacunes en VB (je rappelle que ce n'est PAS du .Net) donc ton aide sera la bienvenue quand tu auras le temps :)

Merci encore !

Halala la prog, cs, l'infographie... heuresement que ma femme est moins jalouse que mon ordinateur.