DocumentResultList: Layout et al

GUIs.Common/frmDocumentResultList.vb

@@ -56,6 +56,7 @@ Public Class frmDocumentResultList
     Private ReadOnly Helpers As DocumentResultList.Helpers
     Private ReadOnly Params As DocumentResultList.Params
     Private ReadOnly LayoutManager As DocumentResultList.Layout
+
     Private WithEvents Watcher As DocumentResultList.Watcher
     Private ControlManager As AttributeControls
 
@@ -65,20 +66,21 @@ Public Class frmDocumentResultList
     Private Property ResultLists As List(Of DocumentResultList.DocumentResult)
 
     Private _IsLoading As Boolean = True
-    Private _ActiveGrid As GridControl = Nothing
-    Private _ActiveGridBand As GridBand = Nothing
     Private _DragBoxFromMouseDown As Rectangle
     Private _ScreenOffset As Point
     Private _CurrentDocument As DocumentResultList.Document = Nothing
     Private ReadOnly _FileOpenList As New Dictionary(Of Integer, String)
     Private ReadOnly _Language As String
 
+    Private Property _ActiveGrid As GridControl = Nothing
+    Private Property _ActiveGridBand As GridBand = Nothing
+    Private Property GridList As List(Of GridControl)
+    Private Property ViewList As List(Of BandedGridView)
+
     Private Property OperationMode As OperationMode Implements IResultForm.OperationMode
 
     Public Property ShouldReturnToPreviousForm As Boolean = False Implements IResultForm.ShouldReturnToPreviousForm
 
-
-
     Public Event NeedsRefresh As EventHandler(Of Integer) Implements IResultForm.NeedsRefresh
     Public Event ResultsRefreshed As EventHandler(Of List(Of DocumentResultList.DocumentResult))
 
@@ -111,7 +113,7 @@ Public Class frmDocumentResultList
         GridBuilder = New GridBuilder(New List(Of GridView) From {GridView1, GridView2, GridView3})
         FileEx = New Modules.Windows.File(pLogConfig)
         Watcher = New DocumentResultList.Watcher(pLogConfig)
-        LayoutManager = New DocumentResultList.Layout(pLogConfig, Config)
+        LayoutManager = New DocumentResultList.Layout(pLogConfig, Config, New List(Of GridView) From {GridView1, GridView2, GridView3})
 
         _Language = Utils.NotNull(Me.Environment.User.Language, State.UserState.LANG_EN_US)
     End Sub
@@ -199,6 +201,10 @@ Public Class frmDocumentResultList
 
             LayoutManager.DockManager_RestoreLayout(DockManager1)
 
+            chkGridShowQuickfilter.Checked = LayoutManager.GetFilterRowVisible()
+            chkGridShowGrouping.Checked = LayoutManager.GetGroupPanelVisible()
+            chkGridShowTitle.Checked = LayoutManager.GetBandTitleVisible()
+
         Catch ex As Exception
             ErrorHandler.ShowErrorMessage(ex, "Error while loading results", "Form Load")
 
@@ -953,4 +959,23 @@ Public Class frmDocumentResultList
             Logger.Error(ex)
         End Try
     End Sub
+
+
+    Private Sub chkGridShowGrouping_CheckedChanged(sender As Object, e As ItemClickEventArgs) Handles chkGridShowGrouping.CheckedChanged
+        If _IsLoading = False Then
+            LayoutManager.SetGroupPanelVisible(chkGridShowGrouping.Checked)
+        End If
+    End Sub
+
+    Private Sub chkGridShowQuickfilter_CheckedChanged(sender As Object, e As ItemClickEventArgs) Handles chkGridShowQuickfilter.CheckedChanged
+        If _IsLoading = False Then
+            LayoutManager.SetFilterRowVisible(chkGridShowQuickfilter.Checked)
+        End If
+    End Sub
+
+    Private Sub chkGridShowTitle_CheckedChanged(sender As Object, e As ItemClickEventArgs) Handles chkGridShowTitle.CheckedChanged
+        If _IsLoading = False Then
+            LayoutManager.SetBandTitleVisible(chkGridShowTitle.Checked)
+        End If
+    End Sub
 End Class