Hi,
meine letzte Frage zu Treeview...
in unten genannte Code macht er mir folgende Aufstellung...
bestehe die Möglichkeit das ich das mit einer Überschrift ausstatten kann...
Wie könnte ich es schaffen, daß er mit eine Überschrift macht!??
so:
Danke-- weis ich nerv langsam damit
LG
Spoiler anzeigen
meine letzte Frage zu Treeview...
in unten genannte Code macht er mir folgende Aufstellung...
bestehe die Möglichkeit das ich das mit einer Überschrift ausstatten kann...
Wie könnte ich es schaffen, daß er mit eine Überschrift macht!??
so:
Danke-- weis ich nerv langsam damit
LG
VB.NET-Quellcode
- Public Sub FillTreeView(ByVal dt As DataTable)
- Me.TreeView1.BeginUpdate()
- Dim Tn As TreeNode
- For Each r As DataRow In dt.Rows
- Tn = New TreeNode((r("Kat_Tag").ToString))
- Tn.Tag = (r("ID").ToString)
- Tn.ImageIndex = 0
- Tn.SelectedImageIndex = 1
- If Convert.ToInt32(r("Kat_ParentID")) = 0 Then
- Me.TreeView1.Nodes.Add(Tn)
- End If
- FillTreeNode_Sub(Tn, dt, Convert.ToInt32(r("ID")))
- Next
- Me.TreeView1.EndUpdate()
- End Sub
- Public Sub FillTreeNode_Sub(ByRef tn As TreeNode, ByRef dt As DataTable, ByVal ID As Integer)
- Dim foundRows() As DataRow = dt.Select("Kat_ParentID = " + ID.ToString, "ID")
- Dim Tn_Sub As TreeNode
- For Each _r As DataRow In foundRows
- Tn_Sub = New TreeNode((_r("Kat_Tag").ToString))
- Tn_Sub.Tag = (_r("ID").ToString)
- Tn_Sub.ImageIndex = 0
- Tn_Sub.SelectedImageIndex = 1
- tn.Nodes.Add(Tn_Sub)
- FillTreeNode_Sub(Tn_Sub, dt, Convert.ToInt32(_r("ID")))
- Next
- End Sub