diff --git a/SQLConfig/frmSQLConfig.vb b/SQLConfig/frmSQLConfig.vb
index 8a4e98c7..74149683 100644
--- a/SQLConfig/frmSQLConfig.vb
+++ b/SQLConfig/frmSQLConfig.vb
@@ -12,6 +12,7 @@ Public Class frmSQLConfig
     Private ReadOnly LogConfig As LogConfig
 
     Public Property ConnectionString As String = String.Empty
+    Public Property FormTitle As String = ""
 
     Public Sub New()
         ' Dieser Aufruf ist für den Designer erforderlich.
@@ -32,6 +33,10 @@ Public Class frmSQLConfig
     Private Sub frmSQLConfig_Load(sender As Object, e As EventArgs) Handles MyBase.Load
         Dim oConnectionString = ConnectionString
 
+        If FormTitle.Count > 0 Then
+            Text = $"{FormTitle} - {Text}"
+        End If
+
         If Not oConnectionString = String.Empty Then
             Dim oBuilder As SqlConnectionStringBuilder
             Try