[Visual Basic] Private Sub Delete_all_Childs( _
ByVal nodes As TreeNodeCollection _
)
[Visual Basic] Private Sub Delete_all_Childs(ByVal nodes As TreeNodeCollection)
For Each tn As TreeNode In nodes
Me.Servicekatalogdaten.Delete_Servicekatalog(tn.Tag)
tn.NodeFont = Me.Treeviewdata.fnt_Strikeout
Delete_all_Childs(tn.Nodes)
Next
End Sub
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