Translate copy profile strings, add icon to messagebox, remove inplace editor for regex & add ribbon button instead

app/DD_Clipboard_Searcher/frmAdministration.vb

@@ -386,7 +386,7 @@ Public Class frmAdministration
 
     Private Sub BarButtonItem2_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem2.ItemClick
         Dim swl = String.Format("EXEC PRCW_DELETE_PROFILE {0}", PROFILE_IDTextBox.Text)
-        Dim result As MsgBoxResult = MsgBox("Sind Sie sicher, dass Sie das Profil löschen wollen?", MsgBoxStyle.YesNo, Text)
+        Dim result As MsgBoxResult = MsgBox("Sind Sie sicher, dass Sie das Profil löschen wollen?", MsgBoxStyle.YesNo Or MsgBoxStyle.Question, Text)
         ' wenn Speichern ja
         If result = MsgBoxResult.Yes Then
             If Database.ExecuteNonQuery(swl) = True Then
@@ -687,10 +687,10 @@ Public Class frmAdministration
         Dim oSQL As String = $"EXEC PRCW_COPY_PROFILE {PROFILE_IDTextBox.Text}, '{USER_USERNAME}'"
 
         If Database.ExecuteNonQuery(oSQL) = False Then
-            MsgBox("Could not duplicate the profile...Check the logfile!", MsgBoxStyle.Exclamation)
+            MsgBox("Profil konnte nicht kopiert werden! Mehr Informationen im Log.", MsgBoxStyle.Exclamation, Text)
         Else
             Refresh_ProfileScreen()
-            MsgBox("Profile has been duplicated. Please check the dependencies!", MsgBoxStyle.Information)
+            MsgBox("Profil kopiert! Bitte die Abhängigkeiten überprüfen!", MsgBoxStyle.Information, Text)
         End If
     End Sub
 
@@ -886,4 +886,8 @@ Public Class frmAdministration
             CtrlApplicationAssignment1.Process_Load(PROFILE_IDTextBox.Text)
         End If
     End Sub
+
+    Private Sub BarButtonItem30_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem30.ItemClick
+        CtrlApplicationAssignment1.Window_EditRegex()
+    End Sub
 End Class