Improve Base Form Properties, Improve PanelManager

EDMI_ClientSuite/frmSearch.vb

@@ -16,11 +16,15 @@ Public Class frmSearch
 
     Public Overrides Function GetInitialPanels() As List(Of PanelInfo)
         Dim oList = MyBase.GetInitialPanels()
+        Dim oPanel = New DocumentPanel()
+        Dim oData As DataTable
 
-        oList.Add(New PanelInfo() With {
-            .Caption = "Search",
-            .InnerControl = New DocumentPanel(),
-            .Position = DockingStyle.Bottom
+        My.Channel.CreateDatabaseRequest("Get Users", False)
+        oData = My.Channel.ReturnDatatable("SELECT * FROM VWICM_USER").Table
+        My.Channel.CloseDatabaseRequest()
+
+        oList.Add(New PanelInfo(oPanel, DockingStyle.Bottom, oData) With {
+            .CanBeClosed = False
         })
 
         Return oList