Fix Config crash

MultiTool.Form/frmConfig.vb

@@ -32,7 +32,7 @@ Public Class frmConfig
     End Sub
 
     Private Sub frmConfig_Load(sender As Object, e As EventArgs) Handles MyBase.Load
-
+        Try
             Dim oConnectionString = MSSQLServer.DecryptConnectionString(Config.ConnectionString)
             Dim oBuilder As New SqlConnectionStringBuilder(oConnectionString) With {
                 .InitialCatalog = "DD_ECM"
@@ -52,6 +52,11 @@ Public Class frmConfig
             TBMT_CONFIGTableAdapter.FillGeneral(TBMT_CONFIG_GENERAL)
 
             LoadGeneralConfig(TBMT_CONFIG_GENERAL)
+
+            BindingSource = TBEDIXMLITEMSBindingSource
+        Catch ex As Exception
+            FormHelper.ShowError(ex, "Laden des Formulars")
+        End Try
     End Sub
 
     Private Sub LoadGeneralConfig(TBMT_CONFIG_GENERAL As DS_DD_ECM.TBMT_CONFIGDataTable)
@@ -133,7 +138,7 @@ Public Class frmConfig
     End Sub
 
     Private Sub BarButtonItem2_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem2.ItemClick
-        BindingSource.AddNew()
+        BindingSource?.AddNew()
     End Sub
 
     Private Sub XtraTabControl1_SelectedPageChanged(sender As Object, e As DevExpress.XtraTab.TabPageChangedEventArgs) Handles XtraTabControl1.SelectedPageChanged