Salut,
Voila, je cherche un moyen de remonter (ou de descendre) un noeud...(drag&Drop)...
Et de sauvegarder mon treeview dans une base.
un grand merci d'avance
Salut,
Voila, je cherche un moyen de remonter (ou de descendre) un noeud...(drag&Drop)...
Et de sauvegarder mon treeview dans une base.
un grand merci d'avance
pour monter un noeud :
pour descendre un noeud:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10 Private Sub monterNoeud() Dim selectedNode As TreeNode = Me.TreeViewMenu.SelectedNode Me.TreeViewMenu.BeginUpdate() Dim parentNode As TreeNode = selectedNode.Parent Dim oldIndex As Integer = selectedNode.Index selectedNode.Remove() parentNode.Nodes.Insert(oldIndex - 1, selectedNode) Me.TreeViewMenu.SelectedNode = selectedNode Me.TreeViewMenu.EndUpdate() End Sub
par contre, j'aierai une petite piste pour l'enregistrement de tout mon arbre !!!!
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16 Private Sub descendreNoeud() Dim selectedNode As TreeNode = Me.TreeViewMenu.SelectedNode Dim maxIndex As Integer = 0 If selectedNode.Parent Is Nothing Then maxIndex = TreeViewMenu.Nodes.Count - 1 Else maxIndex = TreeViewMenu.SelectedNode.Parent.Nodes.Count - 1 End If TreeViewMenu.BeginUpdate() Dim parentNode As TreeNode = selectedNode.Parent Dim oldIndex As Integer = selectedNode.Index selectedNode.Remove() parentNode.Nodes.Insert(oldIndex + 1, selectedNode) Me.TreeViewMenu.SelectedNode = selectedNode Me.TreeViewMenu.EndUpdate() End Sub
merci !
ben j'ai trouvé..... en reflichissant un chouilla !!!
et on remplace "Debug.Print(n1.Name.ToString + " " + n1.Text)" par l'enregistrement dans base !!!
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7 Sub ParcoursTreeView(ByVal n As TreeNode) For Each n1 As TreeNode In n.Nodes Debug.Print(n1.Name.ToString + " " + n1.Text) ParcoursTreeView(n1) Next End Sub
Facile !!
Désolé du derengement !
Vous avez un bloqueur de publicités installé.
Le Club Developpez.com n'affiche que des publicités IT, discrètes et non intrusives.
Afin que nous puissions continuer à vous fournir gratuitement du contenu de qualité, merci de nous soutenir en désactivant votre bloqueur de publicités sur Developpez.com.
Partager