InitialLocationProperty Field

Imports Infragistics.Windows.DockManager

Private Sub InitializeDockManager(ByVal dockManager As XamDockManager)
    ' The InitialLocation attached property is used to set the starting 
    ' location for the split pane. Once initialied, this property cannot 
    ' be changed. 
    Dim splitTop As New SplitPane()

    ' Panes can be docked to any edge within the xamdockmanager 
    ' using the "Docked" enum values 
    XamDockManager.SetInitialLocation(splitTop, InitialPaneLocation.DockedTop)
    Dim cpTopPinned As New ContentPane()
    cpTopPinned.Header = "Docked Top"
    cpTopPinned.Content = New TextBox()
    splitTop.Panes.Add(cpTopPinned)

    ' Only docked panes can be unpinned. A tab item representing 
    ' the item will be positioned pane will be displayed in the 
    ' unpinned tab area based on the "edge" to which the pane 
    ' is displayed when pinned 
    Dim cpTopUnpinned As New ContentPane()
    cpTopUnpinned.IsPinned = False
    cpTopUnpinned.Header = "Unpinned"
    cpTopUnpinned.Content = New TextBox()
    splitTop.Panes.Add(cpTopUnpinned)

    ' Panes can be displayed in a floating window outside the bounds 
    ' of the dockmanager using the DockableFloating or FloatingOnly 
    ' values 
    Dim splitFloat As New SplitPane()
    XamDockManager.SetInitialLocation(splitFloat, InitialPaneLocation.FloatingOnly)
    Dim cpFloat As New ContentPane()
    cpFloat.Header = "Started Floating Only"
    Dim tbFloat As New TextBox()
    tbFloat.Text = "Control in floating pane"
    cpFloat.Content = tbFloat
    splitFloat.Panes.Add(cpFloat)

    dockManager.Panes.Add(splitTop)
    dockManager.Panes.Add(splitFloat)
End Sub