Diskuze: c# treeview prohledani adresářů
V předchozím kvízu, Test znalostí C# .NET online, jsme si ověřili nabyté zkušenosti z kurzu.
Člen
cmuch:18.1.2016 6:15
Ahoj,
já to mám dělané takto v VB.NET, kde si složku také načítam odjinud.
' nacteni frm
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
' when our component is loaded, we initialize the TreeView by adding the root node
Dim mRootNode As New TreeNode
mRootNode.Text = CestaDefault
mRootNode.Tag = CestaDefault
mRootNode.Name = CestaDefault.ToLower
mRootNode.Nodes.Add("*DUMMY*")
TreeView1.Nodes.Add(mRootNode)
'Zobrazeni rootu
'look for a node with a text property value of 'Node3'
TreeView1.SelectedNode = GetNode(CestaDefault, TreeView1.Nodes)
'ensure the focus set on the node
TreeView1.Select()
'zobrazeni vybrane slozky (musí být dvakrat pro prvotni inicializaci)
ZobrazeniVybraneSlozky(CestaDefault)
ZobrazeniVybraneSlozky(CestaDefault)
End Sub' Zobrazeni vybrane slozky
Private Sub ZobrazeniVybraneSlozky(Slozka As String)
'look for a node with a text property value of 'Node3'
TreeView1.SelectedNode = GetNode(Slozka, TreeView1.Nodes)
'ensure the focus set on the node
TreeView1.Select()
refreshView(Me.TreeView1.SelectedNode) ' aktualizace slozky
End Sub
' funkce pro zjisteni vybrane slozky v treeview
Private Function GetNode(ByVal text As String, ByVal parentCollection As TreeNodeCollection) As TreeNode
Dim ret As TreeNode
Dim child As TreeNode
For Each child In parentCollection 'step through the parentcollection
If child.Text = text Then
ret = child
ElseIf child.GetNodeCount(False) > 0 Then ' if there is child items then call this function recursively
ret = GetNode(text, child.Nodes)
End If
If Not ret Is Nothing Then Exit For 'if something was found, exit out of the for loop
Next
Return ret
End FunctionJe to výběr jen první složky, nějakou delší cestu jsem nezkoušel rozbalovat.
Akceptované řešení
+20 Zkušeností
+2,50 Kč
+20 Zkušeností
+2,50 Kč
Zobrazeno 4 zpráv z 4.