Enhanced TreeView Control for Windows Apps

Problem: I need to present summarized data along with controls categorically arranged in some in some kind of a hierarchy. A simple TreeView control allows displaying of small bit of information per node. I needed a TreeView control that allows more complex type of information to be arranged under a tree. Solution: An Enhanced TreeView control [click on the screen shots to check it out]. I did not have much time to spend on this, and I havnt really used it yet. The look n' feel of the control is completely customizable. If you find any use for it, then go ahead download it! If you are unable to download it, you may contact me, and I'll send it over to you (FREE ofcourse). The source code will be shortly released under GNU license. Everyone is encouraged to use, extend, and polish the functionality of the control. ------------TO USE THE CONTROL--------------- The control in the first screen shots was created by the following code: etv1 = New EnhancedTreeView 'Set Look n' Feel for the EnhancedTreeView control Me.etv1.AutoScroll = True Me.etv1.BackColor = System.Drawing.Color.Transparent Me.etv1.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.etv1.Location = New System.Drawing.Point(1, 2) Me.etv1.Name = "etv1" Me.etv1.NodeEndColor = System.Drawing.Color.White Me.etv1.NodeHeight = 20 Me.etv1.NodeStartColor = System.Drawing.Color.Lavender Me.etv1.NoteLabel = Nothing Me.etv1.Size = New System.Drawing.Size(512, 372) Me.etv1.TabIndex = 1 'Build Node list Me.etv1.NodeList.Add("Root 1") Me.etv1.NodeList(0).TitleNote = Date.Now.ToShortDateString Me.etv1.NodeList.Add("Root 2") Me.etv1.NodeList(1).TitleNote = "By Nomair Kashif" Me.etv1.NodeList(0).ShowPlus = True Me.etv1.NodeList(1).ShowPlus = True Me.etv1.NodeList(0).DetailPanelHeight = 190 Me.etv1.NodeList(0).NodeDetailsPanel.Controls.Add(New MonthCalendar) Me.etv1.NodeList(1).ChildNodes.Add("Root2 - Child 1") Me.etv1.NodeList(1).ChildNodes.Add("Root 2- Child 2") Me.etv1.NodeList(1).ChildNodes(0).ShowPlus = True Me.etv1.NodeList(1).ChildNodes(1).ShowPlus = True Me.Controls.Add(etv1) {END}