Laden der Treedaten und Tree aufbauen
[Visual Basic] Public Function Load_Tree( _
ByRef tree As TreeView, _
Optional ByVal Insert_Initial_Entry As Boolean = False, _
Optional ByVal suchstring As String = "", _
Optional ByVal nuraktive As Boolean = False, _
Optional ByVal Archivobjekte As Boolean = False _
) As Object
[Visual Basic] Public Function Load_Tree(ByRef tree As TreeView, Optional ByVal Insert_Initial_Entry As Boolean = False, Optional ByVal suchstring As String = "", Optional ByVal nuraktive As Boolean = False, Optional ByVal Archivobjekte As Boolean = False)
tree.Enabled = False
tree.BeginUpdate()
If suchstring <> "" Then
Load_Treedata(suchstring, nuraktive, Archivobjekte)
Else
Load_Treedata(nuraktive)
End If
tree.Nodes.Clear()
If Insert_Initial_Entry Then
Dim tn As TreeNode = tree.Nodes.Add("--- Keine ---")
tn.Tag = 0
End If
Load_Treeview(Treedata, tree)
tree.ExpandAll()
tree.EndUpdate()
tree.Enabled = True
End Function
Plattformen: Windows 98, Windows 2000 SP4, Windows Millennium Edition, Windows Server 2003, Windows XP Media Center Edition, Windows XP Professional x64 Edition, Windows XP SP2, Windows XP Starter Edition