- Code: Select all
Private Sub SetColumsTreeView()
Dim id As Integer = TreeView1.appendChild ("")
Colors.SetColor("mycolor", 122, 222, 0, 255)
TreeView1.SetColumnCount(5)
TreeView1.SetColumnWidth(0, 300)
TreeView1.SetColumnWidth(1, 100)
TreeView1.SetColumnWidth(2, 160)
TreeView1.SetColumnWidth(3, 100)
TreeView1.SetColumnWidth(4, 100)
TreeView1.SetBackground( id,1, "mycolor")
TreeView1.setHeaderLabel ("Col 1", 0)
TreeView1.setHeaderLabel ("Col 2", 1)
TreeView1.setHeaderLabel ("Col 3", 2)
TreeView1.setHeaderLabel ("Col 4", 3)
TreeView1.setHeaderLabel ("Col 5", 4)
end sub
It's a part of an example (TreeView2) i have used to show how to set background colors.