Final fixes before vacation \o/

app/DD_Clipboard_Searcher/ClassInit.vb

@@ -231,13 +231,16 @@ Public Class ClassInit
 
     Public Shared Sub Refresh_Profile_Links()
         Try
-            Dim oSql = String.Format("SELECT * FROM VWCW_USER_PROFILE WHERE USER_ID = {0} OR GROUP_ID IN (SELECT DISTINCT GUID FROM TBDD_GROUPS WHERE GUID IN (SELECT GROUP_ID FROM TBDD_GROUPS_USER WHERE USER_ID = {0}))", USER_ID)
+            Dim oSql = String.Format("SELECT * FROM VWCW_USER_PROFILE WHERE ACTIVE = 1 AND USER_ID = {0} OR GROUP_ID IN (SELECT DISTINCT GUID FROM TBDD_GROUPS WHERE GUID IN (SELECT GROUP_ID FROM TBDD_GROUPS_USER WHERE USER_ID = {0}))", USER_ID)
             DT_USER_PROFILES = Database.GetDatatable(oSql)
             If DT_USER_PROFILES.Rows.Count = 0 Then
                 MsgBox("No profiles configured for this user so far!", MsgBoxStyle.Exclamation)
             Else
                 oSql = $"SELECT * FROM VWCW_PROFILE_REL_WINDOW WHERE USER_ID = {USER_ID}"
                 DTPROFILE_REL_WINDOW = Database.GetDatatable(oSql)
+
+                oSql = $"SELECT * FROM VWCW_PROFILE_REL_CONTROL WHERE USER_ID = {USER_ID}"
+                DTPROFILE_REL_CONTROL = Database.GetDatatable(oSql)
             End If
         Catch ex As Exception
             Logger.Error(ex)

app/DD_Clipboard_Searcher/ClassProfileFilter.vb

@@ -1,9 +1,10 @@
 Imports System.Text.RegularExpressions
-Imports DD_Clipboard_Watcher
+Imports DD_Clipboard_Watcher.ClassWindowAPI
 
 Public Class ClassProfileFilter
     Private _ProfileTable As DataTable
     Private _WindowTable As DataTable
+    Private _ControlTable As DataTable
     Private _Profiles As List(Of ProfileData)
     Private _DebugData As DebugData
 
@@ -18,6 +19,7 @@ Public Class ClassProfileFilter
         Public ProfileType As Integer
 
         Public Windows As List(Of WindowData)
+        Public Controls As List(Of ControlData)
 
         Public CountDocs As Integer = 0
         Public CountData As Integer = 0
@@ -30,6 +32,11 @@ Public Class ClassProfileFilter
         Public ClipboardRegex As String
     End Class
 
+    Class ControlData
+        Public Description As String
+        Public Regex As String
+    End Class
+
     ' TODO: Fill this Class!!!! :D
     Class DebugData
         Public ProcessMatch As List(Of String)
@@ -44,11 +51,12 @@ Public Class ClassProfileFilter
         End Get
     End Property
 
-    Public Sub New(ProfileDatatable As DataTable, WindowDatatable As DataTable)
+    Public Sub New(ProfileDatatable As DataTable, WindowDatatable As DataTable, ControlDatatable As DataTable)
         Try
             _DebugData = New DebugData()
             _ProfileTable = ProfileDatatable
             _WindowTable = WindowDatatable
+            _ControlTable = ControlDatatable
             _Profiles = TransformProfiles()
         Catch ex As Exception
             Logger.Error(ex)
@@ -66,45 +74,54 @@ Public Class ClassProfileFilter
             Select(Function(p) p.FirstOrDefault())
     End Function
 
-    Public Function FilterProfilesByProcess(Profiles As IEnumerable(Of ProfileData), CurrentProcessName As String) As IEnumerable(Of ProfileData)
+    Public Function FilterProfilesByProcess(Profiles As List(Of ProfileData), CurrentProcessName As String) As List(Of ProfileData)
-        Return Profiles.
+        Dim oFilteredProfiles As New List(Of ProfileData)
-            Where(Function(p)
+
-                      If p.ProcessName.ToLower = CurrentProcessName.ToLower Then
+        For Each oProfile In Profiles
-                          'TODO: Add Debug Data
+            Logger.Debug("Current Profile: {0}", oProfile.Name)
-                          Return True
+
-                      Else
+            If oProfile.ProcessName.ToLower = CurrentProcessName.ToLower Then
-                          Return False
+                Logger.Debug("Processname Matched: {0}", oProfile.ProcessName.ToLower)
-                      End If
+                'TODO: Add Debug Data
-                  End Function)
+                oFilteredProfiles.Add(oProfile)
+            End If
+        Next
+
+        Return oFilteredProfiles
     End Function
 
-    Public Function FilterProfilesByClipboardRegex(Profiles As IEnumerable(Of ProfileData), ClipboardContents As String) As IEnumerable(Of ProfileData)
+    Public Function FilterProfilesByClipboardRegex(Profiles As List(Of ProfileData), ClipboardContents As String) As List(Of ProfileData)
-        Return Profiles.
+        Dim oFilteredProfiles As New List(Of ProfileData)
-            Where(Function(p)
+
-                      Try
+        For Each oProfile In Profiles
-                          Dim oRegex As New Regex(p.Regex)
+            Logger.Debug("Current Profile: {0}", oProfile.Name)
-                          Dim oMatch = oRegex.Match(ClipboardContents)
+
-                          If oMatch.Success Then
+            Try
-                              'TODO: Add Debug Data
+                Dim oRegex As New Regex(oProfile.Regex)
-                              Return True
+                Dim oMatch = oRegex.Match(ClipboardContents)
-                          Else
+                If oMatch.Success Then
-                              Return False
+                    Logger.Debug("Global Clipboard Regex Matched: {0}", ClipboardContents)
-                          End If
+                    'TODO: Add Debug Data
-                      Catch ex As Exception
+                    oFilteredProfiles.Add(oProfile)
-                          Logger.Warn("Regex '{0}' could not be processed for input '{1}'", p.Regex, ClipboardContents)
+                End If
-                          Logger.Error(ex)
+            Catch ex As Exception
-                          Return False
+                Logger.Warn("Regex '{0}' could not be processed for input '{1}'", oProfile.Regex, ClipboardContents)
-                      End Try
+                Logger.Error(ex)
-                  End Function)
+            End Try
+        Next
+
+        Return oFilteredProfiles
     End Function
 
-    Public Function FilterWindowsByWindowTitleRegex(Profiles As IEnumerable(Of ProfileData), WindowTitle As String) As IEnumerable(Of ProfileData)
+    Public Function FilterWindowsByWindowTitleRegex(Profiles As List(Of ProfileData), WindowTitle As String) As List(Of ProfileData)
         Dim oProfiles As New List(Of ProfileData)
 
-        For Each p As ProfileData In Profiles
+        For Each oProfile As ProfileData In Profiles
+            Logger.Debug("Current Profile: {0}", oProfile.Name)
+
             Dim oWindows As New List(Of WindowData)
 
-            For Each w As WindowData In p.Windows
+            For Each w As WindowData In oProfile.Windows
                 Try
                     If w.Regex = String.Empty Then
                         oWindows.Add(w)
@@ -114,6 +131,7 @@ Public Class ClassProfileFilter
                     Dim oMatch = oRegex.Match(WindowTitle)
 
                     If oMatch.Success Then
+                        Logger.Debug("Window Title Regex Matched: {0}", WindowTitle)
                         'TODO: Add Debug Data
                         oWindows.Add(w)
                     End If
@@ -123,38 +141,107 @@ Public Class ClassProfileFilter
                 End Try
             Next
 
-            p.Windows = oWindows
+            If oWindows.Count > 0 Then
+                oProfile.Windows = oWindows
+                oProfiles.Add(oProfile)
+            End If
         Next
 
         Return oProfiles
     End Function
 
-    Public Function FilterProfilesByWindowClipboardRegex(Profiles As IEnumerable(Of ProfileData), ClipboardContents As String) As IEnumerable(Of ProfileData)
+    Public Function FilterWindowsByWindowClipboardRegex(Profiles As List(Of ProfileData), ClipboardContents As String) As List(Of ProfileData)
-        Return _Profiles.Where(Function(p)
+        Dim oProfiles As New List(Of ProfileData)
-                                   If p.Windows.Count = 0 Then Return True
 
-                                   Return p.Windows.
+        For Each oProfile As ProfileData In Profiles
-                                            Any(Function(w)
+            Logger.Debug("Current Profile: {0}", oProfile.Name)
-                                                    Try
-                                                        If w.ClipboardRegex = String.Empty Then Return True
 
-                                                        Dim oRegex As New Regex(w.ClipboardRegex)
+            Dim oWindows As New List(Of WindowData)
-                                                        Dim oMatch = oRegex.Match(ClipboardContents)
 
-                                                        If oMatch.Success Then
+            For Each w As WindowData In oProfile.Windows
-                                                            'TODO: Add Debug Data
-                                                            Return True
-                                                        Else
-                                                            Return False
-                                                        End If
-                                                    Catch ex As Exception
-                                                        Logger.Warn("Regex '{0}' could not be processed for input '{1}'", w.ClipboardRegex, ClipboardContents)
-                                                        Logger.Error(ex)
-                                                        Return False
-                                                    End Try
-                                                End Function)
-                               End Function)
 
+                Try
+                    If w.ClipboardRegex = String.Empty Then
+                        oWindows.Add(w)
+                    End If
+
+                    Dim oRegex As New Regex(w.ClipboardRegex)
+                    Dim oMatch = oRegex.Match(ClipboardContents)
+
+                    If oMatch.Success Then
+                        Logger.Debug("Window Clipboard Regex Matched: {0}", ClipboardContents)
+                        'TODO: Add Debug Data
+                        oWindows.Add(w)
+                    End If
+                Catch ex As Exception
+                    Logger.Warn("Regex '{0}' could not be processed for input '{1}'", w.ClipboardRegex, ClipboardContents)
+                    Logger.Error(ex)
+                End Try
+            Next
+
+            If oWindows.Count > 0 Then
+                oProfile.Windows = oWindows
+                oProfiles.Add(oProfile)
+            End If
+        Next
+
+        Return oProfiles
+    End Function
+
+    Public Function FilterProfilesByFocusedControl(Profiles As List(Of ProfileData)) As List(Of ProfileData)
+        Dim oWindow As WindowInfo
+        Dim oFocusedControl As WindowInfo
+
+        Try
+            oWindow = GetWindowInfo()
+            oFocusedControl = GetFocusedControl(oWindow.hWnd)
+
+            If oFocusedControl Is Nothing OrElse oFocusedControl.ControlName = String.Empty Then
+                Logger.Warn("Could not get FocusedControl in Window {0}", oWindow.WindowTitle)
+                Return Profiles
+            End If
+        Catch ex As Exception
+            Logger.Warn("Error while getting Focused control")
+            Logger.Error(ex)
+            Return Profiles
+        End Try
+
+        Dim oFilteredProfiles As New List(Of ProfileData)
+
+        For Each oProfile In Profiles
+            Logger.Debug("Current Profile: {0}", oProfile.Name)
+            If oProfile.Controls.Count = 0 Then
+                oFilteredProfiles.Add(oProfile)
+            End If
+
+            Dim oControls As New List(Of ControlData)
+
+            For Each c In oProfile.Controls
+                Try
+                    If c.Regex = String.Empty Then
+                        oControls.Add(c)
+                    End If
+                    Dim oRegex As New Regex(c.Regex)
+                    Dim oMatch = oRegex.Match(oFocusedControl.ControlName)
+
+                    If oMatch.Success Then
+                        Logger.Debug("Focused Control Name Regex Matched: {0}", oFocusedControl.ControlName)
+                        'TODO: Add Debug Data
+                        oControls.Add(c)
+                    End If
+                Catch ex As Exception
+                    Logger.Warn("Regex '{0}' could not be processed for input '{1}'", c.Regex, oFocusedControl.ControlName)
+                    Logger.Error(ex)
+                End Try
+            Next
+
+            If oControls.Count > 0 Then
+                oProfile.Controls = oControls
+                oFilteredProfiles.Add(oProfile)
+            End If
+        Next
+
+        Return oFilteredProfiles
     End Function
 
     Private Function TransformProfiles() As List(Of ProfileData)
@@ -163,6 +250,7 @@ Public Class ClassProfileFilter
         For Each oRow As DataRow In _ProfileTable.Rows
             Dim oProfileId = oRow.Item("GUID")
             Dim oWindowList As List(Of WindowData) = TransformWindows(oProfileId, _WindowTable)
+            Dim oControlList As List(Of ControlData) = TransformControls(oProfileId, _ControlTable)
 
             oList.Add(New ProfileData() With {
                 .Guid = oRow.Item("GUID"),
@@ -173,13 +261,29 @@ Public Class ClassProfileFilter
                 .SQLCountDocs = oRow.Item("SQL_COUNT_DOCS"),
                 .SQLCountData = oRow.Item("SQL_COUNT_DATA"),
                 .ProfileType = oRow.Item("PROFILE_TYPE"),
-                .Windows = oWindowList
+                .Windows = oWindowList,
+                .Controls = oControlList
             })
         Next
 
         Return oList
     End Function
 
+    Private Function TransformControls(ProfileId As Integer, ControlDatatable As DataTable) As List(Of ControlData)
+        Dim oControlList As New List(Of ControlData)
+
+        For Each oRow As DataRow In ControlDatatable.Rows
+            If oRow.Item("PROFILE_ID") = ProfileId Then
+                oControlList.Add(New ControlData() With {
+                   .Description = oRow.Item("DESCRIPTION"),
+                   .Regex = oRow.Item("REGEX")
+                })
+            End If
+        Next
+
+        Return oControlList
+    End Function
+
     Private Function TransformWindows(ProfileId As Integer, WindowDatatable As DataTable) As List(Of WindowData)
         Dim oWindowList As New List(Of WindowData)
 

app/DD_Clipboard_Searcher/DD_Clipboard_Watcher.vbproj

@@ -67,6 +67,9 @@
     <Reference Include="DevExpress.XtraGrid.v18.1, Version=18.1.5.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL" />
     <Reference Include="DevExpress.XtraLayout.v18.1, Version=18.1.5.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
     <Reference Include="DevExpress.XtraPrinting.v18.1, Version=18.1.5.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
+    <Reference Include="DigitalData.Controls.RegexEditor">
+      <HintPath>..\..\..\DDMonorepo\Controls.RegexEditor\bin\Debug\DigitalData.Controls.RegexEditor.dll</HintPath>
+    </Reference>
     <Reference Include="DigitalData.Modules.Config">
       <HintPath>..\..\..\DDMonorepo\Modules.Config\bin\Debug\DigitalData.Modules.Config.dll</HintPath>
     </Reference>
@@ -90,9 +93,6 @@
     <Reference Include="Oracle.ManagedDataAccess">
       <HintPath>P:\Visual Studio Projekte\Bibliotheken\Oracle.ManagedDataAccess.dll</HintPath>
     </Reference>
-    <Reference Include="RegexEditor">
-      <HintPath>..\..\..\DDMonorepo\Controls.RegexEditor\bin\Debug\RegexEditor.dll</HintPath>
-    </Reference>
     <Reference Include="System" />
     <Reference Include="System.ComponentModel.DataAnnotations" />
     <Reference Include="System.Configuration" />

app/DD_Clipboard_Searcher/MyDataset.Designer.vb

@@ -12032,16 +12032,28 @@ Namespace MyDatasetTableAdapters
             Me._commandCollection = New Global.System.Data.SqlClient.SqlCommand(0) {}
             Me._commandCollection(0) = New Global.System.Data.SqlClient.SqlCommand()
             Me._commandCollection(0).Connection = Me.Connection
-            Me._commandCollection(0).CommandText = "SELECT        TBCW_PROF_REL_CONTROL.*"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"FROM            TBCW_PROF_REL_CONTROL"
+            Me._commandCollection(0).CommandText = "SELECT        TBCW_PROF_REL_CONTROL.*"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"FROM            TBCW_PROF_REL_CONTROL WHER"& _ 
+                "E PROCESS_NAME = @PROCESS_NAME AND WINDOW_ID = @WINDOW_ID AND PROFILE_ID = @PROF"& _ 
+                "ILE_ID"
             Me._commandCollection(0).CommandType = Global.System.Data.CommandType.Text
+            Me._commandCollection(0).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@PROCESS_NAME", Global.System.Data.SqlDbType.VarChar, 250, Global.System.Data.ParameterDirection.Input, 0, 0, "PROCESS_NAME", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
+            Me._commandCollection(0).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@WINDOW_ID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "WINDOW_ID", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
+            Me._commandCollection(0).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@PROFILE_ID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "PROFILE_ID", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
         End Sub
         
         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0"),  _
          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
          Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Fill, true)>  _
-        Public Overloads Overridable Function Fill(ByVal dataTable As MyDataset.TBCW_PROF_REL_CONTROLDataTable) As Integer
+        Public Overloads Overridable Function Fill(ByVal dataTable As MyDataset.TBCW_PROF_REL_CONTROLDataTable, ByVal PROCESS_NAME As String, ByVal WINDOW_ID As Integer, ByVal PROFILE_ID As Integer) As Integer
             Me.Adapter.SelectCommand = Me.CommandCollection(0)
+            If (PROCESS_NAME Is Nothing) Then
+                Throw New Global.System.ArgumentNullException("PROCESS_NAME")
+            Else
+                Me.Adapter.SelectCommand.Parameters(0).Value = CType(PROCESS_NAME,String)
+            End If
+            Me.Adapter.SelectCommand.Parameters(1).Value = CType(WINDOW_ID,Integer)
+            Me.Adapter.SelectCommand.Parameters(2).Value = CType(PROFILE_ID,Integer)
             If (Me.ClearBeforeFill = true) Then
                 dataTable.Clear
             End If
@@ -12053,8 +12065,15 @@ Namespace MyDatasetTableAdapters
          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0"),  _
          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
          Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], true)>  _
-        Public Overloads Overridable Function GetData() As MyDataset.TBCW_PROF_REL_CONTROLDataTable
+        Public Overloads Overridable Function GetData(ByVal PROCESS_NAME As String, ByVal WINDOW_ID As Integer, ByVal PROFILE_ID As Integer) As MyDataset.TBCW_PROF_REL_CONTROLDataTable
             Me.Adapter.SelectCommand = Me.CommandCollection(0)
+            If (PROCESS_NAME Is Nothing) Then
+                Throw New Global.System.ArgumentNullException("PROCESS_NAME")
+            Else
+                Me.Adapter.SelectCommand.Parameters(0).Value = CType(PROCESS_NAME,String)
+            End If
+            Me.Adapter.SelectCommand.Parameters(1).Value = CType(WINDOW_ID,Integer)
+            Me.Adapter.SelectCommand.Parameters(2).Value = CType(PROFILE_ID,Integer)
             Dim dataTable As MyDataset.TBCW_PROF_REL_CONTROLDataTable = New MyDataset.TBCW_PROF_REL_CONTROLDataTable()
             Me.Adapter.Fill(dataTable)
             Return dataTable

app/DD_Clipboard_Searcher/MyDataset.xsd

@@ -752,8 +752,12 @@ SELECT GUID, PROFILE_ID, WINDOW_ID, PROCESS_NAME, DESCRIPTION, REGEX, SEQUENCE,
                 <SelectCommand>
                   <DbCommand CommandType="Text" ModifiedByUser="true">
                     <CommandText>SELECT        TBCW_PROF_REL_CONTROL.*
-FROM            TBCW_PROF_REL_CONTROL</CommandText>
+FROM            TBCW_PROF_REL_CONTROL WHERE PROCESS_NAME = @PROCESS_NAME AND WINDOW_ID = @WINDOW_ID AND PROFILE_ID = @PROFILE_ID</CommandText>
-                    <Parameters />
+                    <Parameters>
+                      <Parameter AllowDbNull="false" AutogeneratedName="PROCESS_NAME" ColumnName="PROCESS_NAME" DataSourceName="DD_ECM_TEST.dbo.TBCW_PROF_REL_CONTROL" DataTypeServer="varchar(250)" DbType="AnsiString" Direction="Input" ParameterName="@PROCESS_NAME" Precision="0" ProviderType="VarChar" Scale="0" Size="250" SourceColumn="PROCESS_NAME" SourceColumnNullMapping="false" SourceVersion="Current" />
+                      <Parameter AllowDbNull="false" AutogeneratedName="WINDOW_ID" ColumnName="WINDOW_ID" DataSourceName="DD_ECM_TEST.dbo.TBCW_PROF_REL_CONTROL" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@WINDOW_ID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="WINDOW_ID" SourceColumnNullMapping="false" SourceVersion="Current" />
+                      <Parameter AllowDbNull="false" AutogeneratedName="PROFILE_ID" ColumnName="PROFILE_ID" DataSourceName="DD_ECM_TEST.dbo.TBCW_PROF_REL_CONTROL" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@PROFILE_ID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="PROFILE_ID" SourceColumnNullMapping="false" SourceVersion="Current" />
+                    </Parameters>
                   </DbCommand>
                 </SelectCommand>
                 <UpdateCommand>
@@ -814,7 +818,7 @@ SELECT GUID, PROFILE_ID, WINDOW_ID, PROCESS_NAME, DESCRIPTION, REGEX, SEQUENCE,
   <xs:element name="MyDataset" msdata:IsDataSet="true" msdata:UseCurrentLocale="true" msprop:EnableTableAdapterManager="true" msprop:Generator_DataSetName="MyDataset" msprop:Generator_UserDSName="MyDataset">
     <xs:complexType>
       <xs:choice minOccurs="0" maxOccurs="unbounded">
-        <xs:element name="TBCW_PROFILES" msprop:Generator_TableClassName="TBCW_PROFILESDataTable" msprop:Generator_TableVarName="tableTBCW_PROFILES" msprop:Generator_TablePropName="TBCW_PROFILES" msprop:Generator_RowDeletingName="TBCW_PROFILESRowDeleting" msprop:Generator_RowChangingName="TBCW_PROFILESRowChanging" msprop:Generator_RowEvHandlerName="TBCW_PROFILESRowChangeEventHandler" msprop:Generator_RowDeletedName="TBCW_PROFILESRowDeleted" msprop:Generator_UserTableName="TBCW_PROFILES" msprop:Generator_RowChangedName="TBCW_PROFILESRowChanged" msprop:Generator_RowEvArgName="TBCW_PROFILESRowChangeEvent" msprop:Generator_RowClassName="TBCW_PROFILESRow">
+        <xs:element name="TBCW_PROFILES" msprop:Generator_TableClassName="TBCW_PROFILESDataTable" msprop:Generator_TableVarName="tableTBCW_PROFILES" msprop:Generator_RowChangedName="TBCW_PROFILESRowChanged" msprop:Generator_TablePropName="TBCW_PROFILES" msprop:Generator_RowDeletingName="TBCW_PROFILESRowDeleting" msprop:Generator_RowChangingName="TBCW_PROFILESRowChanging" msprop:Generator_RowEvHandlerName="TBCW_PROFILESRowChangeEventHandler" msprop:Generator_RowDeletedName="TBCW_PROFILESRowDeleted" msprop:Generator_RowClassName="TBCW_PROFILESRow" msprop:Generator_UserTableName="TBCW_PROFILES" msprop:Generator_RowEvArgName="TBCW_PROFILESRowChangeEvent">
           <xs:complexType>
             <xs:sequence>
               <xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
@@ -867,7 +871,7 @@ SELECT GUID, PROFILE_ID, WINDOW_ID, PROCESS_NAME, DESCRIPTION, REGEX, SEQUENCE,
             </xs:sequence>
           </xs:complexType>
         </xs:element>
-        <xs:element name="TBCW_USER_PROFILE" msprop:Generator_TableClassName="TBCW_USER_PROFILEDataTable" msprop:Generator_TableVarName="tableTBCW_USER_PROFILE" msprop:Generator_TablePropName="TBCW_USER_PROFILE" msprop:Generator_RowDeletingName="TBCW_USER_PROFILERowDeleting" msprop:Generator_RowChangingName="TBCW_USER_PROFILERowChanging" msprop:Generator_RowEvHandlerName="TBCW_USER_PROFILERowChangeEventHandler" msprop:Generator_RowDeletedName="TBCW_USER_PROFILERowDeleted" msprop:Generator_UserTableName="TBCW_USER_PROFILE" msprop:Generator_RowChangedName="TBCW_USER_PROFILERowChanged" msprop:Generator_RowEvArgName="TBCW_USER_PROFILERowChangeEvent" msprop:Generator_RowClassName="TBCW_USER_PROFILERow">
+        <xs:element name="TBCW_USER_PROFILE" msprop:Generator_TableClassName="TBCW_USER_PROFILEDataTable" msprop:Generator_TableVarName="tableTBCW_USER_PROFILE" msprop:Generator_RowChangedName="TBCW_USER_PROFILERowChanged" msprop:Generator_TablePropName="TBCW_USER_PROFILE" msprop:Generator_RowDeletingName="TBCW_USER_PROFILERowDeleting" msprop:Generator_RowChangingName="TBCW_USER_PROFILERowChanging" msprop:Generator_RowEvHandlerName="TBCW_USER_PROFILERowChangeEventHandler" msprop:Generator_RowDeletedName="TBCW_USER_PROFILERowDeleted" msprop:Generator_RowClassName="TBCW_USER_PROFILERow" msprop:Generator_UserTableName="TBCW_USER_PROFILE" msprop:Generator_RowEvArgName="TBCW_USER_PROFILERowChangeEvent">
           <xs:complexType>
             <xs:sequence>
               <xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
@@ -884,7 +888,7 @@ SELECT GUID, PROFILE_ID, WINDOW_ID, PROCESS_NAME, DESCRIPTION, REGEX, SEQUENCE,
             </xs:sequence>
           </xs:complexType>
         </xs:element>
-        <xs:element name="VWUSER_PROFILE" msprop:Generator_TableClassName="VWUSER_PROFILEDataTable" msprop:Generator_TableVarName="tableVWUSER_PROFILE" msprop:Generator_RowChangedName="VWUSER_PROFILERowChanged" msprop:Generator_TablePropName="VWUSER_PROFILE" msprop:Generator_RowDeletingName="VWUSER_PROFILERowDeleting" msprop:Generator_RowChangingName="VWUSER_PROFILERowChanging" msprop:Generator_RowEvHandlerName="VWUSER_PROFILERowChangeEventHandler" msprop:Generator_RowDeletedName="VWUSER_PROFILERowDeleted" msprop:Generator_RowClassName="VWUSER_PROFILERow" msprop:Generator_UserTableName="VWUSER_PROFILE" msprop:Generator_RowEvArgName="VWUSER_PROFILERowChangeEvent">
+        <xs:element name="VWUSER_PROFILE" msprop:Generator_TableClassName="VWUSER_PROFILEDataTable" msprop:Generator_TableVarName="tableVWUSER_PROFILE" msprop:Generator_TablePropName="VWUSER_PROFILE" msprop:Generator_RowDeletingName="VWUSER_PROFILERowDeleting" msprop:Generator_RowChangingName="VWUSER_PROFILERowChanging" msprop:Generator_RowEvHandlerName="VWUSER_PROFILERowChangeEventHandler" msprop:Generator_RowDeletedName="VWUSER_PROFILERowDeleted" msprop:Generator_UserTableName="VWUSER_PROFILE" msprop:Generator_RowChangedName="VWUSER_PROFILERowChanged" msprop:Generator_RowEvArgName="VWUSER_PROFILERowChangeEvent" msprop:Generator_RowClassName="VWUSER_PROFILERow">
           <xs:complexType>
             <xs:sequence>
               <xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msdata:AutoIncrementSeed="-1" msdata:AutoIncrementStep="-1" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
@@ -913,7 +917,7 @@ SELECT GUID, PROFILE_ID, WINDOW_ID, PROCESS_NAME, DESCRIPTION, REGEX, SEQUENCE,
             </xs:sequence>
           </xs:complexType>
         </xs:element>
-        <xs:element name="TBWH_User" msprop:Generator_TableClassName="TBWH_UserDataTable" msprop:Generator_TableVarName="tableTBWH_User" msprop:Generator_TablePropName="TBWH_User" msprop:Generator_RowDeletingName="TBWH_UserRowDeleting" msprop:Generator_RowChangingName="TBWH_UserRowChanging" msprop:Generator_RowEvHandlerName="TBWH_UserRowChangeEventHandler" msprop:Generator_RowDeletedName="TBWH_UserRowDeleted" msprop:Generator_UserTableName="TBWH_User" msprop:Generator_RowChangedName="TBWH_UserRowChanged" msprop:Generator_RowEvArgName="TBWH_UserRowChangeEvent" msprop:Generator_RowClassName="TBWH_UserRow">
+        <xs:element name="TBWH_User" msprop:Generator_TableClassName="TBWH_UserDataTable" msprop:Generator_TableVarName="tableTBWH_User" msprop:Generator_RowChangedName="TBWH_UserRowChanged" msprop:Generator_TablePropName="TBWH_User" msprop:Generator_RowDeletingName="TBWH_UserRowDeleting" msprop:Generator_RowChangingName="TBWH_UserRowChanging" msprop:Generator_RowEvHandlerName="TBWH_UserRowChangeEventHandler" msprop:Generator_RowDeletedName="TBWH_UserRowDeleted" msprop:Generator_RowClassName="TBWH_UserRow" msprop:Generator_UserTableName="TBWH_User" msprop:Generator_RowEvArgName="TBWH_UserRowChangeEvent">
           <xs:complexType>
             <xs:sequence>
               <xs:element name="Username" msprop:Generator_ColumnVarNameInTable="columnUsername" msprop:Generator_ColumnPropNameInRow="Username" msprop:Generator_ColumnPropNameInTable="UsernameColumn" msprop:Generator_UserColumnName="Username" type="xs:string" minOccurs="0" />
@@ -924,7 +928,7 @@ SELECT GUID, PROFILE_ID, WINDOW_ID, PROCESS_NAME, DESCRIPTION, REGEX, SEQUENCE,
             </xs:sequence>
           </xs:complexType>
         </xs:element>
-        <xs:element name="TBCW_PROFILE_PROCESS" msprop:Generator_TableClassName="TBCW_PROFILE_PROCESSDataTable" msprop:Generator_TableVarName="tableTBCW_PROFILE_PROCESS" msprop:Generator_RowChangedName="TBCW_PROFILE_PROCESSRowChanged" msprop:Generator_TablePropName="TBCW_PROFILE_PROCESS" msprop:Generator_RowDeletingName="TBCW_PROFILE_PROCESSRowDeleting" msprop:Generator_RowChangingName="TBCW_PROFILE_PROCESSRowChanging" msprop:Generator_RowEvHandlerName="TBCW_PROFILE_PROCESSRowChangeEventHandler" msprop:Generator_RowDeletedName="TBCW_PROFILE_PROCESSRowDeleted" msprop:Generator_RowClassName="TBCW_PROFILE_PROCESSRow" msprop:Generator_UserTableName="TBCW_PROFILE_PROCESS" msprop:Generator_RowEvArgName="TBCW_PROFILE_PROCESSRowChangeEvent">
+        <xs:element name="TBCW_PROFILE_PROCESS" msprop:Generator_TableClassName="TBCW_PROFILE_PROCESSDataTable" msprop:Generator_TableVarName="tableTBCW_PROFILE_PROCESS" msprop:Generator_TablePropName="TBCW_PROFILE_PROCESS" msprop:Generator_RowDeletingName="TBCW_PROFILE_PROCESSRowDeleting" msprop:Generator_RowChangingName="TBCW_PROFILE_PROCESSRowChanging" msprop:Generator_RowEvHandlerName="TBCW_PROFILE_PROCESSRowChangeEventHandler" msprop:Generator_RowDeletedName="TBCW_PROFILE_PROCESSRowDeleted" msprop:Generator_UserTableName="TBCW_PROFILE_PROCESS" msprop:Generator_RowChangedName="TBCW_PROFILE_PROCESSRowChanged" msprop:Generator_RowEvArgName="TBCW_PROFILE_PROCESSRowChangeEvent" msprop:Generator_RowClassName="TBCW_PROFILE_PROCESSRow">
           <xs:complexType>
             <xs:sequence>
               <xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msdata:AutoIncrementSeed="-1" msdata:AutoIncrementStep="-1" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
@@ -947,7 +951,7 @@ SELECT GUID, PROFILE_ID, WINDOW_ID, PROCESS_NAME, DESCRIPTION, REGEX, SEQUENCE,
             </xs:sequence>
           </xs:complexType>
         </xs:element>
-        <xs:element name="TBCW_PROF_DATA_SEARCH" msprop:Generator_TableClassName="TBCW_PROF_DATA_SEARCHDataTable" msprop:Generator_TableVarName="tableTBCW_PROF_DATA_SEARCH" msprop:Generator_TablePropName="TBCW_PROF_DATA_SEARCH" msprop:Generator_RowDeletingName="TBCW_PROF_DATA_SEARCHRowDeleting" msprop:Generator_RowChangingName="TBCW_PROF_DATA_SEARCHRowChanging" msprop:Generator_RowEvHandlerName="TBCW_PROF_DATA_SEARCHRowChangeEventHandler" msprop:Generator_RowDeletedName="TBCW_PROF_DATA_SEARCHRowDeleted" msprop:Generator_UserTableName="TBCW_PROF_DATA_SEARCH" msprop:Generator_RowChangedName="TBCW_PROF_DATA_SEARCHRowChanged" msprop:Generator_RowEvArgName="TBCW_PROF_DATA_SEARCHRowChangeEvent" msprop:Generator_RowClassName="TBCW_PROF_DATA_SEARCHRow">
+        <xs:element name="TBCW_PROF_DATA_SEARCH" msprop:Generator_TableClassName="TBCW_PROF_DATA_SEARCHDataTable" msprop:Generator_TableVarName="tableTBCW_PROF_DATA_SEARCH" msprop:Generator_RowChangedName="TBCW_PROF_DATA_SEARCHRowChanged" msprop:Generator_TablePropName="TBCW_PROF_DATA_SEARCH" msprop:Generator_RowDeletingName="TBCW_PROF_DATA_SEARCHRowDeleting" msprop:Generator_RowChangingName="TBCW_PROF_DATA_SEARCHRowChanging" msprop:Generator_RowEvHandlerName="TBCW_PROF_DATA_SEARCHRowChangeEventHandler" msprop:Generator_RowDeletedName="TBCW_PROF_DATA_SEARCHRowDeleted" msprop:Generator_RowClassName="TBCW_PROF_DATA_SEARCHRow" msprop:Generator_UserTableName="TBCW_PROF_DATA_SEARCH" msprop:Generator_RowEvArgName="TBCW_PROF_DATA_SEARCHRowChangeEvent">
           <xs:complexType>
             <xs:sequence>
               <xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msdata:AutoIncrementSeed="-1" msdata:AutoIncrementStep="-1" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
@@ -995,7 +999,7 @@ SELECT GUID, PROFILE_ID, WINDOW_ID, PROCESS_NAME, DESCRIPTION, REGEX, SEQUENCE,
             </xs:sequence>
           </xs:complexType>
         </xs:element>
-        <xs:element name="TBCW_PROF_DOC_SEARCH" msprop:Generator_TableClassName="TBCW_PROF_DOC_SEARCHDataTable" msprop:Generator_TableVarName="tableTBCW_PROF_DOC_SEARCH" msprop:Generator_TablePropName="TBCW_PROF_DOC_SEARCH" msprop:Generator_RowDeletingName="TBCW_PROF_DOC_SEARCHRowDeleting" msprop:Generator_RowChangingName="TBCW_PROF_DOC_SEARCHRowChanging" msprop:Generator_RowEvHandlerName="TBCW_PROF_DOC_SEARCHRowChangeEventHandler" msprop:Generator_RowDeletedName="TBCW_PROF_DOC_SEARCHRowDeleted" msprop:Generator_UserTableName="TBCW_PROF_DOC_SEARCH" msprop:Generator_RowChangedName="TBCW_PROF_DOC_SEARCHRowChanged" msprop:Generator_RowEvArgName="TBCW_PROF_DOC_SEARCHRowChangeEvent" msprop:Generator_RowClassName="TBCW_PROF_DOC_SEARCHRow">
+        <xs:element name="TBCW_PROF_DOC_SEARCH" msprop:Generator_TableClassName="TBCW_PROF_DOC_SEARCHDataTable" msprop:Generator_TableVarName="tableTBCW_PROF_DOC_SEARCH" msprop:Generator_RowChangedName="TBCW_PROF_DOC_SEARCHRowChanged" msprop:Generator_TablePropName="TBCW_PROF_DOC_SEARCH" msprop:Generator_RowDeletingName="TBCW_PROF_DOC_SEARCHRowDeleting" msprop:Generator_RowChangingName="TBCW_PROF_DOC_SEARCHRowChanging" msprop:Generator_RowEvHandlerName="TBCW_PROF_DOC_SEARCHRowChangeEventHandler" msprop:Generator_RowDeletedName="TBCW_PROF_DOC_SEARCHRowDeleted" msprop:Generator_RowClassName="TBCW_PROF_DOC_SEARCHRow" msprop:Generator_UserTableName="TBCW_PROF_DOC_SEARCH" msprop:Generator_RowEvArgName="TBCW_PROF_DOC_SEARCHRowChangeEvent">
           <xs:complexType>
             <xs:sequence>
               <xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msdata:AutoIncrementSeed="-1" msdata:AutoIncrementStep="-1" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
@@ -1043,7 +1047,7 @@ SELECT GUID, PROFILE_ID, WINDOW_ID, PROCESS_NAME, DESCRIPTION, REGEX, SEQUENCE,
             </xs:sequence>
           </xs:complexType>
         </xs:element>
-        <xs:element name="TBCW_GROUP_PROFILE" msprop:Generator_TableClassName="TBCW_GROUP_PROFILEDataTable" msprop:Generator_TableVarName="tableTBCW_GROUP_PROFILE" msprop:Generator_TablePropName="TBCW_GROUP_PROFILE" msprop:Generator_RowDeletingName="TBCW_GROUP_PROFILERowDeleting" msprop:Generator_RowChangingName="TBCW_GROUP_PROFILERowChanging" msprop:Generator_RowEvHandlerName="TBCW_GROUP_PROFILERowChangeEventHandler" msprop:Generator_RowDeletedName="TBCW_GROUP_PROFILERowDeleted" msprop:Generator_UserTableName="TBCW_GROUP_PROFILE" msprop:Generator_RowChangedName="TBCW_GROUP_PROFILERowChanged" msprop:Generator_RowEvArgName="TBCW_GROUP_PROFILERowChangeEvent" msprop:Generator_RowClassName="TBCW_GROUP_PROFILERow">
+        <xs:element name="TBCW_GROUP_PROFILE" msprop:Generator_TableClassName="TBCW_GROUP_PROFILEDataTable" msprop:Generator_TableVarName="tableTBCW_GROUP_PROFILE" msprop:Generator_RowChangedName="TBCW_GROUP_PROFILERowChanged" msprop:Generator_TablePropName="TBCW_GROUP_PROFILE" msprop:Generator_RowDeletingName="TBCW_GROUP_PROFILERowDeleting" msprop:Generator_RowChangingName="TBCW_GROUP_PROFILERowChanging" msprop:Generator_RowEvHandlerName="TBCW_GROUP_PROFILERowChangeEventHandler" msprop:Generator_RowDeletedName="TBCW_GROUP_PROFILERowDeleted" msprop:Generator_RowClassName="TBCW_GROUP_PROFILERow" msprop:Generator_UserTableName="TBCW_GROUP_PROFILE" msprop:Generator_RowEvArgName="TBCW_GROUP_PROFILERowChangeEvent">
           <xs:complexType>
             <xs:sequence>
               <xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msdata:AutoIncrementSeed="-1" msdata:AutoIncrementStep="-1" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
@@ -1060,7 +1064,7 @@ SELECT GUID, PROFILE_ID, WINDOW_ID, PROCESS_NAME, DESCRIPTION, REGEX, SEQUENCE,
             </xs:sequence>
           </xs:complexType>
         </xs:element>
-        <xs:element name="TBWH_GROUP" msprop:Generator_TableClassName="TBWH_GROUPDataTable" msprop:Generator_TableVarName="tableTBWH_GROUP" msprop:Generator_TablePropName="TBWH_GROUP" msprop:Generator_RowDeletingName="TBWH_GROUPRowDeleting" msprop:Generator_RowChangingName="TBWH_GROUPRowChanging" msprop:Generator_RowEvHandlerName="TBWH_GROUPRowChangeEventHandler" msprop:Generator_RowDeletedName="TBWH_GROUPRowDeleted" msprop:Generator_UserTableName="TBWH_GROUP" msprop:Generator_RowChangedName="TBWH_GROUPRowChanged" msprop:Generator_RowEvArgName="TBWH_GROUPRowChangeEvent" msprop:Generator_RowClassName="TBWH_GROUPRow">
+        <xs:element name="TBWH_GROUP" msprop:Generator_TableClassName="TBWH_GROUPDataTable" msprop:Generator_TableVarName="tableTBWH_GROUP" msprop:Generator_RowChangedName="TBWH_GROUPRowChanged" msprop:Generator_TablePropName="TBWH_GROUP" msprop:Generator_RowDeletingName="TBWH_GROUPRowDeleting" msprop:Generator_RowChangingName="TBWH_GROUPRowChanging" msprop:Generator_RowEvHandlerName="TBWH_GROUPRowChangeEventHandler" msprop:Generator_RowDeletedName="TBWH_GROUPRowDeleted" msprop:Generator_RowClassName="TBWH_GROUPRow" msprop:Generator_UserTableName="TBWH_GROUP" msprop:Generator_RowEvArgName="TBWH_GROUPRowChangeEvent">
           <xs:complexType>
             <xs:sequence>
               <xs:element name="ID" msprop:Generator_ColumnVarNameInTable="columnID" msprop:Generator_ColumnPropNameInRow="ID" msprop:Generator_ColumnPropNameInTable="IDColumn" msprop:Generator_UserColumnName="ID" type="xs:string" minOccurs="0" />
@@ -1068,7 +1072,7 @@ SELECT GUID, PROFILE_ID, WINDOW_ID, PROCESS_NAME, DESCRIPTION, REGEX, SEQUENCE,
             </xs:sequence>
           </xs:complexType>
         </xs:element>
-        <xs:element name="VWCW_GROUP_PROFILE" msprop:Generator_TableClassName="VWCW_GROUP_PROFILEDataTable" msprop:Generator_TableVarName="tableVWCW_GROUP_PROFILE" msprop:Generator_TablePropName="VWCW_GROUP_PROFILE" msprop:Generator_RowDeletingName="VWCW_GROUP_PROFILERowDeleting" msprop:Generator_RowChangingName="VWCW_GROUP_PROFILERowChanging" msprop:Generator_RowEvHandlerName="VWCW_GROUP_PROFILERowChangeEventHandler" msprop:Generator_RowDeletedName="VWCW_GROUP_PROFILERowDeleted" msprop:Generator_UserTableName="VWCW_GROUP_PROFILE" msprop:Generator_RowChangedName="VWCW_GROUP_PROFILERowChanged" msprop:Generator_RowEvArgName="VWCW_GROUP_PROFILERowChangeEvent" msprop:Generator_RowClassName="VWCW_GROUP_PROFILERow">
+        <xs:element name="VWCW_GROUP_PROFILE" msprop:Generator_TableClassName="VWCW_GROUP_PROFILEDataTable" msprop:Generator_TableVarName="tableVWCW_GROUP_PROFILE" msprop:Generator_RowChangedName="VWCW_GROUP_PROFILERowChanged" msprop:Generator_TablePropName="VWCW_GROUP_PROFILE" msprop:Generator_RowDeletingName="VWCW_GROUP_PROFILERowDeleting" msprop:Generator_RowChangingName="VWCW_GROUP_PROFILERowChanging" msprop:Generator_RowEvHandlerName="VWCW_GROUP_PROFILERowChangeEventHandler" msprop:Generator_RowDeletedName="VWCW_GROUP_PROFILERowDeleted" msprop:Generator_RowClassName="VWCW_GROUP_PROFILERow" msprop:Generator_UserTableName="VWCW_GROUP_PROFILE" msprop:Generator_RowEvArgName="VWCW_GROUP_PROFILERowChangeEvent">
           <xs:complexType>
             <xs:sequence>
               <xs:element name="GUID" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
@@ -1082,7 +1086,7 @@ SELECT GUID, PROFILE_ID, WINDOW_ID, PROCESS_NAME, DESCRIPTION, REGEX, SEQUENCE,
             </xs:sequence>
           </xs:complexType>
         </xs:element>
-        <xs:element name="TBWH_PROFILE_TYPE" msprop:Generator_TableClassName="TBWH_PROFILE_TYPEDataTable" msprop:Generator_TableVarName="tableTBWH_PROFILE_TYPE" msprop:Generator_RowChangedName="TBWH_PROFILE_TYPERowChanged" msprop:Generator_TablePropName="TBWH_PROFILE_TYPE" msprop:Generator_RowDeletingName="TBWH_PROFILE_TYPERowDeleting" msprop:Generator_RowChangingName="TBWH_PROFILE_TYPERowChanging" msprop:Generator_RowEvHandlerName="TBWH_PROFILE_TYPERowChangeEventHandler" msprop:Generator_RowDeletedName="TBWH_PROFILE_TYPERowDeleted" msprop:Generator_RowClassName="TBWH_PROFILE_TYPERow" msprop:Generator_UserTableName="TBWH_PROFILE_TYPE" msprop:Generator_RowEvArgName="TBWH_PROFILE_TYPERowChangeEvent">
+        <xs:element name="TBWH_PROFILE_TYPE" msprop:Generator_TableClassName="TBWH_PROFILE_TYPEDataTable" msprop:Generator_TableVarName="tableTBWH_PROFILE_TYPE" msprop:Generator_TablePropName="TBWH_PROFILE_TYPE" msprop:Generator_RowDeletingName="TBWH_PROFILE_TYPERowDeleting" msprop:Generator_RowChangingName="TBWH_PROFILE_TYPERowChanging" msprop:Generator_RowEvHandlerName="TBWH_PROFILE_TYPERowChangeEventHandler" msprop:Generator_RowDeletedName="TBWH_PROFILE_TYPERowDeleted" msprop:Generator_UserTableName="TBWH_PROFILE_TYPE" msprop:Generator_RowChangedName="TBWH_PROFILE_TYPERowChanged" msprop:Generator_RowEvArgName="TBWH_PROFILE_TYPERowChangeEvent" msprop:Generator_RowClassName="TBWH_PROFILE_TYPERow">
           <xs:complexType>
             <xs:sequence>
               <xs:element name="TYPE_ID" msprop:Generator_ColumnVarNameInTable="columnTYPE_ID" msprop:Generator_ColumnPropNameInRow="TYPE_ID" msprop:Generator_ColumnPropNameInTable="TYPE_IDColumn" msprop:Generator_UserColumnName="TYPE_ID" type="xs:short" default="0" />
@@ -1090,7 +1094,7 @@ SELECT GUID, PROFILE_ID, WINDOW_ID, PROCESS_NAME, DESCRIPTION, REGEX, SEQUENCE,
             </xs:sequence>
           </xs:complexType>
         </xs:element>
-        <xs:element name="TBCW_PROF_REL_WINDOW" msprop:Generator_TableClassName="TBCW_PROF_REL_WINDOWDataTable" msprop:Generator_TableVarName="tableTBCW_PROF_REL_WINDOW" msprop:Generator_RowChangedName="TBCW_PROF_REL_WINDOWRowChanged" msprop:Generator_TablePropName="TBCW_PROF_REL_WINDOW" msprop:Generator_RowDeletingName="TBCW_PROF_REL_WINDOWRowDeleting" msprop:Generator_RowChangingName="TBCW_PROF_REL_WINDOWRowChanging" msprop:Generator_RowEvHandlerName="TBCW_PROF_REL_WINDOWRowChangeEventHandler" msprop:Generator_RowDeletedName="TBCW_PROF_REL_WINDOWRowDeleted" msprop:Generator_RowClassName="TBCW_PROF_REL_WINDOWRow" msprop:Generator_UserTableName="TBCW_PROF_REL_WINDOW" msprop:Generator_RowEvArgName="TBCW_PROF_REL_WINDOWRowChangeEvent">
+        <xs:element name="TBCW_PROF_REL_WINDOW" msprop:Generator_TableClassName="TBCW_PROF_REL_WINDOWDataTable" msprop:Generator_TableVarName="tableTBCW_PROF_REL_WINDOW" msprop:Generator_TablePropName="TBCW_PROF_REL_WINDOW" msprop:Generator_RowDeletingName="TBCW_PROF_REL_WINDOWRowDeleting" msprop:Generator_RowChangingName="TBCW_PROF_REL_WINDOWRowChanging" msprop:Generator_RowEvHandlerName="TBCW_PROF_REL_WINDOWRowChangeEventHandler" msprop:Generator_RowDeletedName="TBCW_PROF_REL_WINDOWRowDeleted" msprop:Generator_UserTableName="TBCW_PROF_REL_WINDOW" msprop:Generator_RowChangedName="TBCW_PROF_REL_WINDOWRowChanged" msprop:Generator_RowEvArgName="TBCW_PROF_REL_WINDOWRowChangeEvent" msprop:Generator_RowClassName="TBCW_PROF_REL_WINDOWRow">
           <xs:complexType>
             <xs:sequence>
               <xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msdata:AutoIncrementSeed="-1" msdata:AutoIncrementStep="-1" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
@@ -1143,7 +1147,7 @@ SELECT GUID, PROFILE_ID, WINDOW_ID, PROCESS_NAME, DESCRIPTION, REGEX, SEQUENCE,
             </xs:sequence>
           </xs:complexType>
         </xs:element>
-        <xs:element name="TBDD_CONNECTION" msprop:Generator_TableClassName="TBDD_CONNECTIONDataTable" msprop:Generator_TableVarName="tableTBDD_CONNECTION" msprop:Generator_RowChangedName="TBDD_CONNECTIONRowChanged" msprop:Generator_TablePropName="TBDD_CONNECTION" msprop:Generator_RowDeletingName="TBDD_CONNECTIONRowDeleting" msprop:Generator_RowChangingName="TBDD_CONNECTIONRowChanging" msprop:Generator_RowEvHandlerName="TBDD_CONNECTIONRowChangeEventHandler" msprop:Generator_RowDeletedName="TBDD_CONNECTIONRowDeleted" msprop:Generator_RowClassName="TBDD_CONNECTIONRow" msprop:Generator_UserTableName="TBDD_CONNECTION" msprop:Generator_RowEvArgName="TBDD_CONNECTIONRowChangeEvent">
+        <xs:element name="TBDD_CONNECTION" msprop:Generator_TableClassName="TBDD_CONNECTIONDataTable" msprop:Generator_TableVarName="tableTBDD_CONNECTION" msprop:Generator_TablePropName="TBDD_CONNECTION" msprop:Generator_RowDeletingName="TBDD_CONNECTIONRowDeleting" msprop:Generator_RowChangingName="TBDD_CONNECTIONRowChanging" msprop:Generator_RowEvHandlerName="TBDD_CONNECTIONRowChangeEventHandler" msprop:Generator_RowDeletedName="TBDD_CONNECTIONRowDeleted" msprop:Generator_UserTableName="TBDD_CONNECTION" msprop:Generator_RowChangedName="TBDD_CONNECTIONRowChanged" msprop:Generator_RowEvArgName="TBDD_CONNECTIONRowChangeEvent" msprop:Generator_RowClassName="TBDD_CONNECTIONRow">
           <xs:complexType>
             <xs:sequence>
               <xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msdata:AutoIncrementSeed="-1" msdata:AutoIncrementStep="-1" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:short" />
@@ -1216,7 +1220,7 @@ SELECT GUID, PROFILE_ID, WINDOW_ID, PROCESS_NAME, DESCRIPTION, REGEX, SEQUENCE,
             </xs:sequence>
           </xs:complexType>
         </xs:element>
-        <xs:element name="TBCW_PROF_REL_CONTROL" msprop:Generator_TableClassName="TBCW_PROF_REL_CONTROLDataTable" msprop:Generator_TableVarName="tableTBCW_PROF_REL_CONTROL" msprop:Generator_TablePropName="TBCW_PROF_REL_CONTROL" msprop:Generator_RowDeletingName="TBCW_PROF_REL_CONTROLRowDeleting" msprop:Generator_RowChangingName="TBCW_PROF_REL_CONTROLRowChanging" msprop:Generator_RowEvHandlerName="TBCW_PROF_REL_CONTROLRowChangeEventHandler" msprop:Generator_RowDeletedName="TBCW_PROF_REL_CONTROLRowDeleted" msprop:Generator_UserTableName="TBCW_PROF_REL_CONTROL" msprop:Generator_RowChangedName="TBCW_PROF_REL_CONTROLRowChanged" msprop:Generator_RowEvArgName="TBCW_PROF_REL_CONTROLRowChangeEvent" msprop:Generator_RowClassName="TBCW_PROF_REL_CONTROLRow">
+        <xs:element name="TBCW_PROF_REL_CONTROL" msprop:Generator_TableClassName="TBCW_PROF_REL_CONTROLDataTable" msprop:Generator_TableVarName="tableTBCW_PROF_REL_CONTROL" msprop:Generator_RowChangedName="TBCW_PROF_REL_CONTROLRowChanged" msprop:Generator_TablePropName="TBCW_PROF_REL_CONTROL" msprop:Generator_RowDeletingName="TBCW_PROF_REL_CONTROLRowDeleting" msprop:Generator_RowChangingName="TBCW_PROF_REL_CONTROLRowChanging" msprop:Generator_RowEvHandlerName="TBCW_PROF_REL_CONTROLRowChangeEventHandler" msprop:Generator_RowDeletedName="TBCW_PROF_REL_CONTROLRowDeleted" msprop:Generator_RowClassName="TBCW_PROF_REL_CONTROLRow" msprop:Generator_UserTableName="TBCW_PROF_REL_CONTROL" msprop:Generator_RowEvArgName="TBCW_PROF_REL_CONTROLRowChangeEvent">
           <xs:complexType>
             <xs:sequence>
               <xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msdata:AutoIncrementSeed="-1" msdata:AutoIncrementStep="-1" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
@@ -1312,10 +1316,10 @@ SELECT GUID, PROFILE_ID, WINDOW_ID, PROCESS_NAME, DESCRIPTION, REGEX, SEQUENCE,
   </xs:element>
   <xs:annotation>
     <xs:appinfo>
-      <msdata:Relationship name="FK_TBCW_PROF_DATA_SEARCH_PROF_IF" msdata:parent="TBCW_PROFILES" msdata:child="TBCW_PROF_DATA_SEARCH" msdata:parentkey="GUID" msdata:childkey="PROFILE_ID" msprop:Generator_UserChildTable="TBCW_PROF_DATA_SEARCH" msprop:Generator_ChildPropName="GetTBCW_PROF_DATA_SEARCHRows" msprop:Generator_UserRelationName="FK_TBCW_PROF_DATA_SEARCH_PROF_IF" msprop:Generator_ParentPropName="TBCW_PROFILESRow" msprop:Generator_RelationVarName="relationFK_TBCW_PROF_DATA_SEARCH_PROF_IF" msprop:Generator_UserParentTable="TBCW_PROFILES" />
+      <msdata:Relationship name="FK_TBCW_PROF_DATA_SEARCH_PROF_IF" msdata:parent="TBCW_PROFILES" msdata:child="TBCW_PROF_DATA_SEARCH" msdata:parentkey="GUID" msdata:childkey="PROFILE_ID" msprop:Generator_UserChildTable="TBCW_PROF_DATA_SEARCH" msprop:Generator_ChildPropName="GetTBCW_PROF_DATA_SEARCHRows" msprop:Generator_UserRelationName="FK_TBCW_PROF_DATA_SEARCH_PROF_IF" msprop:Generator_RelationVarName="relationFK_TBCW_PROF_DATA_SEARCH_PROF_IF" msprop:Generator_UserParentTable="TBCW_PROFILES" msprop:Generator_ParentPropName="TBCW_PROFILESRow" />
-      <msdata:Relationship name="FK_TBCW_PROF_DOC_SEARCH_PROF_IF" msdata:parent="TBCW_PROFILES" msdata:child="TBCW_PROF_DOC_SEARCH" msdata:parentkey="GUID" msdata:childkey="PROFILE_ID" msprop:Generator_UserChildTable="TBCW_PROF_DOC_SEARCH" msprop:Generator_ChildPropName="GetTBCW_PROF_DOC_SEARCHRows" msprop:Generator_UserRelationName="FK_TBCW_PROF_DOC_SEARCH_PROF_IF" msprop:Generator_ParentPropName="TBCW_PROFILESRow" msprop:Generator_RelationVarName="relationFK_TBCW_PROF_DOC_SEARCH_PROF_IF" msprop:Generator_UserParentTable="TBCW_PROFILES" />
+      <msdata:Relationship name="FK_TBCW_PROF_DOC_SEARCH_PROF_IF" msdata:parent="TBCW_PROFILES" msdata:child="TBCW_PROF_DOC_SEARCH" msdata:parentkey="GUID" msdata:childkey="PROFILE_ID" msprop:Generator_UserChildTable="TBCW_PROF_DOC_SEARCH" msprop:Generator_ChildPropName="GetTBCW_PROF_DOC_SEARCHRows" msprop:Generator_UserRelationName="FK_TBCW_PROF_DOC_SEARCH_PROF_IF" msprop:Generator_RelationVarName="relationFK_TBCW_PROF_DOC_SEARCH_PROF_IF" msprop:Generator_UserParentTable="TBCW_PROFILES" msprop:Generator_ParentPropName="TBCW_PROFILESRow" />
-      <msdata:Relationship name="FK_TBCW_PROF_REL_CONTROL_PROF_ID" msdata:parent="TBCW_PROFILES" msdata:child="TBCW_PROF_REL_WINDOW" msdata:parentkey="GUID" msdata:childkey="PROFILE_ID" msprop:Generator_UserChildTable="TBCW_PROF_REL_WINDOW" msprop:Generator_ChildPropName="GetTBCW_PROF_REL_WINDOWRows" msprop:Generator_UserRelationName="FK_TBCW_PROF_REL_CONTROL_PROF_ID" msprop:Generator_RelationVarName="relationFK_TBCW_PROF_REL_CONTROL_PROF_ID" msprop:Generator_UserParentTable="TBCW_PROFILES" msprop:Generator_ParentPropName="TBCW_PROFILESRow" />
+      <msdata:Relationship name="FK_TBCW_PROF_REL_CONTROL_PROF_ID" msdata:parent="TBCW_PROFILES" msdata:child="TBCW_PROF_REL_WINDOW" msdata:parentkey="GUID" msdata:childkey="PROFILE_ID" msprop:Generator_UserChildTable="TBCW_PROF_REL_WINDOW" msprop:Generator_ChildPropName="GetTBCW_PROF_REL_WINDOWRows" msprop:Generator_UserRelationName="FK_TBCW_PROF_REL_CONTROL_PROF_ID" msprop:Generator_ParentPropName="TBCW_PROFILESRow" msprop:Generator_RelationVarName="relationFK_TBCW_PROF_REL_CONTROL_PROF_ID" msprop:Generator_UserParentTable="TBCW_PROFILES" />
-      <msdata:Relationship name="FK_TBCW_PROF_REL_CONTROL_PROF_IF" msdata:parent="TBCW_PROFILES" msdata:child="TBCW_PROF_REL_CONTROL" msdata:parentkey="GUID" msdata:childkey="PROFILE_ID" msprop:Generator_UserChildTable="TBCW_PROF_REL_CONTROL" msprop:Generator_ChildPropName="GetTBCW_PROF_REL_CONTROLRows" msprop:Generator_UserRelationName="FK_TBCW_PROF_REL_CONTROL_PROF_IF" msprop:Generator_ParentPropName="TBCW_PROFILESRow" msprop:Generator_RelationVarName="relationFK_TBCW_PROF_REL_CONTROL_PROF_IF" msprop:Generator_UserParentTable="TBCW_PROFILES" />
+      <msdata:Relationship name="FK_TBCW_PROF_REL_CONTROL_PROF_IF" msdata:parent="TBCW_PROFILES" msdata:child="TBCW_PROF_REL_CONTROL" msdata:parentkey="GUID" msdata:childkey="PROFILE_ID" msprop:Generator_UserChildTable="TBCW_PROF_REL_CONTROL" msprop:Generator_ChildPropName="GetTBCW_PROF_REL_CONTROLRows" msprop:Generator_UserRelationName="FK_TBCW_PROF_REL_CONTROL_PROF_IF" msprop:Generator_RelationVarName="relationFK_TBCW_PROF_REL_CONTROL_PROF_IF" msprop:Generator_UserParentTable="TBCW_PROFILES" msprop:Generator_ParentPropName="TBCW_PROFILESRow" />
     </xs:appinfo>
   </xs:annotation>
 </xs:schema>

app/DD_Clipboard_Searcher/MyDataset.xss

@@ -4,7 +4,7 @@
      Changes to this file may cause incorrect behavior and will be lost if
      the code is regenerated.
 </autogenerated>-->
-<DiagramLayout xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema" ex:showrelationlabel="False" ViewPortX="-5" ViewPortY="-54" xmlns:ex="urn:schemas-microsoft-com:xml-msdatasource-layout-extended" xmlns="urn:schemas-microsoft-com:xml-msdatasource-layout">
+<DiagramLayout xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema" ex:showrelationlabel="False" ViewPortX="-10" ViewPortY="-45" xmlns:ex="urn:schemas-microsoft-com:xml-msdatasource-layout-extended" xmlns="urn:schemas-microsoft-com:xml-msdatasource-layout">
   <Shapes>
     <Shape ID="DesignTable:TBCW_PROFILES" ZOrder="18" X="13" Y="-44" Height="286" Width="240" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="235" />
     <Shape ID="DesignTable:TBCW_USER_PROFILE" ZOrder="4" X="680" Y="299" Height="172" Width="271" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="121" />
@@ -16,10 +16,10 @@
     <Shape ID="DesignTable:VWCW_GROUP_PROFILE" ZOrder="9" X="1252" Y="5" Height="248" Width="218" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="159" />
     <Shape ID="DesignTable:TBCW_PROF_REL_WINDOW" ZOrder="7" X="10" Y="270" Height="286" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="235" />
     <Shape ID="DesignTable:TBDD_CONNECTION" ZOrder="3" X="675" Y="483" Height="305" Width="264" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="254" />
+    <Shape ID="DesignTable:TBCW_PROF_REL_CONTROL" ZOrder="2" X="328" Y="334" Height="286" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="235" />
     <Shape ID="DesignTable:TBWH_User" ZOrder="16" X="1221" Y="436" Height="124" Width="150" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="139" />
     <Shape ID="DesignTable:TBWH_GROUP" ZOrder="10" X="1240" Y="329" Height="67" Width="150" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="63" />
     <Shape ID="DesignTable:TBWH_PROFILE_TYPE" ZOrder="8" X="1204" Y="609" Height="67" Width="190" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="63" />
-    <Shape ID="DesignTable:TBCW_PROF_REL_CONTROL" ZOrder="2" X="328" Y="334" Height="286" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="235" />
   </Shapes>
   <Connectors>
     <Connector ID="DesignRelation:FK_TBCW_PROF_DATA_SEARCH_PROF_IF" ZOrder="13" LineWidth="11">

app/DD_Clipboard_Searcher/ctrlApplicationAssignment.Designer.vb

@@ -34,12 +34,17 @@ Partial Class ctrlApplicationAssignment
         Me.colREGEX = New DevExpress.XtraGrid.Columns.GridColumn()
         Me.RepositoryItemRegexEdit = New DevExpress.XtraEditors.Repository.RepositoryItemButtonEdit()
         Me.colREGEX_CLIPBOARD = New DevExpress.XtraGrid.Columns.GridColumn()
-        Me.colSEQUENCE = New DevExpress.XtraGrid.Columns.GridColumn()
         Me.RepositoryItemSpinEdit1 = New DevExpress.XtraEditors.Repository.RepositoryItemSpinEdit()
         Me.Label1 = New System.Windows.Forms.Label()
         Me.GridControl_Control = New DevExpress.XtraGrid.GridControl()
+        Me.TBCW_PROF_REL_CONTROLBindingSource = New System.Windows.Forms.BindingSource(Me.components)
         Me.GridView_Control = New DevExpress.XtraGrid.Views.Grid.GridView()
+        Me.colREGEX1 = New DevExpress.XtraGrid.Columns.GridColumn()
+        Me.RepositoryItemButtonEdit1 = New DevExpress.XtraEditors.Repository.RepositoryItemButtonEdit()
+        Me.colDESCRIPTION1 = New DevExpress.XtraGrid.Columns.GridColumn()
+        Me.colGUID1 = New DevExpress.XtraGrid.Columns.GridColumn()
         Me.Label2 = New System.Windows.Forms.Label()
+        Me.TBCW_PROF_DOC_SEARCHBindingSource = New System.Windows.Forms.BindingSource(Me.components)
         Me.GridControl3 = New DevExpress.XtraGrid.GridControl()
         Me.TBCW_PROFILE_PROCESSBindingSource = New System.Windows.Forms.BindingSource(Me.components)
         Me.GridViewProcessProfile = New DevExpress.XtraGrid.Views.Grid.GridView()
@@ -47,6 +52,9 @@ Partial Class ctrlApplicationAssignment
         Me.colPROC_NAME = New DevExpress.XtraGrid.Columns.GridColumn()
         Me.TBCW_PROFILE_PROCESSTableAdapter = New DD_Clipboard_Watcher.MyDatasetTableAdapters.TBCW_PROFILE_PROCESSTableAdapter()
         Me.TBCW_PROF_REL_WINDOWTableAdapter = New DD_Clipboard_Watcher.MyDatasetTableAdapters.TBCW_PROF_REL_WINDOWTableAdapter()
+        Me.TBCW_PROF_DOC_SEARCHTableAdapter = New DD_Clipboard_Watcher.MyDatasetTableAdapters.TBCW_PROF_DOC_SEARCHTableAdapter()
+        Me.TableAdapterManager = New DD_Clipboard_Watcher.MyDatasetTableAdapters.TableAdapterManager()
+        Me.TBCW_PROF_REL_CONTROLTableAdapter = New DD_Clipboard_Watcher.MyDatasetTableAdapters.TBCW_PROF_REL_CONTROLTableAdapter()
         CType(Me.SplitContainer3, System.ComponentModel.ISupportInitialize).BeginInit()
         Me.SplitContainer3.Panel1.SuspendLayout()
         Me.SplitContainer3.Panel2.SuspendLayout()
@@ -58,7 +66,10 @@ Partial Class ctrlApplicationAssignment
         CType(Me.RepositoryItemRegexEdit, System.ComponentModel.ISupportInitialize).BeginInit()
         CType(Me.RepositoryItemSpinEdit1, System.ComponentModel.ISupportInitialize).BeginInit()
         CType(Me.GridControl_Control, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.TBCW_PROF_REL_CONTROLBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
         CType(Me.GridView_Control, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.RepositoryItemButtonEdit1, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.TBCW_PROF_DOC_SEARCHBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
         CType(Me.GridControl3, System.ComponentModel.ISupportInitialize).BeginInit()
         CType(Me.TBCW_PROFILE_PROCESSBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
         CType(Me.GridViewProcessProfile, System.ComponentModel.ISupportInitialize).BeginInit()
@@ -111,7 +122,7 @@ Partial Class ctrlApplicationAssignment
         '
         Me.GridView_Window.Appearance.EvenRow.BackColor = System.Drawing.Color.FromArgb(CType(CType(192, Byte), Integer), CType(CType(255, Byte), Integer), CType(CType(255, Byte), Integer))
         Me.GridView_Window.Appearance.EvenRow.Options.UseBackColor = True
-        Me.GridView_Window.Columns.AddRange(New DevExpress.XtraGrid.Columns.GridColumn() {Me.colPROCESS_NAME, Me.colGUID, Me.colDESCRIPTION, Me.colREGEX, Me.colREGEX_CLIPBOARD, Me.colSEQUENCE})
+        Me.GridView_Window.Columns.AddRange(New DevExpress.XtraGrid.Columns.GridColumn() {Me.colPROCESS_NAME, Me.colGUID, Me.colDESCRIPTION, Me.colREGEX, Me.colREGEX_CLIPBOARD})
         Me.GridView_Window.GridControl = Me.GridControl_Window
         Me.GridView_Window.Name = "GridView_Window"
         Me.GridView_Window.OptionsView.EnableAppearanceEvenRow = True
@@ -159,15 +170,6 @@ Partial Class ctrlApplicationAssignment
         Me.colREGEX_CLIPBOARD.Visible = True
         Me.colREGEX_CLIPBOARD.VisibleIndex = 2
         '
-        'colSEQUENCE
-        '
-        Me.colSEQUENCE.Caption = "Anordnung"
-        Me.colSEQUENCE.ColumnEdit = Me.RepositoryItemSpinEdit1
-        Me.colSEQUENCE.FieldName = "SEQUENCE"
-        Me.colSEQUENCE.Name = "colSEQUENCE"
-        Me.colSEQUENCE.Visible = True
-        Me.colSEQUENCE.VisibleIndex = 3
-        '
         'RepositoryItemSpinEdit1
         '
         Me.RepositoryItemSpinEdit1.AutoHeight = False
@@ -187,23 +189,60 @@ Partial Class ctrlApplicationAssignment
         '
         'GridControl_Control
         '
+        Me.GridControl_Control.DataSource = Me.TBCW_PROF_REL_CONTROLBindingSource
         Me.GridControl_Control.Dock = System.Windows.Forms.DockStyle.Fill
-        Me.GridControl_Control.Enabled = False
         Me.GridControl_Control.Location = New System.Drawing.Point(0, 25)
         Me.GridControl_Control.MainView = Me.GridView_Control
         Me.GridControl_Control.Name = "GridControl_Control"
+        Me.GridControl_Control.RepositoryItems.AddRange(New DevExpress.XtraEditors.Repository.RepositoryItem() {Me.RepositoryItemButtonEdit1})
         Me.GridControl_Control.Size = New System.Drawing.Size(915, 302)
         Me.GridControl_Control.TabIndex = 69
         Me.GridControl_Control.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridView_Control})
         '
+        'TBCW_PROF_REL_CONTROLBindingSource
+        '
+        Me.TBCW_PROF_REL_CONTROLBindingSource.DataMember = "TBCW_PROF_REL_CONTROL"
+        Me.TBCW_PROF_REL_CONTROLBindingSource.DataSource = Me.MyDataset
+        '
         'GridView_Control
         '
         Me.GridView_Control.Appearance.EvenRow.BackColor = System.Drawing.Color.FromArgb(CType(CType(192, Byte), Integer), CType(CType(255, Byte), Integer), CType(CType(255, Byte), Integer))
         Me.GridView_Control.Appearance.EvenRow.Options.UseBackColor = True
+        Me.GridView_Control.Columns.AddRange(New DevExpress.XtraGrid.Columns.GridColumn() {Me.colREGEX1, Me.colDESCRIPTION1, Me.colGUID1})
+        Me.GridView_Control.CustomizationFormBounds = New System.Drawing.Rectangle(902, 520, 252, 236)
         Me.GridView_Control.GridControl = Me.GridControl_Control
         Me.GridView_Control.Name = "GridView_Control"
         Me.GridView_Control.OptionsView.EnableAppearanceEvenRow = True
         '
+        'colREGEX1
+        '
+        Me.colREGEX1.Caption = "Feld Name Regex"
+        Me.colREGEX1.ColumnEdit = Me.RepositoryItemButtonEdit1
+        Me.colREGEX1.FieldName = "REGEX"
+        Me.colREGEX1.Name = "colREGEX1"
+        Me.colREGEX1.Visible = True
+        Me.colREGEX1.VisibleIndex = 0
+        '
+        'RepositoryItemButtonEdit1
+        '
+        Me.RepositoryItemButtonEdit1.AutoHeight = False
+        Me.RepositoryItemButtonEdit1.Buttons.AddRange(New DevExpress.XtraEditors.Controls.EditorButton() {New DevExpress.XtraEditors.Controls.EditorButton()})
+        Me.RepositoryItemButtonEdit1.Name = "RepositoryItemButtonEdit1"
+        '
+        'colDESCRIPTION1
+        '
+        Me.colDESCRIPTION1.Caption = "Beschreibung"
+        Me.colDESCRIPTION1.FieldName = "DESCRIPTION"
+        Me.colDESCRIPTION1.Name = "colDESCRIPTION1"
+        Me.colDESCRIPTION1.Visible = True
+        Me.colDESCRIPTION1.VisibleIndex = 1
+        '
+        'colGUID1
+        '
+        Me.colGUID1.Caption = "GUID"
+        Me.colGUID1.FieldName = "GUID"
+        Me.colGUID1.Name = "colGUID1"
+        '
         'Label2
         '
         Me.Label2.Dock = System.Windows.Forms.DockStyle.Top
@@ -215,6 +254,11 @@ Partial Class ctrlApplicationAssignment
         Me.Label2.Text = "Zugeordnete Felder:"
         Me.Label2.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
         '
+        'TBCW_PROF_DOC_SEARCHBindingSource
+        '
+        Me.TBCW_PROF_DOC_SEARCHBindingSource.DataMember = "TBCW_PROF_DOC_SEARCH"
+        Me.TBCW_PROF_DOC_SEARCHBindingSource.DataSource = Me.MyDataset
+        '
         'GridControl3
         '
         Me.GridControl3.DataSource = Me.TBCW_PROFILE_PROCESSBindingSource
@@ -271,6 +315,28 @@ Partial Class ctrlApplicationAssignment
         '
         Me.TBCW_PROF_REL_WINDOWTableAdapter.ClearBeforeFill = True
         '
+        'TBCW_PROF_DOC_SEARCHTableAdapter
+        '
+        Me.TBCW_PROF_DOC_SEARCHTableAdapter.ClearBeforeFill = True
+        '
+        'TableAdapterManager
+        '
+        Me.TableAdapterManager.BackupDataSetBeforeUpdate = False
+        Me.TableAdapterManager.TBCW_GROUP_PROFILETableAdapter = Nothing
+        Me.TableAdapterManager.TBCW_PROF_DATA_SEARCHTableAdapter = Nothing
+        Me.TableAdapterManager.TBCW_PROF_DOC_SEARCHTableAdapter = Me.TBCW_PROF_DOC_SEARCHTableAdapter
+        Me.TableAdapterManager.TBCW_PROF_REL_CONTROLTableAdapter = Nothing
+        Me.TableAdapterManager.TBCW_PROF_REL_WINDOWTableAdapter = Me.TBCW_PROF_REL_WINDOWTableAdapter
+        Me.TableAdapterManager.TBCW_PROFILE_PROCESSTableAdapter = Me.TBCW_PROFILE_PROCESSTableAdapter
+        Me.TableAdapterManager.TBCW_PROFILESTableAdapter = Nothing
+        Me.TableAdapterManager.TBCW_USER_PROFILETableAdapter = Nothing
+        Me.TableAdapterManager.TBDD_CONNECTIONTableAdapter = Nothing
+        Me.TableAdapterManager.UpdateOrder = DD_Clipboard_Watcher.MyDatasetTableAdapters.TableAdapterManager.UpdateOrderOption.InsertUpdateDelete
+        '
+        'TBCW_PROF_REL_CONTROLTableAdapter
+        '
+        Me.TBCW_PROF_REL_CONTROLTableAdapter.ClearBeforeFill = True
+        '
         'ctrlApplicationAssignment
         '
         Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
@@ -290,7 +356,10 @@ Partial Class ctrlApplicationAssignment
         CType(Me.RepositoryItemRegexEdit, System.ComponentModel.ISupportInitialize).EndInit()
         CType(Me.RepositoryItemSpinEdit1, System.ComponentModel.ISupportInitialize).EndInit()
         CType(Me.GridControl_Control, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.TBCW_PROF_REL_CONTROLBindingSource, System.ComponentModel.ISupportInitialize).EndInit()
         CType(Me.GridView_Control, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.RepositoryItemButtonEdit1, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.TBCW_PROF_DOC_SEARCHBindingSource, System.ComponentModel.ISupportInitialize).EndInit()
         CType(Me.GridControl3, System.ComponentModel.ISupportInitialize).EndInit()
         CType(Me.TBCW_PROFILE_PROCESSBindingSource, System.ComponentModel.ISupportInitialize).EndInit()
         CType(Me.GridViewProcessProfile, System.ComponentModel.ISupportInitialize).EndInit()
@@ -302,7 +371,6 @@ Partial Class ctrlApplicationAssignment
     Friend WithEvents GridControl_Window As DevExpress.XtraGrid.GridControl
     Friend WithEvents GridView_Window As DevExpress.XtraGrid.Views.Grid.GridView
     Friend WithEvents colPROCESS_NAME As DevExpress.XtraGrid.Columns.GridColumn
-    Friend WithEvents colSEQUENCE As DevExpress.XtraGrid.Columns.GridColumn
     Friend WithEvents colDESCRIPTION As DevExpress.XtraGrid.Columns.GridColumn
     Friend WithEvents colREGEX As DevExpress.XtraGrid.Columns.GridColumn
     Friend WithEvents colREGEX_CLIPBOARD As DevExpress.XtraGrid.Columns.GridColumn
@@ -322,4 +390,14 @@ Partial Class ctrlApplicationAssignment
     Friend WithEvents RepositoryItemSpinEdit1 As DevExpress.XtraEditors.Repository.RepositoryItemSpinEdit
     Friend WithEvents Label1 As Label
     Friend WithEvents Label2 As Label
+    Friend WithEvents TBCW_PROF_DOC_SEARCHBindingSource As BindingSource
+    Friend WithEvents TBCW_PROF_DOC_SEARCHTableAdapter As MyDatasetTableAdapters.TBCW_PROF_DOC_SEARCHTableAdapter
+    Friend WithEvents TableAdapterManager As MyDatasetTableAdapters.TableAdapterManager
+    Friend WithEvents TBCW_PROF_REL_CONTROLBindingSource As BindingSource
+    Friend WithEvents TBCW_PROF_REL_CONTROLTableAdapter As MyDatasetTableAdapters.TBCW_PROF_REL_CONTROLTableAdapter
+    Friend WithEvents colDESCRIPTION1 As DevExpress.XtraGrid.Columns.GridColumn
+    Friend WithEvents colREGEX1 As DevExpress.XtraGrid.Columns.GridColumn
+    Friend WithEvents RepositoryItemRegexEdit2 As DevExpress.XtraEditors.Repository.RepositoryItemButtonEdit
+    Friend WithEvents RepositoryItemButtonEdit1 As DevExpress.XtraEditors.Repository.RepositoryItemButtonEdit
+    Friend WithEvents colGUID1 As DevExpress.XtraGrid.Columns.GridColumn
 End Class

app/DD_Clipboard_Searcher/ctrlApplicationAssignment.resx

@@ -123,6 +123,12 @@
   <metadata name="MyDataset.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
     <value>558, 12</value>
   </metadata>
+  <metadata name="TBCW_PROF_REL_CONTROLBindingSource.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
+    <value>741, 56</value>
+  </metadata>
+  <metadata name="TBCW_PROF_DOC_SEARCHBindingSource.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
+    <value>17, 56</value>
+  </metadata>
   <metadata name="TBCW_PROFILE_PROCESSBindingSource.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
     <value>20, 10</value>
   </metadata>
@@ -132,6 +138,15 @@
   <metadata name="TBCW_PROF_REL_WINDOWTableAdapter.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
     <value>703, 18</value>
   </metadata>
+  <metadata name="TBCW_PROF_DOC_SEARCHTableAdapter.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
+    <value>295, 56</value>
+  </metadata>
+  <metadata name="TableAdapterManager.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
+    <value>568, 56</value>
+  </metadata>
+  <metadata name="TBCW_PROF_REL_CONTROLTableAdapter.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
+    <value>1024, 56</value>
+  </metadata>
   <metadata name="$this.TrayHeight" type="System.Int32, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
     <value>112</value>
   </metadata>

app/DD_Clipboard_Searcher/ctrlApplicationAssignment.vb

@@ -8,13 +8,16 @@ Imports DigitalData.Controls.RegexEditor
 Public Class ctrlApplicationAssignment
 
     Private Current_ProfileId As Integer
+    Private Current_WindowId As Integer
     Private Current_ProcessName As String
 
     Private Sub ctrlApplicationAssignment_Load(sender As Object, e As EventArgs) Handles Me.Load
         TBCW_PROFILE_PROCESSTableAdapter.Connection.ConnectionString = MyConnectionString
         TBCW_PROF_REL_WINDOWTableAdapter.Connection.ConnectionString = MyConnectionString
+        TBCW_PROF_REL_CONTROLTableAdapter.Connection.ConnectionString = MyConnectionString
 
         AddHandler RepositoryItemRegexEdit.ButtonClick, AddressOf RepositoryItemRegexEdit_Click
+        AddHandler RepositoryItemButtonEdit1.ButtonClick, AddressOf RepositoryItemRegexEdit_Click
     End Sub
 
     Public Function Process_Load(ProfileId As Integer) As Boolean
@@ -156,7 +159,18 @@ Public Class ctrlApplicationAssignment
         End Try
     End Function
 
-    Public Function Control_CreateAssignment(ProfileId As Integer, WindowId As Integer)
+    Public Function Control_Load() As Boolean
+        Try
+            TBCW_PROF_REL_CONTROLTableAdapter.Fill(MyDataset.TBCW_PROF_REL_CONTROL, Current_ProcessName, Current_WindowId, Current_ProfileId)
+
+            Return True
+        Catch ex As Exception
+            Logger.Error(ex)
+            Return False
+        End Try
+    End Function
+
+    Public Function Control_CreateAssignment(ProfileId As Integer) As Boolean
         Dim oForm As New frmControlCapture()
         Dim oResult = oForm.ShowDialog()
 
@@ -166,21 +180,55 @@ Public Class ctrlApplicationAssignment
                 Dim oProcessName As String = oForm.ProcessName
 
                 If oControlTitle <> "" Then
-                    Dim insert = String.Format("INSERT INTO TBCW_PROF_REL_CONTROL (PROFILE_ID, DESCRIPTION, PROCESS_NAME, REGEX, ADDED_WHO) VALUES ({0}, '{1}', '{2}','^{3}$','{4}')", ProfileId, oProcessName, oProcessName, oControlTitle, Environment.UserName)
+                    Dim insert = String.Format("INSERT INTO TBCW_PROF_REL_CONTROL (PROFILE_ID, DESCRIPTION, PROCESS_NAME, REGEX, WINDOW_ID, ADDED_WHO) VALUES ({0}, '{1}', '{2}','^{3}$',{4},'{5}')", ProfileId, Current_ProcessName, Current_ProcessName, oControlTitle, Current_WindowId, Environment.UserName)
                     If Database.ExecuteNonQuery(insert) = False Then
                         Return False
                     End If
                 End If
 
-                Window_Load()
+                Control_Load()
                 Return True
             Catch ex As Exception
                 Logger.Error(ex)
                 Return False
             End Try
+        Else
+            Return True
         End If
     End Function
 
+    Public Function Control_SaveAssignment() As Boolean
+        Try
+            GridView_Control.CloseEditor()
+            TBCW_PROF_REL_CONTROLBindingSource.EndEdit()
+            If Not IsNothing(MyDataset.TBCW_PROF_REL_CONTROL.GetChanges) Then
+                TBCW_PROF_REL_CONTROLBindingSource.EndEdit()
+                TBCW_PROF_REL_CONTROLTableAdapter.Update(MyDataset.TBCW_PROF_REL_CONTROL)
+            End If
+
+            Return True
+        Catch ex As Exception
+            Logger.Error(ex)
+            Return False
+        End Try
+    End Function
+
+    Public Function Control_DeleteAssignment() As Boolean
+        Try
+            Dim oGuid = GridView_Control.GetFocusedRowCellValue(GridView_Control.Columns("GUID"))
+            Dim oSQL = String.Format("DELETE FROM TBCW_PROF_REL_CONTROL WHERE GUID = {0}", oGuid)
+            If Database.ExecuteNonQuery(oSQL) Then
+                Window_Load()
+                Return True
+            End If
+
+            Return False
+        Catch ex As Exception
+            Logger.Error(ex)
+            Return False
+        End Try
+    End Function
+
     Private Sub GridViewProcessProfile_FocusedRowChanged(sender As Object, e As DevExpress.XtraGrid.Views.Base.FocusedRowChangedEventArgs) Handles GridViewProcessProfile.FocusedRowChanged
         If e.FocusedRowHandle < 0 Then
             Exit Sub
@@ -201,6 +249,17 @@ Public Class ctrlApplicationAssignment
             Replace(vbNullChar, "")
     End Function
 
+    Private Sub GridView_Window_FocusedRowChanged(sender As Object, e As Views.Base.FocusedRowChangedEventArgs) Handles GridView_Window.FocusedRowChanged
+        If e.FocusedRowHandle < 0 Then
+            Exit Sub
+        End If
 
+        Dim oSelectedRow As DataRow = GridViewProcessProfile.GetDataRow(e.FocusedRowHandle)
+        Dim oWindowId As String = oSelectedRow.Item("GUID")
+        Current_WindowId = oWindowId
 
+        If Control_Load() = False Then
+            MsgBox($"Error while loading controls for window {oWindowId}", vbCritical, "")
+        End If
+    End Sub
 End Class

app/DD_Clipboard_Searcher/frmAdministration.resx

@@ -668,48 +668,84 @@
   </data>
   <data name="BarButtonItem23.ImageOptions.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
     <value>
-        iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
+        iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m
-        YQUAAAAZdEVYdFNvZnR3YXJlAEFkb2JlIEltYWdlUmVhZHlxyWU8AAAALHRFWHRUaXRsZQBOZXh0O0Rv
+        dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAAsdEVYdFRpdGxlAE5leHQ7RG91YmxlO0Fycm93O0Zh
-        dWJsZTtBcnJvdztGYXN0O1Jld2luZDtJbmNyZWFzZcl3QB8AAAB/SURBVDhPtZDBDYAwDAO7YNdhAJZg
+        c3Q7UmV3aW5kO0luY3JlYXNlyXdAHwAAAH9JREFUOE+1kMENgDAMA7tg12EAlmAE/rzYLjQWQiVcIR8e
-        BP682C40FkIlXCEfHudKlm1FLWZW6rxXf3vIIyQtbLFAHiE5w7cCeYSkC18F8ghJCKvQ2KIXy85oQIXG
+        50qWbUUtZlbqvFd/e8gjJC1ssUAeITnDtwJ5hKQLXwXyCEkIq9DYohfLzmhAhcZjZFqX9IDzecnXgPM6
-        Y2Ral/SA83nJ14DzOvLrBamPHA2kyg4NKEgeIaEgeYSEgpmyI6FgpuygmcfKAXuxrY4cCR8rAAAAAElF
+        8usFqY8cDaTKDg0oSB4hoSB5hISCmbIjoWCm7KCZx8oBe7GtjhwJHysAAAAASUVORK5CYII=
-        TkSuQmCC
 </value>
   </data>
   <data name="BarButtonItem23.ImageOptions.LargeImage" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
     <value>
-        iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
+        iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m
-        YQUAAAAZdEVYdFNvZnR3YXJlAEFkb2JlIEltYWdlUmVhZHlxyWU8AAAALHRFWHRUaXRsZQBOZXh0O0Rv
+        dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAAsdEVYdFRpdGxlAE5leHQ7RG91YmxlO0Fycm93O0Zh
-        dWJsZTtBcnJvdztGYXN0O1Jld2luZDtJbmNyZWFzZcl3QB8AAAD6SURBVFhHxZLBDYMwEARpkHZSQJpI
+        c3Q7UmV3aW5kO0luY3JlYXNlyXdAHwAAAPpJREFUWEfFksENgzAQBGmQdlJAmkgJ+eeV7hwfCpJtBpbD
-        Cfnnle4cHwqSbQaWwyfzGKHMit0TypRSuhWUI0E5P78pM1NmqNwDyv/A7ojKPaAsBnBE5R5QNgObEZV7
+        J/MYocyK3RPKlFK6FZQjQTk/vykzU2ao3APK/8DuiMo9oCwGcETlHlA2A5sRlXtACQPVCGRV7gEllK8s
-        QAkD1QhkVe4BJZSvLCP5+Wl8lXtACcUlcybsCJRQ2hJ2BEooJEKOQAlle3QfgRKKjug6AiWUKOQRj/cL
+        I/n5aXyVe0AJxSVzJuwIlFDaEnYESigkQo5ACWV7dB+BEoqO6DoCJZQo5BGP9wu3UELBGS59iY0w4OWz
-        t1BCwRkufYmNMODls7iPqH6swItnuPULXP4jooSCIy6PGyihZI+ucQMlFBHd4wZKKGsJGTdQQmFJ2LiB
+        uI+ofqzAi2e49Qtc/iOihIIjLo8bKKFkj65xAyUUEd3jBkooawkZN1BCYUnYuIESSleW8vwMGTdQQnFV
-        EkpXlvL8DBk3UEJxVQ5ZlXtAqcpV7gGlKle5B5SqXOUeUKryqHED5UhQjgTlONL0A0h+ATgx7MVAAAAA
+        DlmVe0CpylXuAaUqV7kHlKpc5R5QqvKocQPlSFCOBOU40vQDSH4BODHsxUAAAAAASUVORK5CYII=
-        AElFTkSuQmCC
 </value>
   </data>
   <data name="BarButtonItem24.ImageOptions.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
     <value>
-        iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
+        iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m
-        YQUAAAAZdEVYdFNvZnR3YXJlAEFkb2JlIEltYWdlUmVhZHlxyWU8AAAAI3RFWHRUaXRsZQBDYW5jZWw7
+        dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAAjdEVYdFRpdGxlAENhbmNlbDtTdG9wO0V4aXQ7QmFy
-        U3RvcDtFeGl0O0JhcnM7UmliYm9uO0yWlrIAAADCSURBVDhPjZNLCgIxEERzOGFWegkvIH4QRhyv6UkU
+        cztSaWJib247TJaWsgAAAMJJREFUOE+Nk0sKAjEQRHM4YVZ6CS8gfhBGHK/pSRRXbRWkJOlOq4sHSf0Y
-        V20VpCTpTquLB0n9GAZSzKzct6s1mHn+B2Qv7PCs8gsYuPqwB5lbzbKzoXCqgkhH4Kks9jLOzggj0Hz5
+        BlLMrNy3qzWYef4HZC/s8KzyCxi4+rAHmVvNsrOhcKqCSEfgqSz2Ms7OCCPQfPlIvQ2kIzgPy+QzUIN+
-        SL0NpCM4D8vkM1CDfmQBaZl0AwQBP9LSlUl3EQiORkKZBIEg7D+bLKNsEBAclUUY6S4I+PIBhB/bdr6W
+        ZAFpmXQDBAE/0tKVSXcRCI5GQpkEgSDsP5sso2wQEByVRRjpLgj48gGEH9t2vpYbLx35WRbQhiM0+DBa
-        Gy8d+VkW0IYjNPgwWiOUBTw/MlOcwKMKaVkgo5EnmCRyZOfDGcjyAU5mVt7SQJzMJkqbYgAAAABJRU5E
+        I5QFPD8yU5zAowppWSCjkSeYJHJk58MZyPIBTmZW3tJAnMwmSptiAAAAAElFTkSuQmCC
-        rkJggg==
 </value>
   </data>
   <data name="BarButtonItem24.ImageOptions.LargeImage" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
     <value>
-        iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
+        iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m
-        YQUAAAAZdEVYdFNvZnR3YXJlAEFkb2JlIEltYWdlUmVhZHlxyWU8AAAAI3RFWHRUaXRsZQBDYW5jZWw7
+        dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAAjdEVYdFRpdGxlAENhbmNlbDtTdG9wO0V4aXQ7QmFy
-        U3RvcDtFeGl0O0JhcnM7UmliYm9uO0yWlrIAAAFuSURBVFhHxZZNSgQxFIRn5gIOeiU3LhxBj+BRRRTF
+        cztSaWJib247TJaWsgAAAW5JREFUWEfFlk1KBDEUhGfmAg56JTcuHEGP4FFFFMVZz1VcxaomD57pek1e
-        Wc9VXMWqJg+e6XpNXoS4+BYpUj/Q3dC7Usq/IsWZSHEmUpyJFC/Pt3+iyTr4c4sUa9AVeAF39dyNy7kH
+        hLj4FilSP9Dd0LtSyr8ixZlIcSZSnIkUL8+3f6LJOvhzixRr0BV4AXf13I3LuQev4OjzPVKEgeUfoIBv
-        r+Do8z1ShIHlH6CAb5AaUTNYTi8zPoEcsRJw8QC4mkYjO8KXG8zct32/DgYuPoE2oHeEKuf5QXWtBILL
+        kBpRM1hOLzM+gRyxEnDxALiaRiM7wpcbzNy3fb8OBi4+gTagd4Qq5/lBda0EgsvksRrboK0RqXIiRRiM
-        5LEa26CtEalyIkUYjMyIdDmRIkyenhFD5USKMLZsjRguJ1KEWRGNGC4nUkRAhBrhSZUTKSJki2jEUg5k
+        zIh0OZEiTJ6eEUPlRIowtmyNGC4nUoRZEY0YLidSRECEGuFJlRMpImSLaMRSDmRmhBQZsoF65jZgeTFV
-        ZoQUGbKBeuY2YHkxVWaEFBkSEJUbywiVGSFFhCiit11p3SOkiIDecj7z8BNV2S1ShLm33O4Mj5AijJly
+        ZoQUGRIQlRvLCJUZIUWEKKK3XWndI6SIgN5yPvPwE1XZLVKEubfc7gyPkCKMmXJjaIQUYSJR+Qn4Yk96
-        Y2iEFGEiUfkJ+GJPeoQUYRgpN1IjVgIu7sFbNfqAnnJDjXgH3T8k1+CrGrPlluFHnMFN20NWAsFlwhFc
+        hBRhGCk3UiNWAi7uwVs1+oCeckONeAfdPyTX4Ksas+WW4UecwU3bQ1YCwWXCEVydKicuhyOYIcuJFC0I
-        nSonLocjmCHLiRQtCPD/0J+7aLLyv+UzkeJMpDgTKc6j7H4AaYUNY+IvplgAAAAASUVORK5CYII=
+        8P/Qn7tosvK/5TOR4kykOBMpzqPsfgBphQ1j4i+mWAAAAABJRU5ErkJggg==
+</value>
+  </data>
+  <data name="BarButtonItem25.ImageOptions.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m
+        dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAALdEVYdFRpdGxlAFNhdmU7+ej5CQAAAFhJREFUOE9j
+        +P//P0UYTEzOWr8XiP+DMJQPZqNjNLm9ID7MAFyKUMTQ5UB8+hgAw9jUYjUAH0ZXiyFICqa+ASA2MXjU
+        ADwGkIqRDdiOLkkE3g43gHz8nwEAvq7TCya3G6wAAAAASUVORK5CYII=
+</value>
+  </data>
+  <data name="BarButtonItem25.ImageOptions.LargeImage" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m
+        dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAALdEVYdFRpdGxlAFNhdmU7+ej5CQAAAQ1JREFUWEft
+        l9EJwzAMRLNZoF+Zpet0kM7RPQIZw9WJ2JyF5CbQOATy8cCVjqcjfx1SSqfiDnviDntS/Xg936PwERKB
+        OcO7JquTZ3CPfNMWWCic4eNW2GR12vnCN20BGwZ8PMoA3bMncmKeKQ/ghQUVE14G6J49kRPzTHkALyyo
+        mPAyQPfsiZyYZ8oDeGFBxYSXAbpnT+TEPFMewAsLKia8DNA9eyIn5pnyAF5YUDHhZVwiZ74HLlmgCfsi
+        J+9/ho+Ab94FWgUeAma7YB954dpdoBJvhX2M7O4Cd4G7wPUKTEIl3wL7yAvX7gKHwTdtgdmGD2Dmm7YA
+        PpX33+BfwD3xzarAGbjDnrjDfqThC1oLalOREus2AAAAAElFTkSuQmCC
+</value>
+  </data>
+  <data name="BarButtonItem26.ImageOptions.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m
+        dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAAldEVYdFRpdGxlAENvcHk7QmFycztSaWJib247U3Rh
+        bmRhcmQ7Q2xvbmVtDt9bAAAAb0lEQVQ4T+2OwQ2AIBAE6ckW700HlOaXIny4cgbIokE5w9NNJhC4HXAA
+        GkQEHfa8LjzflBUd6kXvvPcrS8yClI0ltfREjFGLt3PtDr0aQqiSEpNAc5WYBExJ3r8LOL9gkoBJ+fSD
+        s1OYJxiFywDcAUEvVDi/LQTFAAAAAElFTkSuQmCC
+</value>
+  </data>
+  <data name="BarButtonItem26.ImageOptions.LargeImage" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m
+        dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAAldEVYdFRpdGxlAENvcHk7QmFycztSaWJib247U3Rh
+        bmRhcmQ7Q2xvbmVtDt9bAAAA50lEQVRYR+2TwQqDMAyGfT6fq1dRevfJxFNhD7EdsvysgukSp1vtBusH
+        P5K0id9BGyL6atRmyajNNM45OpjAaTmYfcp6tyis8BA/9oP7XdfdxnFsuUx3iVoUVt4RmOdZlSgmADSJ
+        ogIgldgUwOCReO9pmiYeleBsTZS4QoLPxDtFkQ6+Avf7vqcQQuw80PYsEnwmvomPBbA4lUB/Ixe+kk8A
+        aBIWcSavANgrcZoA2CNxqgBYJLS/A2QXsDIMQ7wlwRmTR2ALa1cVqAJVoAr8l4AVpowAI/ZrEUUV+AmB
+        nFnvtqI2y4WaO7s+m1CnlB8XAAAAAElFTkSuQmCC
 </value>
   </data>
   <metadata name="TBWH_PROFILE_TYPEBindingSource.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
@@ -728,6 +764,14 @@
   <metadata name="TBDD_CONNECTIONBindingSource.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
     <value>1149, 134</value>
   </metadata>
+  <data name="TabPageDocuments.ImageOptions.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m
+        dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAAWdEVYdFRpdGxlAFRleHQ7UGFnZTtSZXBvcnR2YWEA
+        AAAAVUlEQVQ4T2P4//8/RRjOaGlp+Y8H/4PSxsiaQRjFAHwAJN/X13cX3RCSDACCX+iGkGQAMgYC0gxA
+        BngN8G3agReDwKgLaO0CYgDtDCAFYxhAHv7PAAC6Jy+iz67OxwAAAABJRU5ErkJggg==
+</value>
+  </data>
   <data name="TabPageData.ImageOptions.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
     <value>
         iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m
@@ -735,14 +779,6 @@
         dG9yrLHqcgAAAIhJREFUOE9j+P//P8O7I0UgLADEUUA8C4jPAfEnJAzig8RB8iB1YH0gDDPACIiXAvF/
         IjBInRG6AXOQFBCD56Ab8A5NASH8juoGUOwFMyAmJRDN0A1IA2JPICYmGkHq0tANAIXBAyAGKYoDYl0g
         5kHCID5IHCQPUjcaBrQIA4ozEwiTkZ3/MwAAShbqQY39CKgAAAAASUVORK5CYII=
-</value>
-  </data>
-  <data name="TabPageDocuments.ImageOptions.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
-    <value>
-        iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m
-        dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAAWdEVYdFRpdGxlAFRleHQ7UGFnZTtSZXBvcnR2YWEA
-        AAAAVUlEQVQ4T2P4//8/RRjOaGlp+Y8H/4PSxsiaQRjFAHwAJN/X13cX3RCSDACCX+iGkGQAMgYC0gxA
-        BngN8G3agReDwKgLaO0CYgDtDCAFYxhAHv7PAAC6Jy+iz67OxwAAAABJRU5ErkJggg==
 </value>
   </data>
   <data name="TabPageProcessAssignment.ImageOptions.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">

app/DD_Clipboard_Searcher/frmAdministration.vb

@@ -90,12 +90,12 @@ Public Class frmAdministration
         XtraTabControl3.SelectedTabPage = TabPageGeneralSettings
     End Sub
 
-    Private Sub GUIDTextBox_TextChanged(sender As Object, e As EventArgs) Handles GUIDTextBox.TextChanged
+    Private Sub GUIDTextBox_TextChanged(sender As Object, e As EventArgs) Handles PROFILE_IDTextBox.TextChanged
 
-        If GUIDTextBox.Text <> "" Then
+        If PROFILE_IDTextBox.Text <> "" Then
             Refresh_ProfileData()
-            Refresh_Free_Users(GUIDTextBox.Text)
+            Refresh_Free_Users(PROFILE_IDTextBox.Text)
-            Refresh_Free_Groups(GUIDTextBox.Text)
+            Refresh_Free_Groups(PROFILE_IDTextBox.Text)
 
             Load_Profile_Process()
         End If
@@ -104,19 +104,19 @@ Public Class frmAdministration
     Sub Refresh_ProfileData()
         Try
             VWUSER_PROFILETableAdapter.Connection.ConnectionString = MyConnectionString
-            VWUSER_PROFILETableAdapter.Fill(MyDataset.VWUSER_PROFILE, GUIDTextBox.Text)
+            VWUSER_PROFILETableAdapter.Fill(MyDataset.VWUSER_PROFILE, PROFILE_IDTextBox.Text)
 
             VWCW_GROUP_PROFILETableAdapter.Connection.ConnectionString = MyConnectionString
-            VWCW_GROUP_PROFILETableAdapter.Fill(MyDataset.VWCW_GROUP_PROFILE, GUIDTextBox.Text)
+            VWCW_GROUP_PROFILETableAdapter.Fill(MyDataset.VWCW_GROUP_PROFILE, PROFILE_IDTextBox.Text)
 
             TBCW_PROF_DOC_SEARCHTableAdapter.Connection.ConnectionString = MyConnectionString
-            TBCW_PROF_DOC_SEARCHTableAdapter.Fill(MyDataset.TBCW_PROF_DOC_SEARCH, GUIDTextBox.Text)
+            TBCW_PROF_DOC_SEARCHTableAdapter.Fill(MyDataset.TBCW_PROF_DOC_SEARCH, PROFILE_IDTextBox.Text)
             If MyDataset.TBCW_PROF_DOC_SEARCH.Count = 0 Then
                 LayoutControlDocs.Enabled = False
             End If
 
             TBCW_PROF_DATA_SEARCHTableAdapter.Connection.ConnectionString = MyConnectionString
-            TBCW_PROF_DATA_SEARCHTableAdapter.Fill(MyDataset.TBCW_PROF_DATA_SEARCH, GUIDTextBox.Text)
+            TBCW_PROF_DATA_SEARCHTableAdapter.Fill(MyDataset.TBCW_PROF_DATA_SEARCH, PROFILE_IDTextBox.Text)
             If MyDataset.TBCW_PROF_DATA_SEARCH.Count = 0 Then
                 LayoutControlData.Enabled = False
             End If
@@ -128,13 +128,13 @@ Public Class frmAdministration
     Private Sub btnAddUser2Profile_Click(sender As Object, e As EventArgs)
         Try
             Try
-                Dim i As Integer = CInt(GUIDTextBox.Text)
+                Dim i As Integer = CInt(PROFILE_IDTextBox.Text)
             Catch ex As Exception
                 Exit Sub
             End Try
             For Each row As DataRow In MyDataset.TBWH_User.Rows
                 If row.Item(0) = CBool(True) Then
-                    Dim insert = String.Format("INSERT INTO TBCW_USER_PROFILE (PROFILE_ID,USER_ID) VALUES ({0},{1})", GUIDTextBox.Text, row.Item(5))
+                    Dim insert = String.Format("INSERT INTO TBCW_USER_PROFILE (PROFILE_ID,USER_ID) VALUES ({0},{1})", PROFILE_IDTextBox.Text, row.Item(5))
                     If Database.ExecuteNonQuery(insert) = False Then
                         MsgBox("Could not insert the User-Definition....Check the logfile!", MsgBoxStyle.Exclamation)
                     End If
@@ -143,8 +143,8 @@ Public Class frmAdministration
             For Each row As DataRow In MyDataset.TBWH_User.Rows
                 row.Item(0) = CBool(False)
             Next
-            If GUIDTextBox.Text <> "" Then
+            If PROFILE_IDTextBox.Text <> "" Then
-                Refresh_Free_Users(GUIDTextBox.Text)
+                Refresh_Free_Users(PROFILE_IDTextBox.Text)
                 Refresh_ProfileData()
             End If
 
@@ -213,8 +213,8 @@ Public Class frmAdministration
             Dim del = String.Format("DELETE FROM TBCW_USER_PROFILE WHERE GUID = {0}", ID)
             If Database.ExecuteNonQuery(del) = True Then
                 Refresh_ProfileData()
-                If GUIDTextBox.Text <> "" Then
+                If PROFILE_IDTextBox.Text <> "" Then
-                    Refresh_Free_Users(GUIDTextBox.Text)
+                    Refresh_Free_Users(PROFILE_IDTextBox.Text)
                 End If
 
             End If
@@ -224,17 +224,17 @@ Public Class frmAdministration
     End Sub
 
     Private Sub Load_Profile_Process()
-        If IsNothing(GUIDTextBox.Text) Or GUIDTextBox.Text = "" Then
+        If IsNothing(PROFILE_IDTextBox.Text) Or PROFILE_IDTextBox.Text = "" Then
             Exit Sub
         End If
 
-        If CtrlApplicationAssignment1.Process_Load(GUIDTextBox.Text) = False Then
+        If CtrlApplicationAssignment1.Process_Load(PROFILE_IDTextBox.Text) = False Then
             MsgBox("Unexpected Error while loading processes:", MsgBoxStyle.Critical)
         End If
     End Sub
 
     Private Sub frmAdministration_Shown(sender As Object, e As EventArgs) Handles Me.Shown
-        If GUIDTextBox.Text = "" Then
+        If PROFILE_IDTextBox.Text = "" Then
             Refresh_Free_Users(0)
             Refresh_Free_Groups(0)
         End If
@@ -244,7 +244,7 @@ Public Class frmAdministration
 
 
         MyDataset.TBCW_PROF_DATA_SEARCH.ADDED_WHOColumn.DefaultValue = Environment.UserName
-        MyDataset.TBCW_PROF_DATA_SEARCH.PROFILE_IDColumn.DefaultValue = GUIDTextBox.Text
+        MyDataset.TBCW_PROF_DATA_SEARCH.PROFILE_IDColumn.DefaultValue = PROFILE_IDTextBox.Text
         MyDataset.TBCW_PROF_DATA_SEARCH.CONN_IDColumn.DefaultValue = 1
         MyDataset.TBCW_PROF_DATA_SEARCH.ACTIVEColumn.DefaultValue = True
 
@@ -254,7 +254,7 @@ Public Class frmAdministration
     Private Sub TBCW_PROF_DOC_SEARCHBindingSource_AddingNew(sender As Object, e As System.ComponentModel.AddingNewEventArgs) Handles TBCW_PROF_DOC_SEARCHBindingSource.AddingNew
         MyDataset.TBCW_PROF_DOC_SEARCH.ADDED_WHOColumn.DefaultValue = Environment.UserName
         MyDataset.TBCW_PROF_DOC_SEARCH.ACTIVEColumn.DefaultValue = True
-        MyDataset.TBCW_PROF_DOC_SEARCH.PROFILE_IDColumn.DefaultValue = GUIDTextBox.Text
+        MyDataset.TBCW_PROF_DOC_SEARCH.PROFILE_IDColumn.DefaultValue = PROFILE_IDTextBox.Text
         MyDataset.TBCW_PROF_DOC_SEARCH.CONN_IDColumn.DefaultValue = 1
 
         LayoutControlDocs.Enabled = True
@@ -275,7 +275,7 @@ Public Class frmAdministration
 
     Private Sub TBCW_PROF_REL_WINDOWBindingSource_AddingNew(sender As Object, e As System.ComponentModel.AddingNewEventArgs)
         MyDataset.TBCW_PROF_REL_WINDOW.ADDED_WHOColumn.DefaultValue = Environment.UserName
-        MyDataset.TBCW_PROF_REL_WINDOW.PROFILE_IDColumn.DefaultValue = GUIDTextBox.Text
+        MyDataset.TBCW_PROF_REL_WINDOW.PROFILE_IDColumn.DefaultValue = PROFILE_IDTextBox.Text
         MyDataset.TBCW_PROF_REL_WINDOW.PROCESS_NAMEColumn.DefaultValue = SelectedProcessName
     End Sub
 
@@ -290,8 +290,8 @@ Public Class frmAdministration
     End Sub
 
     Private Sub BarButtonItem2_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem2.ItemClick
-        Dim swl = String.Format("EXEC PRCW_DELETE_PROFILE {0}", GUIDTextBox.Text)
+        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, "Bestätigung erforderlich:")
+        Dim result As MsgBoxResult = MsgBox("Sind Sie sicher, dass Sie das Profil löschen wollen?", MsgBoxStyle.YesNo, Text)
         ' wenn Speichern ja
         If result = MsgBoxResult.Yes Then
             If Database.ExecuteNonQuery(swl) = True Then
@@ -304,24 +304,24 @@ Public Class frmAdministration
         Load_Profiles()
         Refresh_ProfileData()
         Try
-            Dim ID = CInt(GUIDTextBox.Text)
+            Dim ID = CInt(PROFILE_IDTextBox.Text)
         Catch ex As Exception
             Exit Sub
         End Try
-        Refresh_Free_Users(GUIDTextBox.Text)
+        Refresh_Free_Users(PROFILE_IDTextBox.Text)
-        Refresh_Free_Groups(GUIDTextBox.Text)
+        Refresh_Free_Groups(PROFILE_IDTextBox.Text)
     End Sub
 
     Private Sub BarButtonItem5_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem5.ItemClick
-        If CtrlApplicationAssignment1.Process_CreateAssignment(GUIDTextBox.Text) = False Then
+        If CtrlApplicationAssignment1.Process_CreateAssignment(PROFILE_IDTextBox.Text) = False Then
-            MsgBox("Error while assigning process!", MsgBoxStyle.Critical, "Clipboard Watcher")
+            MsgBox("Error while assigning process!", MsgBoxStyle.Critical, Text)
+        Else
+            Status_Changed("Prozess zugeordnet")
         End If
-
-        Status_Changed("Prozess zugeordnet")
     End Sub
 
     Private Sub BarButtonItem6_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem6.ItemClick
-        If MsgBox($"Wollen Sie den Prozess löschen?" & vbNewLine & "Dies wird alle Fenster löschen, die diesem Prozess zugeordnet sind!", MsgBoxStyle.Exclamation Or MsgBoxStyle.YesNo, "Prozess löschen") = MsgBoxResult.No Then
+        If MsgBox($"Wollen Sie den Prozess löschen?" & vbNewLine & "Dies wird alle Fenster löschen, die diesem Prozess zugeordnet sind!", MsgBoxStyle.Exclamation Or MsgBoxStyle.YesNo, Text) = MsgBoxResult.No Then
             Exit Sub
         End If
 
@@ -333,15 +333,15 @@ Public Class frmAdministration
     End Sub
 
     Private Sub BarButtonItem7_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem7.ItemClick
-        If CtrlApplicationAssignment1.Window_CreateAssignment(GUIDTextBox.Text) = False Then
+        If CtrlApplicationAssignment1.Window_CreateAssignment(PROFILE_IDTextBox.Text) = False Then
             MsgBox("Error while assigning window!", MsgBoxStyle.Critical, "Clipboard Watcher")
+        Else
+            Status_Changed("Fenster zugeordnet")
         End If
-
-        Status_Changed("Fenster zugeordnet")
     End Sub
 
     Private Sub BarButtonItem8_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem8.ItemClick
-        If MsgBox($"Wollen Sie die Fenster-Zuordnung löschen?", MsgBoxStyle.Exclamation Or MsgBoxStyle.YesNo, "Prozess löschen") = MsgBoxResult.No Then
+        If MsgBox($"Wollen Sie die Fenster-Zuordnung löschen?", MsgBoxStyle.Exclamation Or MsgBoxStyle.YesNo, Text) = MsgBoxResult.No Then
             Exit Sub
         End If
 
@@ -354,7 +354,7 @@ Public Class frmAdministration
 
     Private Sub BarButtonItem11_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem11.ItemClick
         Try
-            If GUIDTextBox.Text = String.Empty Then
+            If PROFILE_IDTextBox.Text = String.Empty Then
                 Exit Sub
             End If
 
@@ -363,13 +363,13 @@ Public Class frmAdministration
             For Each oRowHandle As Integer In oSelectedRows
                 Dim oRow As DataRow = GridViewUserNotInProfile.GetDataRow(oRowHandle)
                 Dim oGuid As Integer = oRow.Item("ID")
-                Dim insert = String.Format("INSERT INTO TBCW_USER_PROFILE (PROFILE_ID,USER_ID) VALUES ({0},{1})", GUIDTextBox.Text, oGuid)
+                Dim insert = String.Format("INSERT INTO TBCW_USER_PROFILE (PROFILE_ID,USER_ID) VALUES ({0},{1})", PROFILE_IDTextBox.Text, oGuid)
                 If Database.ExecuteNonQuery(insert) = False Then
                     MsgBox("Error while adding user!", MsgBoxStyle.Exclamation)
                 End If
             Next
 
-            Refresh_Free_Users(GUIDTextBox.Text)
+            Refresh_Free_Users(PROFILE_IDTextBox.Text)
             Refresh_ProfileData()
 
             GridViewUserNotInProfile.ClearSelection()
@@ -383,7 +383,7 @@ Public Class frmAdministration
 
     Private Sub BarButtonItem12_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem12.ItemClick
         Try
-            If GUIDTextBox.Text = String.Empty Then
+            If PROFILE_IDTextBox.Text = String.Empty Then
                 Exit Sub
             End If
 
@@ -398,7 +398,7 @@ Public Class frmAdministration
                 End If
             Next
 
-            Refresh_Free_Users(GUIDTextBox.Text)
+            Refresh_Free_Users(PROFILE_IDTextBox.Text)
             Refresh_ProfileData()
 
             GridViewUserInProfile.ClearSelection()
@@ -417,7 +417,7 @@ Public Class frmAdministration
             For Each oRowHandle In oSelectedGroups
                 Dim oRow As MyDataset.TBWH_GROUPRow = DirectCast(GridViewGroupNotInProfile.GetRow(oRowHandle), DataRowView).Row
                 Dim oGroupId As Integer = oRow.ID
-                Dim oSQL As String = $"INSERT INTO TBCW_GROUP_PROFILE (PROFILE_ID,GROUP_ID) VALUES ({GUIDTextBox.Text},{oGroupId})"
+                Dim oSQL As String = $"INSERT INTO TBCW_GROUP_PROFILE (PROFILE_ID,GROUP_ID) VALUES ({PROFILE_IDTextBox.Text},{oGroupId})"
 
                 If Database.ExecuteNonQuery(oSQL) = False Then
                     MsgBox("Could not insert the Group-Definition....Check the logfile!", MsgBoxStyle.Exclamation)
@@ -426,7 +426,7 @@ Public Class frmAdministration
 
             GridViewGroupNotInProfile.ClearSelection()
 
-            Refresh_Free_Groups(GUIDTextBox.Text)
+            Refresh_Free_Groups(PROFILE_IDTextBox.Text)
             Refresh_ProfileData()
 
             Status_Changed($"{oSelectedGroups.Count} Gruppen zugeordnet")
@@ -451,7 +451,7 @@ Public Class frmAdministration
 
             GridViewGroupInProfile.ClearSelection()
 
-            Refresh_Free_Groups(GUIDTextBox.Text)
+            Refresh_Free_Groups(PROFILE_IDTextBox.Text)
             Refresh_ProfileData()
 
             Status_Changed($"{oSelectedGroups.Count} Gruppenzuordnungen gelöscht")
@@ -465,58 +465,76 @@ Public Class frmAdministration
 
         Select Case oTabName
             Case TabPageProcessAssignment.Name
-                RibbonGroupProfile.Enabled = False
+                RibbonGroup_Profile.Enabled = False
-                RibbonGroupUser.Enabled = False
+                RibbonGroup_User.Enabled = False
-                RibbonGroupProcess.Enabled = True
+                RibbonGroup_Group.Enabled = False
-                RibbonGroupGroup.Enabled = False
+
-                RibbonGroupWindow.Enabled = True
+                RibbonGroup_Process.Enabled = True
-                RibbonGroupDocSearch.Enabled = False
+                RibbonGroup_Window.Enabled = True
-                RibbonGroupDataSearch.Enabled = False
+                RibbonGroup_Control.Enabled = True
+
+                RibbonGroup_DocSearch.Enabled = False
+                RibbonGroup_DataSearch.Enabled = False
 
             Case TabPageUserAssignment.Name
-                RibbonGroupProfile.Enabled = False
+                RibbonGroup_Profile.Enabled = False
-                RibbonGroupUser.Enabled = True
+                RibbonGroup_User.Enabled = True
-                RibbonGroupProcess.Enabled = False
+                RibbonGroup_Group.Enabled = False
-                RibbonGroupGroup.Enabled = False
+
-                RibbonGroupWindow.Enabled = False
+                RibbonGroup_Process.Enabled = False
-                RibbonGroupDocSearch.Enabled = False
+                RibbonGroup_Window.Enabled = False
-                RibbonGroupDataSearch.Enabled = False
+                RibbonGroup_Control.Enabled = False
+
+                RibbonGroup_DocSearch.Enabled = False
+                RibbonGroup_DataSearch.Enabled = False
 
             Case TabPageGroupAssignment.Name
-                RibbonGroupProfile.Enabled = False
+                RibbonGroup_Profile.Enabled = False
-                RibbonGroupUser.Enabled = False
+                RibbonGroup_User.Enabled = False
-                RibbonGroupProcess.Enabled = False
+                RibbonGroup_Group.Enabled = True
-                RibbonGroupGroup.Enabled = True
+
-                RibbonGroupWindow.Enabled = False
+                RibbonGroup_Process.Enabled = False
-                RibbonGroupDocSearch.Enabled = False
+                RibbonGroup_Window.Enabled = False
-                RibbonGroupDataSearch.Enabled = False
+                RibbonGroup_Control.Enabled = False
+
+                RibbonGroup_DocSearch.Enabled = False
+                RibbonGroup_DataSearch.Enabled = False
 
             Case TabPageData.Name
-                RibbonGroupProfile.Enabled = False
+                RibbonGroup_Profile.Enabled = False
-                RibbonGroupUser.Enabled = False
+                RibbonGroup_User.Enabled = False
-                RibbonGroupProcess.Enabled = False
+                RibbonGroup_Group.Enabled = False
-                RibbonGroupGroup.Enabled = False
+
-                RibbonGroupWindow.Enabled = False
+                RibbonGroup_Process.Enabled = False
-                RibbonGroupDocSearch.Enabled = False
+                RibbonGroup_Window.Enabled = False
-                RibbonGroupDataSearch.Enabled = True
+                RibbonGroup_Control.Enabled = False
+
+                RibbonGroup_DocSearch.Enabled = False
+                RibbonGroup_DataSearch.Enabled = True
 
             Case TabPageDocuments.Name
-                RibbonGroupProfile.Enabled = False
+                RibbonGroup_Profile.Enabled = False
-                RibbonGroupUser.Enabled = False
+                RibbonGroup_User.Enabled = False
-                RibbonGroupProcess.Enabled = False
+                RibbonGroup_Group.Enabled = False
-                RibbonGroupGroup.Enabled = False
+
-                RibbonGroupWindow.Enabled = False
+                RibbonGroup_Process.Enabled = False
-                RibbonGroupDocSearch.Enabled = True
+                RibbonGroup_Window.Enabled = False
-                RibbonGroupDataSearch.Enabled = False
+                RibbonGroup_Control.Enabled = False
+
+                RibbonGroup_DocSearch.Enabled = True
+                RibbonGroup_DataSearch.Enabled = False
 
             Case Else
-                RibbonGroupProfile.Enabled = True
+                RibbonGroup_Profile.Enabled = True
-                RibbonGroupUser.Enabled = False
+                RibbonGroup_User.Enabled = False
-                RibbonGroupProcess.Enabled = False
+                RibbonGroup_Group.Enabled = False
-                RibbonGroupGroup.Enabled = False
+
-                RibbonGroupWindow.Enabled = False
+                RibbonGroup_Process.Enabled = False
-                RibbonGroupDocSearch.Enabled = False
+                RibbonGroup_Window.Enabled = False
-                RibbonGroupDataSearch.Enabled = False
+                RibbonGroup_Control.Enabled = False
+
+                RibbonGroup_DocSearch.Enabled = False
+                RibbonGroup_DataSearch.Enabled = False
         End Select
     End Sub
 
@@ -528,9 +546,9 @@ Public Class frmAdministration
     Private Sub BarButtonItem9_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem9.ItemClick
         If CtrlApplicationAssignment1.Window_SaveAssignment() = False Then
             MsgBox("Error while saving window", MsgBoxStyle.Critical, Text)
+        Else
+            Status_Changed("Fensterzuordnung gespeichert")
         End If
-
-        Status_Changed("Fensterzuordnung gespeichert")
     End Sub
 
     Private Sub BarButtonItem17_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem17.ItemClick
@@ -555,7 +573,7 @@ Public Class frmAdministration
         Dim result As MsgBoxResult = MsgBox("Sind Sie sicher, dass Sie diese Suche löschen wollen?", MsgBoxStyle.YesNo, Text)
         If result = MsgBoxResult.Yes Then
             TBCW_PROF_DATA_SEARCHTableAdapter.Delete(txtDATAGUID.Text)
-            TBCW_PROF_DATA_SEARCHTableAdapter.Fill(MyDataset.TBCW_PROF_DATA_SEARCH, GUIDTextBox.Text)
+            TBCW_PROF_DATA_SEARCHTableAdapter.Fill(MyDataset.TBCW_PROF_DATA_SEARCH, PROFILE_IDTextBox.Text)
             Status_Changed("Daten-Suche gelöscht")
         End If
     End Sub
@@ -567,7 +585,7 @@ Public Class frmAdministration
                 CHANGED_WHOTextBox1.Text = Environment.UserName
                 TBCW_PROF_DATA_SEARCHBindingSource.EndEdit()
                 TBCW_PROF_DATA_SEARCHTableAdapter.Update(MyDataset.TBCW_PROF_DATA_SEARCH)
-                TBCW_PROF_DATA_SEARCHTableAdapter.Fill(MyDataset.TBCW_PROF_DATA_SEARCH, GUIDTextBox.Text)
+                TBCW_PROF_DATA_SEARCHTableAdapter.Fill(MyDataset.TBCW_PROF_DATA_SEARCH, PROFILE_IDTextBox.Text)
                 Status_Changed("Daten-Suche gespeichert")
             End If
         Catch ex As NoNullAllowedException
@@ -590,7 +608,7 @@ Public Class frmAdministration
         Dim result As MsgBoxResult = MsgBox("Sind Sie sicher, dass Sie diese Suche löschen wollen?", MsgBoxStyle.YesNo, Text)
         If result = MsgBoxResult.Yes Then
             TBCW_PROF_DOC_SEARCHTableAdapter.Delete(txtDOC_GUID.Text)
-            TBCW_PROF_DOC_SEARCHTableAdapter.Fill(MyDataset.TBCW_PROF_DOC_SEARCH, GUIDTextBox.Text)
+            TBCW_PROF_DOC_SEARCHTableAdapter.Fill(MyDataset.TBCW_PROF_DOC_SEARCH, PROFILE_IDTextBox.Text)
             Status_Changed("Dokument-Suche gelöscht")
         End If
     End Sub
@@ -602,7 +620,7 @@ Public Class frmAdministration
                 CHANGED_WHOTextBox2.Text = Environment.UserName
                 TBCW_PROF_DOC_SEARCHBindingSource.EndEdit()
                 TBCW_PROF_DOC_SEARCHTableAdapter.Update(MyDataset.TBCW_PROF_DOC_SEARCH)
-                TBCW_PROF_DOC_SEARCHTableAdapter.Fill(MyDataset.TBCW_PROF_DOC_SEARCH, GUIDTextBox.Text)
+                TBCW_PROF_DOC_SEARCHTableAdapter.Fill(MyDataset.TBCW_PROF_DOC_SEARCH, PROFILE_IDTextBox.Text)
                 Status_Changed("Dokument-Suche gespeichert")
             End If
         Catch ex As NoNullAllowedException
@@ -618,7 +636,26 @@ Public Class frmAdministration
     End Sub
 
     Private Sub BarButtonItem23_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem23.ItemClick
-        Dim oForm As New frmControlCapture()
+        If CtrlApplicationAssignment1.Control_CreateAssignment(PROFILE_IDTextBox.Text) = False Then
-        oForm.ShowDialog()
+            MsgBox("Error while saving control", MsgBoxStyle.Critical, Text)
+        Else
+            Status_Changed("Feld-Zuordnung gespeichert")
+        End If
+    End Sub
+
+    Private Sub BarButtonItem24_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem24.ItemClick
+        If MsgBox($"Wollen Sie die Feld-Zuordnung löschen?", MsgBoxStyle.Exclamation Or MsgBoxStyle.YesNo, Text) = MsgBoxResult.No Then
+            Exit Sub
+        End If
+
+        If CtrlApplicationAssignment1.Control_DeleteAssignment() = False Then
+            MsgBox("Error while deleting assignment of control!", MsgBoxStyle.Critical, Text)
+        End If
+
+        Status_Changed("Feld-Zuordnung gelöscht")
+    End Sub
+
+    Private Sub BarButtonItem26_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem26.ItemClick
+
     End Sub
 End Class

app/DD_Clipboard_Searcher/frmConnection.Designer.vb

@@ -43,6 +43,8 @@ Partial Class frmConnection
         Me.GridView1 = New DevExpress.XtraGrid.Views.Grid.GridView()
         Me.colBEZEICHNUNG = New DevExpress.XtraGrid.Columns.GridColumn()
         Me.colSQL_PROVIDER = New DevExpress.XtraGrid.Columns.GridColumn()
+        Me.Label1 = New System.Windows.Forms.Label()
+        Me.ODBCServerTextBox = New System.Windows.Forms.ComboBox()
         Me.chkWinAuth = New System.Windows.Forms.CheckBox()
         Me.GUIDTextBox = New System.Windows.Forms.TextBox()
         Me.DATENBANKComboBox = New System.Windows.Forms.ComboBox()
@@ -67,8 +69,6 @@ Partial Class frmConnection
         Me.RibbonPageGroup1 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
         Me.RibbonStatusBar1 = New DevExpress.XtraBars.Ribbon.RibbonStatusBar()
         Me.RibbonPage2 = New DevExpress.XtraBars.Ribbon.RibbonPage()
-        Me.ODBCServerTextBox = New System.Windows.Forms.ComboBox()
-        Me.Label1 = New System.Windows.Forms.Label()
         BEZEICHNUNGLabel = New System.Windows.Forms.Label()
         SQL_PROVIDERLabel = New System.Windows.Forms.Label()
         SERVERLabel = New System.Windows.Forms.Label()
@@ -283,6 +283,23 @@ Partial Class frmConnection
         Me.colSQL_PROVIDER.Visible = True
         Me.colSQL_PROVIDER.VisibleIndex = 1
         '
+        'Label1
+        '
+        Me.Label1.AutoSize = True
+        Me.Label1.Location = New System.Drawing.Point(220, 3)
+        Me.Label1.Name = "Label1"
+        Me.Label1.Size = New System.Drawing.Size(101, 13)
+        Me.Label1.TabIndex = 33
+        Me.Label1.Text = "ODBC Verbindung *"
+        '
+        'ODBCServerTextBox
+        '
+        Me.ODBCServerTextBox.FormattingEnabled = True
+        Me.ODBCServerTextBox.Location = New System.Drawing.Point(223, 19)
+        Me.ODBCServerTextBox.Name = "ODBCServerTextBox"
+        Me.ODBCServerTextBox.Size = New System.Drawing.Size(200, 21)
+        Me.ODBCServerTextBox.TabIndex = 32
+        '
         'chkWinAuth
         '
         Me.chkWinAuth.AutoSize = True
@@ -352,6 +369,7 @@ Partial Class frmConnection
         Me.PASSWORDTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_CONNECTIONBindingSource, "PASSWORD", True))
         Me.PASSWORDTextBox.Location = New System.Drawing.Point(223, 139)
         Me.PASSWORDTextBox.Name = "PASSWORDTextBox"
+        Me.PASSWORDTextBox.PasswordChar = Global.Microsoft.VisualBasic.ChrW(42)
         Me.PASSWORDTextBox.Size = New System.Drawing.Size(200, 21)
         Me.PASSWORDTextBox.TabIndex = 13
         '
@@ -413,6 +431,7 @@ Partial Class frmConnection
         Me.TableAdapterManager.TBCW_GROUP_PROFILETableAdapter = Nothing
         Me.TableAdapterManager.TBCW_PROF_DATA_SEARCHTableAdapter = Nothing
         Me.TableAdapterManager.TBCW_PROF_DOC_SEARCHTableAdapter = Nothing
+        Me.TableAdapterManager.TBCW_PROF_REL_CONTROLTableAdapter = Nothing
         Me.TableAdapterManager.TBCW_PROF_REL_WINDOWTableAdapter = Nothing
         Me.TableAdapterManager.TBCW_PROFILE_PROCESSTableAdapter = Nothing
         Me.TableAdapterManager.TBCW_PROFILESTableAdapter = Nothing
@@ -492,23 +511,6 @@ Partial Class frmConnection
         Me.RibbonPage2.Name = "RibbonPage2"
         Me.RibbonPage2.Text = "RibbonPage2"
         '
-        'ODBCServerTextBox
-        '
-        Me.ODBCServerTextBox.FormattingEnabled = True
-        Me.ODBCServerTextBox.Location = New System.Drawing.Point(223, 19)
-        Me.ODBCServerTextBox.Name = "ODBCServerTextBox"
-        Me.ODBCServerTextBox.Size = New System.Drawing.Size(200, 21)
-        Me.ODBCServerTextBox.TabIndex = 32
-        '
-        'Label1
-        '
-        Me.Label1.AutoSize = True
-        Me.Label1.Location = New System.Drawing.Point(220, 3)
-        Me.Label1.Name = "Label1"
-        Me.Label1.Size = New System.Drawing.Size(101, 13)
-        Me.Label1.TabIndex = 33
-        Me.Label1.Text = "ODBC Verbindung *"
-        '
         'frmConnection
         '
         Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)

app/DD_Clipboard_Searcher/frmConnection.resx

@@ -159,9 +159,6 @@
   <metadata name="MyDataset.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
     <value>17, 17</value>
   </metadata>
-  <metadata name="MyDataset.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
-    <value>17, 17</value>
-  </metadata>
   <metadata name="TBDD_CONNECTIONTableAdapter.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
     <value>371, 17</value>
   </metadata>

app/DD_Clipboard_Searcher/frmConnection.vb

@@ -1,8 +1,8 @@
 Imports System.Data.SqlClient
 Imports System.Data.Odbc
-Imports Oracle.ManagedDataAccess.Client
 Imports Microsoft.Win32
 Imports DigitalData.Modules.Database.Constants
+Imports DigitalData.Modules
 
 Public Class frmConnection
     Private Sub TBDD_CONNECTIONBindingNavigatorSaveItem_Click(sender As Object, e As EventArgs)
@@ -91,13 +91,14 @@ Public Class frmConnection
                 End Using
             Case PROVIDER_ORACLE
                 Try
-                    Dim conn As New OracleConnectionStringBuilder
                     oConnectionString = $"Data Source=(DESCRIPTION=(ADDRESS_LIST=(ADDRESS=(PROTOCOL=TCP)(HOST={Server})(PORT=1521)))(CONNECT_DATA=(SERVER=DEDICATED)(SERVICE_NAME={Database})));User Id={UserId};Password={Password};"
+                    Dim oOracle As New Database.Oracle(LogConfig, oConnectionString)
 
-                    Using connection As New OracleConnection(oConnectionString)
+                    If oOracle.DBInitialized Then
-                        connection.Open()
                         MsgBox("Die Verbindung wurde erfolgreich aufgebaut!", MsgBoxStyle.Information, Text)
-                    End Using
+                    Else
+                        MsgBox("Fehler beim Verbindungsaufbau (ORACLE): Fehler im Log", MsgBoxStyle.Critical, Text)
+                    End If
                 Catch ex As Exception
                     Logger.Error(ex)
                     MsgBox("Fehler beim Verbindungsaufbau (ORACLE): " & vbNewLine & ex.Message, MsgBoxStyle.Critical, Text)
@@ -194,14 +195,21 @@ Public Class frmConnection
     Private Sub BarButtonItem2_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonDelete.ItemClick
         Try
             If GUIDTextBox.Text <> String.Empty Then
-                Dim oResult As MsgBoxResult = MsgBox("Wollen Sie die Verbindung wirklich löschen?", MsgBoxStyle.YesNo, Text)
+                Dim oSQL = $"SELECT dbo.FNCW_GET_SEARCH_COUNT_FOR_CONNECTION({GUIDTextBox.Text})"
-                If oResult = MsgBoxResult.Yes Then
+                Dim oCount = Database.GetScalarValue(oSQL)
-                    TBDD_CONNECTIONTableAdapter.Delete(GUIDTextBox.Text)
+
+                If oCount IsNot Nothing AndAlso oCount = 0 Then
+                    Dim oResult As MsgBoxResult = MsgBox("Wollen Sie die Verbindung wirklich löschen?", MsgBoxStyle.YesNo, Text)
+                    If oResult = MsgBoxResult.Yes Then
+                        TBDD_CONNECTIONTableAdapter.Delete(GUIDTextBox.Text)
+                    End If
+                Else
+                    MsgBox($"Die Verbindung '{BEZEICHNUNGTextBox.Text}' kann nicht gelöscht werden, da sie von mindestens einer Suche verwendet wird!", MsgBoxStyle.Exclamation, Text)
                 End If
             End If
         Catch ex As Exception
             Logger.Error(ex)
-            MsgBox("Fehler beim Löschen der Verbindung: " & vbNewLine & ex.Message, MsgBoxStyle.Critical)
+            MsgBox("Fehler beim Löschen der Verbindung: " & vbNewLine & ex.Message, MsgBoxStyle.Critical, Text)
         End Try
     End Sub
 

app/DD_Clipboard_Searcher/frmControlCapture.vb

@@ -13,6 +13,9 @@ Public Class frmControlCapture
             txtControlName.Text = oResult.ControlName
             ControlName = oResult.ControlName
             ProcessName = oResult.ProcessName
+            Button1.Enabled = True
+        Else
+            Button1.Enabled = False
         End If
     End Sub
 End Class

app/DD_Clipboard_Searcher/frmProcessCapture.vb

@@ -8,7 +8,10 @@ Public Class frmProcessCapture
     Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick
         Dim oWindow = ClassWindowAPI.GetWindowInfo()
 
-        'clsWINDOWSApi.Get_ForegroundWindow_Info()
+        If oWindow Is Nothing Then
+            Exit Sub
+        End If
+
         Dim oProgramName As String = Assembly.GetEntryAssembly().GetName().Name
 
         If oWindow.ProcessName <> oProgramName Then

app/DD_Clipboard_Searcher/frmStart.Designer.vb

@@ -151,7 +151,7 @@ Partial Class frmStart
         Me.labelHotkey.Name = "labelHotkey"
         Me.labelHotkey.Size = New System.Drawing.Size(312, 39)
         Me.labelHotkey.TabIndex = 13
-        Me.labelHotkey.Text = "STRG+C {0}"
+        Me.labelHotkey.Text = "CLIPBOARD + {0}"
         Me.labelHotkey.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
         '
         'btnUserConfig

app/DD_Clipboard_Searcher/frmStart.vb

@@ -111,7 +111,7 @@ Public Class frmStart
         Dim oProfileFilter As ClassProfileFilter
 
         Try
-            oProfileFilter = New ClassProfileFilter(DT_USER_PROFILES, DTPROFILE_REL_WINDOW)
+            oProfileFilter = New ClassProfileFilter(DT_USER_PROFILES, DTPROFILE_REL_WINDOW, DTPROFILE_REL_CONTROL)
         Catch ex As Exception
             MsgBox("Fehler beim Laden der Profile. Möglicherweise liegt ein Konfigurationsfehler vor.")
             Exit Sub
@@ -122,7 +122,8 @@ Public Class frmStart
         oProfiles = oProfileFilter.FilterProfilesByProcess(oProfiles, oWindowInfo.ProcessName)
         oProfiles = oProfileFilter.FilterProfilesByClipboardRegex(oProfiles, ClipboardContents)
         oProfiles = oProfileFilter.FilterWindowsByWindowTitleRegex(oProfiles, oWindowInfo.WindowTitle)
-        oProfiles = oProfileFilter.FilterProfilesByWindowClipboardRegex(oProfiles, ClipboardContents)
+        oProfiles = oProfileFilter.FilterWindowsByWindowClipboardRegex(oProfiles, ClipboardContents)
+        oProfiles = oProfileFilter.FilterProfilesByFocusedControl(oProfiles)
         oProfiles = oProfileFilter.RemoveDuplicateProfiles()
         oProfiles = oProfiles.ToList()
 
@@ -151,8 +152,8 @@ Public Class frmStart
             Dim oResultDocs As Integer = 0
             Dim oResultData As Integer = 0
 
-            Dim oDataSearches As DataTable = Database.GetDatatable($"SELECT COUNT_COMMAND FROM TBCW_PROF_DATA_SEARCH WHERE PROFILE_ID = {oProfile.Guid}")
+            Dim oDataSearches As DataTable = Database.GetDatatable($"SELECT COUNT_COMMAND FROM TBCW_PROF_DATA_SEARCH WHERE ACTIVE = 1 AND PROFILE_ID = {oProfile.Guid}")
-            Dim oDocSearches As DataTable = Database.GetDatatable($"SELECT COUNT_COMMAND FROM TBCW_PROF_DOC_SEARCH WHERE PROFILE_ID = {oProfile.Guid}")
+            Dim oDocSearches As DataTable = Database.GetDatatable($"SELECT COUNT_COMMAND FROM TBCW_PROF_DOC_SEARCH WHERE ACTIVE = 1 AND PROFILE_ID = {oProfile.Guid}")
 
             For Each oRow As DataRow In oDataSearches.Rows
                 Try

app/DD_Clipboard_Searcher/modCurrent.vb

@@ -65,6 +65,7 @@ Module modCurrent
     Public CLIENT_SELECTED As Integer = 0
     Public CurrDT_PROFILE_MATCH As DataTable
     Public DTPROFILE_REL_WINDOW As DataTable
+    Public DTPROFILE_REL_CONTROL As DataTable
 
     Public CURRENT_DT_DOC_SEARCHES As DataTable
     Public CURRENT_DT_DATA_SEARCHES As DataTable

app/SetupWix/Product.wxs

@@ -91,6 +91,10 @@
         <File Id="DDLogging" Name="DigitalData.Modules.Logging.dll" KeyPath="no" Checksum="yes"/>
         <File Id="DDConfig" Name="DigitalData.Modules.Config.dll" KeyPath="no" Checksum="yes"/>
         <File Id="DDFilesystem" Name="DigitalData.Modules.Filesystem.dll" KeyPath="no" Checksum="yes"/>
+        <File Id="DDDatabase" Name="DigitalData.Modules.Database.dll" KeyPath="no" Checksum="yes"/>
+        <File Id="DDLanguage" Name="DigitalData.Modules.Language.dll" KeyPath="no" Checksum="yes"/>
+        <File Id="DDRegexEditor" Name="DigitalData.Controls.RegexEditor.dll" KeyPath="no" Checksum="yes"/>
+        <File Id="DDprotobuf" Name="protobuf-net.dll" KeyPath="no" Checksum="yes"/>
       </Component>
       
       <Component Id="NLog" Guid="{08903680-6b02-4ff0-b700-93209381fe1a}">
@@ -109,6 +113,10 @@
         <File Id="DevExpress.XtraPrinting.v15.2" Name="DevExpress.XtraPrinting.v15.2.dll" Source="D:\ProgramFiles\DevExpress 15.2\Bin\Framework\DevExpress.XtraPrinting.v15.2.dll" />
       </Component>
 
+      <Component Id="GDPictureLibs" Guid="9ea5ab43-58ff-4813-9a8b-f854784f0275">
+        <File Id="GdPicture.NET.14" Name="GdPicture.NET.14.dll" Source="D:\ProgramFiles\GdPicture.NET 14\Redist\GdPicture.NET\GdPicture.NET.14.dll" KeyPath="yes" />
+      </Component>
+
       <Component Id="RegistryKeys" Guid="{72D6927F-8297-4D51-BF4A-813064089A4A}">
           <RegistryKey Root="HKLM" Key="Software">
             <RegistryKey Key="[Manufacturer]">
@@ -128,6 +136,7 @@
       <ComponentRef Id="DDLibs"/>
       <ComponentRef Id="NLog"/>
       <ComponentRef Id="DevExpressLibs"/>
+      <ComponentRef Id="GDPictureLibs"/>
       <ComponentRef Id="RegistryKeys" />
     </Feature>