ZooFlow: Fix DetailPage, Fix BaseForm, Tweak Appearance

GUIs.ZooFlow/Administration/frmAdmin_SourceSQL.vb

@@ -17,6 +17,7 @@ Public Class frmAdmin_SourceSQL
         InitializeComponent()
 
         ' Fügen Sie Initialisierungen nach dem InitializeComponent()-Aufruf hinzu.
+        InitializeBaseForm(My.LogConfig)
         Me.PrimaryKey = PrimaryKey
     End Sub
 
@@ -33,9 +34,12 @@ Public Class frmAdmin_SourceSQL
                 .TabPage = Nothing
             })
 
+            TBZF_ADMIN_SOURCE_SQLTableAdapter.Connection.ConnectionString = My.DatabaseECM.CurrentSQLConnectionString
+
             If IsInsert Then
                 TBZF_ADMIN_SOURCE_SQLBindingSource.AddNew()
             Else
+
                 TBZF_ADMIN_SOURCE_SQLTableAdapter.Fill(DSIDB_Stammdaten.TBZF_ADMIN_SOURCE_SQL, PrimaryKey)
             End If