work on resultlists

GUIs.Common/DocumentResultList/frmDocumentResultList.Designer.vb

@@ -1,6 +1,6 @@
 <Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
 Partial Class frmDocumentResultList
-    Inherits DevExpress.XtraBars.Ribbon.RibbonForm
+    Inherits Base.BaseRibbonForm
 
     'Form overrides dispose to clean up the component list.
     <System.Diagnostics.DebuggerNonUserCode()> _

GUIs.Common/DocumentResultList/frmDocumentResultList.vb

@@ -35,9 +35,11 @@ Public Class frmDocumentResultList
 
     Private _IsLoading As Boolean = True
 
-    Public Property ShouldReturnToMatchForm As Boolean Implements IResultForm.ShouldReturnToMatchForm
+    Public Property ShouldReturnToPreviousForm As Boolean = False Implements IResultForm.ShouldReturnToPreviousForm
 
     Public Sub New(LogConfig As LogConfig, Environment As Environment, Params As DocumentResultParams)
+        MyBase.New(LogConfig)
+
         ' Dieser Aufruf ist für den Designer erforderlich.
         InitializeComponent()
 
@@ -50,8 +52,6 @@ Public Class frmDocumentResultList
         _Environment = Environment
         _Params = Params
         _ResultLists = Params.Results
-
-        ShouldReturnToMatchForm = False
     End Sub
 
     Private Sub frmDocumentResultList_Load(sender As Object, e As EventArgs) Handles MyBase.Load
@@ -481,7 +481,7 @@ Public Class frmDocumentResultList
     End Sub
 
     Private Sub BarButtonItem4_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem4.ItemClick
-        ShouldReturnToMatchForm = True
+        ShouldReturnToPreviousForm = True
         Close()
     End Sub