Common: small tweaks

GUIs.Common/DocumentResultList/frmDocumentResultList.vb

@@ -551,7 +551,6 @@ Public Class frmDocumentResultList
 
         If _Config IsNot Nothing And _IsLoading = False Then
             _Config.Config.SplitContainer1Horizontal = SwitchMainContainerHorizontal.Checked
-            _Config.Save()
         End If
     End Sub
 
@@ -560,7 +559,6 @@ Public Class frmDocumentResultList
 
         If _Config IsNot Nothing And _IsLoading = False Then
             _Config.Config.SplitContainer2Horizontal = SwitchDetailContainerHorizontal.Checked
-            _Config.Save()
         End If
         End Sub
 
@@ -592,14 +590,12 @@ Public Class frmDocumentResultList
     Private Sub SplitContainerControl1_SplitterPositionChanged(sender As Object, e As EventArgs) Handles SplitContainerControl1.SplitterPositionChanged
         If _IsLoading = False Then
             _Config.Config.SplitContainer1Distance = SplitContainerControl1.SplitterPosition
-            _Config.Save()
         End If
     End Sub
 
     Private Sub SplitContainerControl2_SplitterPositionChanged(sender As Object, e As EventArgs) Handles SplitContainerControl2.SplitterPositionChanged
         If _IsLoading = False Then
             _Config.Config.SplitContainer2Distance = SplitContainerControl2.SplitterPosition
-            _Config.Save()
         End If
     End Sub
 
@@ -744,19 +740,21 @@ Public Class frmDocumentResultList
             Close()
         End Sub
 
-        Private Sub frmDocumentResultList_Closing(sender As Object, e As CancelEventArgs) Handles Me.Closing
+    Private Sub frmDocumentResultList_Closing(sender As Object, e As CancelEventArgs) Handles Me.FormClosing
-            Try
+        Try
-                _Config.Config.WindowLocation = Location
+            GridViewSave_Layout(_ActiveGrid.MainView)
-                _Config.Config.WindowSize = Size
-                _Config.Save()
 
-                DocumentViewer1.Done()
+            _Config.Config.WindowLocation = Location
-            Catch ex As Exception
+            _Config.Config.WindowSize = Size
-                _Logger.Error(ex)
+            _Config.Save()
-            End Try
-        End Sub
 
-        Private Sub GridControl_DoubleClick(sender As Object, e As EventArgs) Handles GridControl1.DoubleClick, GridControl2.DoubleClick, GridControl3.DoubleClick
+            DocumentViewer1.Done()
+        Catch ex As Exception
+            _Logger.Error(ex)
+        End Try
+    End Sub
+
+    Private Sub GridControl_DoubleClick(sender As Object, e As EventArgs) Handles GridControl1.DoubleClick, GridControl2.DoubleClick, GridControl3.DoubleClick
             If _CurrentDocument IsNot Nothing AndAlso _CurrentDocument.AccessRight > Rights.AccessRight.VIEW_ONLY Then
                 OpenFile()
             End If
@@ -824,9 +822,7 @@ Public Class frmDocumentResultList
         End If
     End Sub
 
-    Private Sub frmDocumentResultList_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing
+
-        GridViewSave_Layout(_ActiveGrid.MainView)
-    End Sub
 
     Private _DragBoxFromMouseDown As Rectangle
     Private _ScreenOffset As Point