Application.SetCompatibleTextRenderingDefault(true);
Private Sub fillTreeViewFromTemplate()
oDBC.Open()
Dim da As New MySqlDataAdapter("SELECT * FROM Filesystem ORDER BY FolderName", oDBC)
Dim dt As New DataTable
da.Fill(dt)
oDBC.Close()
Me.RadTreeViewFromTemplate.DisplayMember = "FolderName"
Me.RadTreeViewFromTemplate.ValueMember = "FilesystemId"
Me.RadTreeViewFromTemplate.ParentIDMember = "ParentId"
Me.RadTreeViewFromTemplate.DataSource = dt
'bilder setzen für alle knoten
'Me.setTreeViewImages(RadTreeViewFromTemplate.Nodes)
End Sub
Private Sub setTreeViewImages(ByVal tnc As RadTreeNodeCollection)
'für jede node das bild setzen
Dim tn As RadTreeNode
For Each tn In tnc
tn.Image = My.Resources.folder
Me.setTreeViewImages(tn.Nodes)
Next
End Sub
| private void rdmMain_DockingStateChanging(object sender, Telerik.WinControls.Docking.DockingChangingEventArgs e) { |
| if (e.DockableState != Telerik.WinControls.Docking.DockState.AutoHide && e.DockableState != Telerik.WinControls.Docking.DockState.Docked) { |
| e.Cancel = true; |
| } |
| if (e.DockObject.DockPosition != DockPosition.Left && e.DockObject.DockPosition != DockPosition.Right) { |
| e.Cancel = true; |
| } |
| } |
| private void rdmMain_DockingStateChanging(object sender, Telerik.WinControls.Docking.DockingChangingEventArgs e) { |
| if (e.DockableState != Telerik.WinControls.Docking.DockState.AutoHide && e.DockableState != Telerik.WinControls.Docking.DockState.Docked) { |
| e.Cancel = true; |
| } |
| } |
| private void rdmMain_DockingStateChanged(object sender, DockingChangedEventArgs e) { |
| if (e.DockObject.DockPosition != DockPosition.Left && e.DockObject.DockPosition != DockPosition.Right) { |
| DockMenuTo(DockPosition.Left); |
| } |
| } |