Imports Infragistics.Windows.DockManager
Private Sub InitializeDmAllowDock(ByVal dockManager As XamDockManager)
' AllowDocking determines the default value for whether
' a ContentPane can be put into a Dockable state by the
' end user. The AllowDocking(Left|Right|Top|Bottom|Floating)
' can be used to override this value for specific edges.
' Note: These properties refer to edges of the dockmanager.
'
Dim cp1 As New ContentPane()
cp1.Header = "OnlyLeftOrRight"
cp1.AllowDocking = False
cp1.AllowDockingLeft = True
cp1.AllowDockingRight = True
' the following is equivalent to the version above
Dim cp2 As New ContentPane()
cp2.Header = "AlsoLeftOrRight"
cp2.AllowDockingTop = False
cp2.AllowDockingBottom = False
Dim split As New SplitPane()
XamDockManager.SetInitialLocation(split, InitialPaneLocation.DockedLeft)
split.Panes.Add(cp1)
split.Panes.Add(cp2)
dockManager.Panes.Add(split)
End Sub