WIP Panel Manager

EDMI_ClientSuite/frmSearch.vb

@@ -1,4 +1,6 @@
-Imports DevExpress.XtraEditors.Controls
+Imports DevExpress.XtraBars.Docking
+Imports DevExpress.XtraEditors.Controls
+Imports DevExpress.XtraGrid
 
 Public Class frmSearch
     Private Sub frmSearch_Load(sender As Object, e As EventArgs) Handles Me.Load
@@ -10,8 +12,17 @@ Public Class frmSearch
 
             ImageListBoxControl1.Items.Add(oItem)
         Next
-
-
-
     End Sub
+
+    Public Overrides Function GetInitialPanels() As List(Of PanelInfo)
+        Dim oList = MyBase.GetInitialPanels()
+
+        oList.Add(New PanelInfo() With {
+            .Caption = "Search",
+            .InnerControl = New DocumentPanel(),
+            .Position = DockingStyle.Bottom
+        })
+
+        Return oList
+    End Function
 End Class