Fix LogErrorsOnly Checkbox

Global_Indexer/frmAdministration.Designer.vb

@@ -308,6 +308,7 @@ Partial Class frmAdministration
         Me.TBGI_REGEX_DOCTYPETableAdapter = New Global_Indexer.MyDatasetTableAdapters.TBGI_REGEX_DOCTYPETableAdapter()
         Me.RibbonPage2 = New DevExpress.XtraBars.Ribbon.RibbonPage()
         Me.RibbonPage8 = New DevExpress.XtraBars.Ribbon.RibbonPage()
+        Me.colAKTIV = New DevExpress.XtraGrid.Columns.GridColumn()
         GUIDLabel = New System.Windows.Forms.Label()
         GUIDLabel1 = New System.Windows.Forms.Label()
         NAMELabel = New System.Windows.Forms.Label()
@@ -1012,7 +1013,7 @@ Partial Class frmAdministration
         Me.GridView1.Appearance.EvenRow.Options.UseBackColor = True
         Me.GridView1.Appearance.FocusedRow.BackColor = System.Drawing.Color.Khaki
         Me.GridView1.Appearance.FocusedRow.Options.UseBackColor = True
-        Me.GridView1.Columns.AddRange(New DevExpress.XtraGrid.Columns.GridColumn() {Me.colBEZEICHNUNG})
+        Me.GridView1.Columns.AddRange(New DevExpress.XtraGrid.Columns.GridColumn() {Me.colAKTIV, Me.colBEZEICHNUNG})
         Me.GridView1.GridControl = Me.GridControl1
         Me.GridView1.Name = "GridView1"
         Me.GridView1.OptionsBehavior.AllowAddRows = DevExpress.Utils.DefaultBoolean.[False]
@@ -2458,6 +2459,12 @@ Partial Class frmAdministration
         Me.RibbonPage8.Name = "RibbonPage8"
         resources.ApplyResources(Me.RibbonPage8, "RibbonPage8")
         '
+        'colAKTIV
+        '
+        resources.ApplyResources(Me.colAKTIV, "colAKTIV")
+        Me.colAKTIV.FieldName = "AKTIV"
+        Me.colAKTIV.Name = "colAKTIV"
+        '
         'frmAdministration
         '
         Me.Appearance.Options.UseFont = True
@@ -2772,4 +2779,5 @@ Partial Class frmAdministration
     Friend WithEvents txtAutomIndexConnectionId As TextBox
     Friend WithEvents txtAutomIndexSQLResult As TextBox
     Friend WithEvents TextBox8 As TextBox
+    Friend WithEvents colAKTIV As DevExpress.XtraGrid.Columns.GridColumn
 End Class

Global_Indexer/frmAdministration.resx

@@ -1291,6 +1291,15 @@
   <data name="GridControl1.Location" type="System.Drawing.Point, System.Drawing">
     <value>0, 30</value>
   </data>
+  <data name="colAKTIV.Caption" xml:space="preserve">
+    <value>Aktiv</value>
+  </data>
+  <data name="colAKTIV.Visible" type="System.Boolean, mscorlib">
+    <value>True</value>
+  </data>
+  <data name="colAKTIV.VisibleIndex" type="System.Int32, mscorlib">
+    <value>0</value>
+  </data>
   <data name="colBEZEICHNUNG.Caption" xml:space="preserve">
     <value>Profil</value>
   </data>
@@ -1298,7 +1307,7 @@
     <value>True</value>
   </data>
   <data name="colBEZEICHNUNG.VisibleIndex" type="System.Int32, mscorlib">
-    <value>0</value>
+    <value>1</value>
   </data>
   <data name="colBEZEICHNUNG.Width" type="System.Int32, mscorlib">
     <value>277</value>
@@ -7258,6 +7267,12 @@ Die erhaltenen Werte können in Indizes geschrieben oder zur Benennung der Datei
   <data name="&gt;&gt;RibbonPage8.Type" xml:space="preserve">
     <value>DevExpress.XtraBars.Ribbon.RibbonPage, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
   </data>
+  <data name="&gt;&gt;colAKTIV.Name" xml:space="preserve">
+    <value>colAKTIV</value>
+  </data>
+  <data name="&gt;&gt;colAKTIV.Type" xml:space="preserve">
+    <value>DevExpress.XtraGrid.Columns.GridColumn, DevExpress.XtraGrid.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
+  </data>
   <data name="&gt;&gt;$this.Name" xml:space="preserve">
     <value>frmAdministration</value>
   </data>

Global_Indexer/frmConfig_Basic.vb

@@ -370,6 +370,8 @@ Public Class frmConfig_Basic
     End Sub
     Sub Load_Basics()
         Try
+            chkLogErrorsOnly.Checked = CONFIG.Config.LogErrorsOnly
+
             If Not MyConnectionString = String.Empty Then
                 Dim csb As New SqlClient.SqlConnectionStringBuilder
                 csb.ConnectionString = MyConnectionString
@@ -386,7 +388,7 @@ Public Class frmConfig_Basic
                     End If
                 Catch ex As Exception
                 End Try
-              
+
 
                 Me.txtActualConnection.Text = constr
             End If