AppStd/ClipboardWatcher
8
1
Fork 0
Code Issues Pull Requests Releases Wiki Activity

WIP

Browse Source
This commit is contained in:
Jonathan Jenne
2019-08-05 16:32:47 +02:00
parent 926801f7ba
commit 16ac706a6e
30 changed files with 1145 additions and 1062 deletions
Download Patch File Download Diff File Expand all files Collapse all files

134
app/DD_Clipboard_Searcher/App.config
View File

@@ -1,53 +1,85 @@
<?xml version="1.0" encoding="utf-8"?>
<configuration>
<configSections>
<sectionGroup name="userSettings" type="System.Configuration.UserSettingsGroup, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<section name="DD_Clipboard_Watcher.My.MySettings" type="System.Configuration.ClientSettingsSection, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" allowExeDefinition="MachineToLocalUser" requirePermission="false"/>
</sectionGroup>
</configSections>
<connectionStrings>
<add name="DD_Clipboard_Watcher.My.MySettings.DD_ECMConnectionString"
connectionString="Data Source=172.24.12.41\tests;Initial Catalog=DD_ECM_TEST;Persist Security Info=True;User ID=sa;Password=dd"
providerName="System.Data.SqlClient" />
</connectionStrings>
<startup>
<supportedRuntime version="v4.0" sku=".NETFramework,Version=v4.6.1"/>
</startup>
<userSettings>
<DD_Clipboard_Watcher.My.MySettings>
<setting name="WDSearch_maximized" serializeAs="String">
<value>False</value>
</setting>
<setting name="frmResultSearchSplitterDistance" serializeAs="String">
<value>555</value>
</setting>
<setting name="frmResultDocSize" serializeAs="String">
<value>0, 0</value>
</setting>
<setting name="frmResultDocPosition" serializeAs="String">
<value>0, 0</value>
</setting>
<setting name="frmViewerPosition" serializeAs="String">
<value>0, 0</value>
</setting>
<setting name="frmViewerSize" serializeAs="String">
<value>0, 0</value>
</setting>
<setting name="frmProfileMatchPosition" serializeAs="String">
<value>0, 0</value>
</setting>
<setting name="frmProfileMatchSize" serializeAs="String">
<value>0, 0</value>
</setting>
<setting name="LoadDocView" serializeAs="String">
<value>False</value>
</setting>
<setting name="frmResultDataSize" serializeAs="String">
<value>0, 0</value>
</setting>
<setting name="frmResultDataPosition" serializeAs="String">
<value>0, 0</value>
</setting>
</DD_Clipboard_Watcher.My.MySettings>
</userSettings>
</configuration>
<configSections>
<sectionGroup name="userSettings" type="System.Configuration.UserSettingsGroup, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<section name="DD_Clipboard_Watcher.My.MySettings" type="System.Configuration.ClientSettingsSection, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" allowExeDefinition="MachineToLocalUser" requirePermission="false" />
</sectionGroup>
<sectionGroup name="applicationSettings" type="System.Configuration.ApplicationSettingsGroup, System">
<section name="DevExpress.LookAndFeel.Design.AppSettings" type="System.Configuration.ClientSettingsSection" requirePermission="false" />
</sectionGroup>
</configSections>
<applicationSettings>
<DevExpress.LookAndFeel.Design.AppSettings>
<setting name="DefaultAppSkin" serializeAs="String">
<value>Skin/Office 2016 Colorful</value>
</setting>
<setting name="DefaultPalette" serializeAs="String">
<value></value>
</setting>
<setting name="TouchUI" serializeAs="String">
<value></value>
</setting>
<setting name="TouchScaleFactor" serializeAs="String">
<value></value>
</setting>
<setting name="DirectX" serializeAs="String">
<value></value>
</setting>
<setting name="RegisterUserSkins" serializeAs="String">
<value></value>
</setting>
<setting name="FontBehavior" serializeAs="String">
<value></value>
</setting>
<setting name="DefaultAppFont" serializeAs="String">
<value></value>
</setting>
<setting name="DPIAwarenessMode" serializeAs="String">
<value></value>
</setting>
</DevExpress.LookAndFeel.Design.AppSettings>
</applicationSettings>
<connectionStrings>
<add name="DD_Clipboard_Watcher.My.MySettings.DD_ECMConnectionString" connectionString="Data Source=172.24.12.41\tests;Initial Catalog=DD_ECM_TEST;Persist Security Info=True;User ID=sa;Password=dd" providerName="System.Data.SqlClient" />
</connectionStrings>
<startup>
<supportedRuntime version="v4.0" sku=".NETFramework,Version=v4.6.1" />
</startup>
<userSettings>
<DD_Clipboard_Watcher.My.MySettings>
<setting name="WDSearch_maximized" serializeAs="String">
<value>False</value>
</setting>
<setting name="frmResultSearchSplitterDistance" serializeAs="String">
<value>555</value>
</setting>
<setting name="frmResultDocSize" serializeAs="String">
<value>0, 0</value>
</setting>
<setting name="frmResultDocPosition" serializeAs="String">
<value>0, 0</value>
</setting>
<setting name="frmViewerPosition" serializeAs="String">
<value>0, 0</value>
</setting>
<setting name="frmViewerSize" serializeAs="String">
<value>0, 0</value>
</setting>
<setting name="frmProfileMatchPosition" serializeAs="String">
<value>0, 0</value>
</setting>
<setting name="frmProfileMatchSize" serializeAs="String">
<value>0, 0</value>
</setting>
<setting name="LoadDocView" serializeAs="String">
<value>False</value>
</setting>
<setting name="frmResultDataSize" serializeAs="String">
<value>0, 0</value>
</setting>
<setting name="frmResultDataPosition" serializeAs="String">
<value>0, 0</value>
</setting>
</DD_Clipboard_Watcher.My.MySettings>
</userSettings>
</configuration>

2
app/DD_Clipboard_Searcher/ClassInit.vb
View File

@@ -139,7 +139,7 @@ Public Class ClassInit
End If
End If
'Am System anmelden
clsLicense.Refresh_Licence(DT_CLIENT_USER.Rows(0).Item("CLIENT_ID"))
ClassLicense.Refresh_Licence(DT_CLIENT_USER.Rows(0).Item("CLIENT_ID"))
'Am System anmelden
' sql = String.Format("UPDATE TBDD_USER SET LOGGED_IN = 1, LOGGED_WHERE = '{0}' WHERE GUID = {1}", Environment.MachineName, USER_ID)
'clsDatabase.Execute_non_Query(sql)

2
app/DD_Clipboard_Searcher/clsLicense.vb → app/DD_Clipboard_Searcher/ClassLicense.vb
View File

@@ -1,5 +1,5 @@
Imports DD_LIB_Standards
Public Class clsLicense
Public Class ClassLicense
Private Shared lic_string As String
Private Shared Sub Get_License(CLIENT_ID As Integer)
Dim sql As String = String.Format("SELECT LICENSE_DDCBSEARCHER FROM TBDD_CLIENT WHERE GUID = {0}", CLIENT_ID)

30
app/DD_Clipboard_Searcher/Class1.vb → app/DD_Clipboard_Searcher/ClassWindow.vb
View File

@@ -1,6 +1,4 @@
Imports Microsoft.VisualBasic.ControlChars
Imports System.Runtime.InteropServices
Imports DD_LIB_Standards
Imports System.Runtime.InteropServices
Public Class ClipboardWatcher : Inherits NativeWindow : Implements IDisposable
<DllImport("user32", EntryPoint:="SetClipboardViewer")> _
@@ -9,26 +7,32 @@ Public Class ClipboardWatcher : Inherits NativeWindow : Implements IDisposable
Public Event Changed As EventHandler
Private _hview As IntPtr
Private ReadOnly _handle As IntPtr
'nur eine globale Instanz zulassen
Public Shared Singleton As New ClipboardWatcher
Const WM_DRAWCLIPBOARD As Integer = &H308
Private Sub New()
MyBase.CreateHandle(New CreateParams)
_hview = SetClipboardViewer(MyBase.Handle)
_handle = SetClipboardViewer(MyBase.Handle)
End Sub
Protected Overrides Sub WndProc(ByRef m As Message)
Const WM_DRAWCLIPBOARD As Integer = &H308
Select Case m.Msg
Case WM_DRAWCLIPBOARD
clsWINDOWSApi.Get_ForegroundWindow_Info()
'Dim CapTxt As String = clsWINDOWSApi.GetCaption()
If IsNothing(CurrPROC_Name) Then Exit Sub
If CurrPROC_Name.StartsWith("DD_Clipboard_Watcher") Then Exit Sub
'Logger.Debug(String.Format(" >>{0} - Clipboard ChangedEvent for process '{1}' fired!", Now.ToString, PROC_Name), False)
' If CapTxt.ToUpper.StartsWith("DD") Then Exit Sub
Dim oWindow = ClassWindowAPI.GetWindowInfo()
'clsWINDOWSApi.Get_ForegroundWindow_Info()
If IsNothing(oWindow.ProcessName) Then
Exit Sub
End If
If oWindow.ProcessName.StartsWith("DD_Clipboard_Watcher") Then
Exit Sub
End If
RaiseEvent Changed(Me, EventArgs.Empty)
End Select
MyBase.WndProc(m)
@@ -48,7 +52,7 @@ Public Class ClipboardWatcher : Inherits NativeWindow : Implements IDisposable
' aufgerufen werden
End If
MyBase.DestroyHandle()
Dim H As IntPtr = SetClipboardViewer(_hview)
Dim H As IntPtr = SetClipboardViewer(_handle)
End If
Me.disposedValue = True
End Sub

185
app/DD_Clipboard_Searcher/ClassWindowAPI.vb Normal file
View File

@@ -0,0 +1,185 @@
Imports System.Text
Public Class ClassWindowAPI
Const WM_GETTEXT As Int32 = &HD
Const WM_GETTEXTLENGTH As Int32 = &HE
Public Class ApiWindow
Public MainWindowTitle As String = ""
Public ClassName As String = ""
Public hWnd As Int32
End Class
Public Class WindowInfo
Public WindowTitle As String = ""
Public ProcessName As String = ""
Public ClassName As String = ""
Public ProcessId As Integer = 0
Public hWnd As Int32
End Class
Private Delegate Function EnumCallBackDelegate(ByVal hwnd As Integer, ByVal lParam As Integer) As Integer
Private Declare Function GetForegroundWindow Lib "user32.dll" Alias "GetForegroundWindow" () As IntPtr
Private Declare Function GetWindowThreadProcessId Lib "user32.dll" (ByVal hwnd As IntPtr, ByRef lpdwProcessID As Integer) As Integer
Private Declare Function GetWindowText Lib "user32.dll" Alias "GetWindowTextA" (ByVal hWnd As IntPtr, ByVal WinTitle As String, ByVal MaxLength As Integer) As Integer
Private Declare Function GetWindowTextLength Lib "user32.dll" Alias "GetWindowTextLengthA" (ByVal hwnd As Int32) As Integer
' Top-level windows.
Private Declare Function EnumWindows Lib "user32" (ByVal lpEnumFunc As EnumCallBackDelegate, ByVal lParam As Integer) As Integer
' Child windows.
Private Declare Function EnumChildWindows Lib "user32" (ByVal hWndParent As Integer, ByVal lpEnumFunc As EnumCallBackDelegate, ByVal lParam As Integer) As Integer
' Get the window class.
Private Declare Function GetClassName Lib "user32" Alias "GetClassNameA" (ByVal hwnd As Integer, ByVal lpClassName As StringBuilder, ByVal nMaxCount As Integer) As Integer
' Test if the window is visible--only get visible ones.
Private Declare Function IsWindowVisible Lib "user32" (ByVal hwnd As Integer) As Integer
' Test if the window's parent--only get the one's without parents.
Private Declare Function GetParent Lib "user32" (ByVal hwnd As Integer) As Integer
' Get window text length signature.
Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Int32, ByVal wMsg As Int32, ByVal wParam As Int32, ByVal lParam As Int32) As Int32
' Get window text signature.
Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Int32, ByVal wMsg As Int32, ByVal wParam As Int32, ByVal lParam As StringBuilder) As Int32
Private _listChildren As New List(Of WindowInfo)
Private _listTopLevel As New List(Of WindowInfo)
Private _topLevelClass As String = ""
Private _childClass As String = ""
''' <summary>
''' Get all top-level window information
''' </summary>
''' <returns>List of window information objects</returns>
Public Overloads Function GetTopLevelWindows() As List(Of WindowInfo)
EnumWindows(AddressOf EnumWindowProc, &H0)
Return _listTopLevel
End Function
Public Overloads Function GetTopLevelWindows(ByVal className As String) As List(Of WindowInfo)
_topLevelClass = className
Return GetTopLevelWindows()
End Function
''' <summary>
''' Get all child windows for the specific windows handle (hwnd).
''' </summary>
''' <returns>List of child windows for parent window</returns>
Public Overloads Function GetChildWindows(ByVal hwnd As Int32) As List(Of WindowInfo)
' Clear the window list.
_listChildren = New List(Of WindowInfo)
' Start the enumeration process.
EnumChildWindows(hwnd, AddressOf EnumChildWindowProc, &H0)
' Return the children list when the process is completed.
Return _listChildren
End Function
Public Overloads Function GetChildWindows(ByVal hwnd As Int32, ByVal childClass As String) As List(Of WindowInfo)
' Set the search
_childClass = childClass
Return GetChildWindows(hwnd)
End Function
''' <summary>
''' Callback function that does the work of enumerating top-level windows.
''' </summary>
''' <param name="hwnd">Discovered Window handle</param>
''' <returns>1=keep going, 0=stop</returns>
Private Function EnumWindowProc(ByVal hwnd As Int32, ByVal lParam As Int32) As Int32
' Eliminate windows that are not top-level.
If GetParent(hwnd) = 0 AndAlso CBool(IsWindowVisible(hwnd)) Then
' Get the window title / class name.
Dim oWindow As WindowInfo = GetWindowInfo(hwnd)
' Match the class name if searching for a specific window class.
If _topLevelClass.Length = 0 OrElse oWindow.ClassName.ToLower() = _topLevelClass.ToLower() Then
_listTopLevel.Add(oWindow)
End If
End If
' To continue enumeration, return True (1), and to stop enumeration
' return False (0).
' When 1 is returned, enumeration continues until there are no
' more windows left.
Return 1
End Function
''' <summary>
''' Callback function that does the work of enumerating child windows.
''' </summary>
''' <param name="hwnd">Discovered Window handle</param>
''' <returns>1=keep going, 0=stop</returns>
Private Function EnumChildWindowProc(ByVal hwnd As Int32, ByVal lParam As Int32) As Int32
Dim oWindow As WindowInfo = GetWindowInfo(hwnd)
' Attempt to match the child class, if one was specified, otherwise
' enumerate all the child windows.
If _childClass.Length = 0 OrElse oWindow.ClassName.ToLower() = _childClass.ToLower() Then
_listChildren.Add(oWindow)
End If
Return 1
End Function
''' <summary>
''' Returns Information about the Window with `hWnd`
''' </summary>
Public Shared Function GetWindowInfo(ByVal hWnd As Integer) As WindowInfo
Dim oPID As Integer = 0
Dim oTitleLength As Int32 = GetWindowTextLength(hWnd)
Dim oWindowTitle As String = StrDup(oTitleLength + 1, "*")
Dim oClassBuilder As New StringBuilder(64)
GetWindowText(hWnd, oWindowTitle, oTitleLength + 1)
GetWindowThreadProcessId(hWnd, oPID)
If oPID = 0 Then
Return Nothing
End If
Dim oProcess As Process = Process.GetProcessById(oPID)
If oProcess Is Nothing Then
Return Nothing
End If
GetClassName(hWnd, oClassBuilder, 64)
Return New WindowInfo With {
.hWnd = hWnd,
.ClassName = oClassBuilder.ToString,
.ProcessId = oProcess.Id,
.ProcessName = oProcess.ProcessName,
.WindowTitle = oWindowTitle
}
End Function
''' <summary>
''' Returns Information about the currently focused window
''' </summary>
Public Shared Function GetWindowInfo() As WindowInfo
Dim hWnd As IntPtr = GetForegroundWindow()
If hWnd = IntPtr.Zero Then
Return Nothing
End If
Return GetWindowInfo(hWnd)
End Function
End Class

2
app/DD_Clipboard_Searcher/Windows.vb → app/DD_Clipboard_Searcher/ClassWindowsAPI.vb
View File

@@ -1,7 +1,7 @@
Imports System.Runtime.InteropServices
Imports DigitalData.Modules.Logging
Public Class Windows
Public Class ClassWindowsAPI
Private Const SEE_MASK_INVOKEIDLIST = &HC
Private Const SEE_MASK_NOCLOSEPROCESS = &H40
Private Const SEE_MASK_FLAG_NO_UI = &H400

9
app/DD_Clipboard_Searcher/DD_Clipboard_Watcher.vbproj
View File

@@ -124,7 +124,7 @@
<Import Include="System.Threading.Tasks" />
</ItemGroup>
<ItemGroup>
<Compile Include="Class1.vb" />
<Compile Include="ClassWindow.vb" />
<Compile Include="ClassConfig.vb" />
<Compile Include="ClassConstants.vb" />
<Compile Include="ClassDatabase.vb" />
@@ -132,11 +132,10 @@
<Compile Include="ClassLayout.vb" />
<Compile Include="ClassProfileFilter.vb" />
<Compile Include="ClassHotkey.vb" />
<Compile Include="clsLicense.vb" />
<Compile Include="ClassLicense.vb" />
<Compile Include="clsPatterns.vb" />
<Compile Include="clsSearch.vb" />
<Compile Include="clsWindowApivb.vb" />
<Compile Include="clsWINDOWSApi.vb" />
<Compile Include="ClassWindowAPI.vb" />
<Compile Include="clsWMDocGrid.vb" />
<Compile Include="ctrlApplicationAssignment.Designer.vb">
<DependentUpon>ctrlApplicationAssignment.vb</DependentUpon>
@@ -272,7 +271,7 @@
<Compile Include="MyDataset.vb">
<DependentUpon>MyDataset.xsd</DependentUpon>
</Compile>
<Compile Include="Windows.vb" />
<Compile Include="ClassWindowsAPI.vb" />
</ItemGroup>
<ItemGroup>
<EmbeddedResource Include="ctrlApplicationAssignment.resx">

19
app/DD_Clipboard_Searcher/My Project/licenses.licx
View File

@@ -1,14 +1,15 @@
DevExpress.XtraEditors.TileControl, DevExpress.XtraEditors.v18.1, Version=18.1.5.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
DevExpress.XtraEditors.DateEdit, DevExpress.XtraEditors.v18.1, Version=18.1.5.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
DevExpress.XtraEditors.Repository.RepositoryItemButtonEdit, DevExpress.XtraEditors.v18.1, Version=18.1.5.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
DevExpress.XtraEditors.TileControl, DevExpress.XtraEditors.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
DevExpress.XtraEditors.ComboBoxEdit, DevExpress.XtraEditors.v18.1, Version=18.1.5.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
DevExpress.XtraGauges.Win.GaugeControl, DevExpress.XtraGauges.v18.1.Win, Version=18.1.5.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
DevExpress.XtraEditors.TextEdit, DevExpress.XtraEditors.v18.1, Version=18.1.5.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
DevExpress.XtraEditors.Repository.RepositoryItemTextEdit, DevExpress.XtraEditors.v18.1, Version=18.1.5.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
DevExpress.XtraGrid.GridControl, DevExpress.XtraGrid.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
DevExpress.XtraEditors.TileControl, DevExpress.XtraEditors.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
DevExpress.XtraEditors.Repository.RepositoryItemButtonEdit, DevExpress.XtraEditors.v18.1, Version=18.1.5.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
DevExpress.XtraLayout.LayoutControl, DevExpress.XtraLayout.v18.1, Version=18.1.5.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
DevExpress.XtraGauges.Win.GaugeControl, DevExpress.XtraGauges.v18.1.Win, Version=18.1.5.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
DevExpress.XtraBars.Ribbon.RibbonControl, DevExpress.XtraBars.v18.1, Version=18.1.5.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
DevExpress.XtraGrid.GridControl, DevExpress.XtraGrid.v18.1, Version=18.1.5.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
DevExpress.XtraEditors.CheckEdit, DevExpress.XtraEditors.v18.1, Version=18.1.5.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
DevExpress.XtraEditors.RatingControl, DevExpress.XtraEditors.v18.1, Version=18.1.5.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
DevExpress.XtraGrid.GridControl, DevExpress.XtraGrid.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
DevExpress.XtraBars.Ribbon.RibbonControl, DevExpress.XtraBars.v18.1, Version=18.1.5.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
DevExpress.XtraEditors.TileControl, DevExpress.XtraEditors.v18.1, Version=18.1.5.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
DevExpress.XtraEditors.LookUpEdit, DevExpress.XtraEditors.v18.1, Version=18.1.5.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
DevExpress.XtraEditors.ComboBoxEdit, DevExpress.XtraEditors.v18.1, Version=18.1.5.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
DevExpress.XtraEditors.DateEdit, DevExpress.XtraEditors.v18.1, Version=18.1.5.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
DevExpress.XtraEditors.CheckEdit, DevExpress.XtraEditors.v18.1, Version=18.1.5.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a

85
app/DD_Clipboard_Searcher/MyDataset.Designer.vb generated
View File

@@ -10356,30 +10356,9 @@ Namespace MyDatasetTableAdapters
Me._adapter.TableMappings.Add(tableMapping)
Me._adapter.DeleteCommand = New Global.System.Data.SqlClient.SqlCommand()
Me._adapter.DeleteCommand.Connection = Me.Connection
Me._adapter.DeleteCommand.CommandText = "DELETE FROM [TBCW_PROF_REL_WINDOW] WHERE (([GUID] = @Original_GUID) AND ([PROFILE"& _
"_ID] = @Original_PROFILE_ID) AND ([PROCESS_NAME] = @Original_PROCESS_NAME) AND ("& _
"[DESCRIPTION] = @Original_DESCRIPTION) AND ([REGEX] = @Original_REGEX) AND ([SEQ"& _
"UENCE] = @Original_SEQUENCE) AND ([REGEX_CLIPBOARD] = @Original_REGEX_CLIPBOARD)"& _
" AND ([ADDED_WHO] = @Original_ADDED_WHO) AND ((@IsNull_ADDED_WHEN = 1 AND [ADDED"& _
"_WHEN] IS NULL) OR ([ADDED_WHEN] = @Original_ADDED_WHEN)) AND ((@IsNull_CHANGED_"& _
"WHO = 1 AND [CHANGED_WHO] IS NULL) OR ([CHANGED_WHO] = @Original_CHANGED_WHO)) A"& _
"ND ((@IsNull_CHANGED_WHEN = 1 AND [CHANGED_WHEN] IS NULL) OR ([CHANGED_WHEN] = @"& _
"Original_CHANGED_WHEN)))"
Me._adapter.DeleteCommand.CommandText = "DELETE FROM TBCW_PROF_REL_WINDOW"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE (GUID = @Original_GUID)"
Me._adapter.DeleteCommand.CommandType = Global.System.Data.CommandType.Text
Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_GUID", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "GUID", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_PROFILE_ID", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "PROFILE_ID", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_PROCESS_NAME", Global.System.Data.SqlDbType.VarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "PROCESS_NAME", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_DESCRIPTION", Global.System.Data.SqlDbType.VarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "DESCRIPTION", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_REGEX", Global.System.Data.SqlDbType.VarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "REGEX", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_SEQUENCE", Global.System.Data.SqlDbType.TinyInt, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "SEQUENCE", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_REGEX_CLIPBOARD", Global.System.Data.SqlDbType.VarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "REGEX_CLIPBOARD", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_ADDED_WHO", Global.System.Data.SqlDbType.VarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "ADDED_WHO", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_ADDED_WHEN", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "ADDED_WHEN", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_ADDED_WHEN", Global.System.Data.SqlDbType.DateTime, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "ADDED_WHEN", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_CHANGED_WHO", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "CHANGED_WHO", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_CHANGED_WHO", Global.System.Data.SqlDbType.VarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "CHANGED_WHO", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_CHANGED_WHEN", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "CHANGED_WHEN", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_CHANGED_WHEN", Global.System.Data.SqlDbType.DateTime, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "CHANGED_WHEN", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_GUID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "GUID", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
Me._adapter.InsertCommand = New Global.System.Data.SqlClient.SqlCommand()
Me._adapter.InsertCommand.Connection = Me.Connection
Me._adapter.InsertCommand.CommandText = "INSERT INTO [TBCW_PROF_REL_WINDOW] ([PROFILE_ID], [PROCESS_NAME], [DESCRIPTION], "& _
@@ -10401,47 +10380,27 @@ Namespace MyDatasetTableAdapters
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CHANGED_WHEN", Global.System.Data.SqlDbType.DateTime, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "CHANGED_WHEN", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.UpdateCommand = New Global.System.Data.SqlClient.SqlCommand()
Me._adapter.UpdateCommand.Connection = Me.Connection
Me._adapter.UpdateCommand.CommandText = "UPDATE [TBCW_PROF_REL_WINDOW] SET [PROFILE_ID] = @PROFILE_ID, [PROCESS_NAME] = @P"& _
"ROCESS_NAME, [DESCRIPTION] = @DESCRIPTION, [REGEX] = @REGEX, [SEQUENCE] = @SEQUE"& _
"NCE, [REGEX_CLIPBOARD] = @REGEX_CLIPBOARD, [ADDED_WHO] = @ADDED_WHO, [ADDED_WHEN"& _
"] = @ADDED_WHEN, [CHANGED_WHO] = @CHANGED_WHO, [CHANGED_WHEN] = @CHANGED_WHEN WH"& _
"ERE (([GUID] = @Original_GUID) AND ([PROFILE_ID] = @Original_PROFILE_ID) AND ([P"& _
"ROCESS_NAME] = @Original_PROCESS_NAME) AND ([DESCRIPTION] = @Original_DESCRIPTIO"& _
"N) AND ([REGEX] = @Original_REGEX) AND ([SEQUENCE] = @Original_SEQUENCE) AND ([R"& _
"EGEX_CLIPBOARD] = @Original_REGEX_CLIPBOARD) AND ([ADDED_WHO] = @Original_ADDED_"& _
"WHO) AND ((@IsNull_ADDED_WHEN = 1 AND [ADDED_WHEN] IS NULL) OR ([ADDED_WHEN] = @"& _
"Original_ADDED_WHEN)) AND ((@IsNull_CHANGED_WHO = 1 AND [CHANGED_WHO] IS NULL) O"& _
"R ([CHANGED_WHO] = @Original_CHANGED_WHO)) AND ((@IsNull_CHANGED_WHEN = 1 AND [C"& _
"HANGED_WHEN] IS NULL) OR ([CHANGED_WHEN] = @Original_CHANGED_WHEN)));"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SELECT GU"& _
"ID, PROFILE_ID, PROCESS_NAME, DESCRIPTION, REGEX, SEQUENCE, REGEX_CLIPBOARD, ADD"& _
"ED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN FROM TBCW_PROF_REL_WINDOW WHERE (G"& _
"UID = @GUID)"
Me._adapter.UpdateCommand.CommandText = "UPDATE TBCW_PROF_REL_WINDOW"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SET PROFILE_ID = @PROFILE_ID, P"& _
"ROCESS_NAME = @PROCESS_NAME, DESCRIPTION = @DESCRIPTION, REGEX = @REGEX, SEQUENC"& _
"E = @SEQUENCE, REGEX_CLIPBOARD = @REGEX_CLIPBOARD, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" AD"& _
"DED_WHO = @ADDED_WHO, ADDED_WHEN = @ADDED_WHEN, CHANGED_WHO = @CHANGED_WHO, CHAN"& _
"GED_WHEN = @CHANGED_WHEN"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE (GUID = @Original_GUID); "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SELECT GUID, P"& _
"ROFILE_ID, PROCESS_NAME, DESCRIPTION, REGEX, SEQUENCE, REGEX_CLIPBOARD, ADDED_WH"& _
"O, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN FROM TBCW_PROF_REL_WINDOW WHERE (GUID ="& _
" @GUID)"
Me._adapter.UpdateCommand.CommandType = Global.System.Data.CommandType.Text
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@PROFILE_ID", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "PROFILE_ID", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@PROCESS_NAME", Global.System.Data.SqlDbType.VarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "PROCESS_NAME", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@DESCRIPTION", Global.System.Data.SqlDbType.VarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "DESCRIPTION", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@REGEX", Global.System.Data.SqlDbType.VarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "REGEX", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@SEQUENCE", Global.System.Data.SqlDbType.TinyInt, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "SEQUENCE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@REGEX_CLIPBOARD", Global.System.Data.SqlDbType.VarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "REGEX_CLIPBOARD", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ADDED_WHO", Global.System.Data.SqlDbType.VarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "ADDED_WHO", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ADDED_WHEN", Global.System.Data.SqlDbType.DateTime, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "ADDED_WHEN", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CHANGED_WHO", Global.System.Data.SqlDbType.VarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "CHANGED_WHO", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CHANGED_WHEN", Global.System.Data.SqlDbType.DateTime, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "CHANGED_WHEN", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_GUID", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "GUID", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_PROFILE_ID", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "PROFILE_ID", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_PROCESS_NAME", Global.System.Data.SqlDbType.VarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "PROCESS_NAME", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_DESCRIPTION", Global.System.Data.SqlDbType.VarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "DESCRIPTION", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_REGEX", Global.System.Data.SqlDbType.VarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "REGEX", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_SEQUENCE", Global.System.Data.SqlDbType.TinyInt, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "SEQUENCE", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_REGEX_CLIPBOARD", Global.System.Data.SqlDbType.VarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "REGEX_CLIPBOARD", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_ADDED_WHO", Global.System.Data.SqlDbType.VarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "ADDED_WHO", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_ADDED_WHEN", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "ADDED_WHEN", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_ADDED_WHEN", Global.System.Data.SqlDbType.DateTime, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "ADDED_WHEN", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_CHANGED_WHO", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "CHANGED_WHO", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_CHANGED_WHO", Global.System.Data.SqlDbType.VarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "CHANGED_WHO", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_CHANGED_WHEN", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "CHANGED_WHEN", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_CHANGED_WHEN", Global.System.Data.SqlDbType.DateTime, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "CHANGED_WHEN", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@GUID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "GUID", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.UpdateCommand.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, "", "", ""))
Me._adapter.UpdateCommand.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._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@DESCRIPTION", Global.System.Data.SqlDbType.VarChar, 250, Global.System.Data.ParameterDirection.Input, 0, 0, "DESCRIPTION", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@REGEX", Global.System.Data.SqlDbType.VarChar, 500, Global.System.Data.ParameterDirection.Input, 0, 0, "REGEX", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@SEQUENCE", Global.System.Data.SqlDbType.TinyInt, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "SEQUENCE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@REGEX_CLIPBOARD", Global.System.Data.SqlDbType.VarChar, 500, Global.System.Data.ParameterDirection.Input, 0, 0, "REGEX_CLIPBOARD", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ADDED_WHO", Global.System.Data.SqlDbType.VarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "ADDED_WHO", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ADDED_WHEN", Global.System.Data.SqlDbType.DateTime, 8, Global.System.Data.ParameterDirection.Input, 0, 0, "ADDED_WHEN", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CHANGED_WHO", Global.System.Data.SqlDbType.VarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "CHANGED_WHO", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CHANGED_WHEN", Global.System.Data.SqlDbType.DateTime, 8, Global.System.Data.ParameterDirection.Input, 0, 0, "CHANGED_WHEN", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_GUID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "GUID", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@GUID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "GUID", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _

96
app/DD_Clipboard_Searcher/MyDataset.xsd
View File

@@ -529,23 +529,11 @@ WHERE (GUID = @GUID)</CommandText>
<MainSource>
<DbSource ConnectionRef="DD_ECMConnectionString (MySettings)" DbObjectName="DD_ECM_TEST.dbo.TBCW_PROF_REL_WINDOW" DbObjectType="Table" FillMethodModifier="Public" FillMethodName="Fill" GenerateMethods="Both" GenerateShortCommands="false" GeneratorGetMethodName="GetData" GeneratorSourceName="Fill" GetMethodModifier="Public" GetMethodName="GetData" QueryType="Rowset" ScalarCallRetval="System.Object, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" UseOptimisticConcurrency="true" UserGetMethodName="GetData" UserSourceName="Fill">
<DeleteCommand>
<DbCommand CommandType="Text" ModifiedByUser="false">
<CommandText>DELETE FROM [TBCW_PROF_REL_WINDOW] WHERE (([GUID] = @Original_GUID) AND ([PROFILE_ID] = @Original_PROFILE_ID) AND ([PROCESS_NAME] = @Original_PROCESS_NAME) AND ([DESCRIPTION] = @Original_DESCRIPTION) AND ([REGEX] = @Original_REGEX) AND ([SEQUENCE] = @Original_SEQUENCE) AND ([REGEX_CLIPBOARD] = @Original_REGEX_CLIPBOARD) AND ([ADDED_WHO] = @Original_ADDED_WHO) AND ((@IsNull_ADDED_WHEN = 1 AND [ADDED_WHEN] IS NULL) OR ([ADDED_WHEN] = @Original_ADDED_WHEN)) AND ((@IsNull_CHANGED_WHO = 1 AND [CHANGED_WHO] IS NULL) OR ([CHANGED_WHO] = @Original_CHANGED_WHO)) AND ((@IsNull_CHANGED_WHEN = 1 AND [CHANGED_WHEN] IS NULL) OR ([CHANGED_WHEN] = @Original_CHANGED_WHEN)))</CommandText>
<DbCommand CommandType="Text" ModifiedByUser="true">
<CommandText>DELETE FROM TBCW_PROF_REL_WINDOW
WHERE (GUID = @Original_GUID)</CommandText>
<Parameters>
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@Original_GUID" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="GUID" SourceColumnNullMapping="false" SourceVersion="Original" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@Original_PROFILE_ID" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="PROFILE_ID" SourceColumnNullMapping="false" SourceVersion="Original" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@Original_PROCESS_NAME" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="PROCESS_NAME" SourceColumnNullMapping="false" SourceVersion="Original" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@Original_DESCRIPTION" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="DESCRIPTION" SourceColumnNullMapping="false" SourceVersion="Original" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@Original_REGEX" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="REGEX" SourceColumnNullMapping="false" SourceVersion="Original" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Byte" Direction="Input" ParameterName="@Original_SEQUENCE" Precision="0" ProviderType="TinyInt" Scale="0" Size="0" SourceColumn="SEQUENCE" SourceColumnNullMapping="false" SourceVersion="Original" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@Original_REGEX_CLIPBOARD" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="REGEX_CLIPBOARD" SourceColumnNullMapping="false" SourceVersion="Original" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@Original_ADDED_WHO" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="ADDED_WHO" SourceColumnNullMapping="false" SourceVersion="Original" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@IsNull_ADDED_WHEN" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="ADDED_WHEN" SourceColumnNullMapping="true" SourceVersion="Original" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="DateTime" Direction="Input" ParameterName="@Original_ADDED_WHEN" Precision="0" ProviderType="DateTime" Scale="0" Size="0" SourceColumn="ADDED_WHEN" SourceColumnNullMapping="false" SourceVersion="Original" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@IsNull_CHANGED_WHO" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="CHANGED_WHO" SourceColumnNullMapping="true" SourceVersion="Original" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@Original_CHANGED_WHO" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="CHANGED_WHO" SourceColumnNullMapping="false" SourceVersion="Original" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@IsNull_CHANGED_WHEN" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="CHANGED_WHEN" SourceColumnNullMapping="true" SourceVersion="Original" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="DateTime" Direction="Input" ParameterName="@Original_CHANGED_WHEN" Precision="0" ProviderType="DateTime" Scale="0" Size="0" SourceColumn="CHANGED_WHEN" SourceColumnNullMapping="false" SourceVersion="Original" />
<Parameter AllowDbNull="false" AutogeneratedName="Original_GUID" ColumnName="GUID" DataSourceName="DD_ECM_TEST.dbo.TBCW_PROF_REL_WINDOW" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@Original_GUID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="GUID" SourceColumnNullMapping="false" SourceVersion="Original" />
</Parameters>
</DbCommand>
</DeleteCommand>
@@ -578,35 +566,25 @@ FROM TBCW_PROF_REL_WINDOW WHERE PROCESS_NAME = @PROCESS_NAME AND PROF
</DbCommand>
</SelectCommand>
<UpdateCommand>
<DbCommand CommandType="Text" ModifiedByUser="false">
<CommandText>UPDATE [TBCW_PROF_REL_WINDOW] SET [PROFILE_ID] = @PROFILE_ID, [PROCESS_NAME] = @PROCESS_NAME, [DESCRIPTION] = @DESCRIPTION, [REGEX] = @REGEX, [SEQUENCE] = @SEQUENCE, [REGEX_CLIPBOARD] = @REGEX_CLIPBOARD, [ADDED_WHO] = @ADDED_WHO, [ADDED_WHEN] = @ADDED_WHEN, [CHANGED_WHO] = @CHANGED_WHO, [CHANGED_WHEN] = @CHANGED_WHEN WHERE (([GUID] = @Original_GUID) AND ([PROFILE_ID] = @Original_PROFILE_ID) AND ([PROCESS_NAME] = @Original_PROCESS_NAME) AND ([DESCRIPTION] = @Original_DESCRIPTION) AND ([REGEX] = @Original_REGEX) AND ([SEQUENCE] = @Original_SEQUENCE) AND ([REGEX_CLIPBOARD] = @Original_REGEX_CLIPBOARD) AND ([ADDED_WHO] = @Original_ADDED_WHO) AND ((@IsNull_ADDED_WHEN = 1 AND [ADDED_WHEN] IS NULL) OR ([ADDED_WHEN] = @Original_ADDED_WHEN)) AND ((@IsNull_CHANGED_WHO = 1 AND [CHANGED_WHO] IS NULL) OR ([CHANGED_WHO] = @Original_CHANGED_WHO)) AND ((@IsNull_CHANGED_WHEN = 1 AND [CHANGED_WHEN] IS NULL) OR ([CHANGED_WHEN] = @Original_CHANGED_WHEN)));
<DbCommand CommandType="Text" ModifiedByUser="true">
<CommandText>UPDATE TBCW_PROF_REL_WINDOW
SET PROFILE_ID = @PROFILE_ID, PROCESS_NAME = @PROCESS_NAME, DESCRIPTION = @DESCRIPTION, REGEX = @REGEX, SEQUENCE = @SEQUENCE, REGEX_CLIPBOARD = @REGEX_CLIPBOARD,
ADDED_WHO = @ADDED_WHO, ADDED_WHEN = @ADDED_WHEN, CHANGED_WHO = @CHANGED_WHO, CHANGED_WHEN = @CHANGED_WHEN
WHERE (GUID = @Original_GUID);
SELECT GUID, PROFILE_ID, PROCESS_NAME, DESCRIPTION, REGEX, SEQUENCE, REGEX_CLIPBOARD, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN FROM TBCW_PROF_REL_WINDOW WHERE (GUID = @GUID)</CommandText>
<Parameters>
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@PROFILE_ID" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="PROFILE_ID" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@PROCESS_NAME" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="PROCESS_NAME" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@DESCRIPTION" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="DESCRIPTION" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@REGEX" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="REGEX" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Byte" Direction="Input" ParameterName="@SEQUENCE" Precision="0" ProviderType="TinyInt" Scale="0" Size="0" SourceColumn="SEQUENCE" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@REGEX_CLIPBOARD" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="REGEX_CLIPBOARD" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@ADDED_WHO" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="ADDED_WHO" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="DateTime" Direction="Input" ParameterName="@ADDED_WHEN" Precision="0" ProviderType="DateTime" Scale="0" Size="0" SourceColumn="ADDED_WHEN" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@CHANGED_WHO" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="CHANGED_WHO" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="DateTime" Direction="Input" ParameterName="@CHANGED_WHEN" Precision="0" ProviderType="DateTime" Scale="0" Size="0" SourceColumn="CHANGED_WHEN" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@Original_GUID" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="GUID" SourceColumnNullMapping="false" SourceVersion="Original" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@Original_PROFILE_ID" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="PROFILE_ID" SourceColumnNullMapping="false" SourceVersion="Original" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@Original_PROCESS_NAME" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="PROCESS_NAME" SourceColumnNullMapping="false" SourceVersion="Original" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@Original_DESCRIPTION" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="DESCRIPTION" SourceColumnNullMapping="false" SourceVersion="Original" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@Original_REGEX" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="REGEX" SourceColumnNullMapping="false" SourceVersion="Original" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Byte" Direction="Input" ParameterName="@Original_SEQUENCE" Precision="0" ProviderType="TinyInt" Scale="0" Size="0" SourceColumn="SEQUENCE" SourceColumnNullMapping="false" SourceVersion="Original" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@Original_REGEX_CLIPBOARD" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="REGEX_CLIPBOARD" SourceColumnNullMapping="false" SourceVersion="Original" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@Original_ADDED_WHO" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="ADDED_WHO" SourceColumnNullMapping="false" SourceVersion="Original" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@IsNull_ADDED_WHEN" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="ADDED_WHEN" SourceColumnNullMapping="true" SourceVersion="Original" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="DateTime" Direction="Input" ParameterName="@Original_ADDED_WHEN" Precision="0" ProviderType="DateTime" Scale="0" Size="0" SourceColumn="ADDED_WHEN" SourceColumnNullMapping="false" SourceVersion="Original" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@IsNull_CHANGED_WHO" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="CHANGED_WHO" SourceColumnNullMapping="true" SourceVersion="Original" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@Original_CHANGED_WHO" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="CHANGED_WHO" SourceColumnNullMapping="false" SourceVersion="Original" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@IsNull_CHANGED_WHEN" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="CHANGED_WHEN" SourceColumnNullMapping="true" SourceVersion="Original" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="DateTime" Direction="Input" ParameterName="@Original_CHANGED_WHEN" Precision="0" ProviderType="DateTime" Scale="0" Size="0" SourceColumn="CHANGED_WHEN" SourceColumnNullMapping="false" SourceVersion="Original" />
<Parameter AllowDbNull="false" AutogeneratedName="GUID" ColumnName="GUID" DataSourceName="DD_ECM_TEST.dbo.TBCW_PROF_REL_WINDOW" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@GUID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="GUID" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="PROFILE_ID" ColumnName="PROFILE_ID" DataSourceName="DD_ECM_TEST.dbo.TBCW_PROF_REL_WINDOW" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@PROFILE_ID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="PROFILE_ID" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="PROCESS_NAME" ColumnName="PROCESS_NAME" DataSourceName="DD_ECM_TEST.dbo.TBCW_PROF_REL_WINDOW" 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="DESCRIPTION" ColumnName="DESCRIPTION" DataSourceName="DD_ECM_TEST.dbo.TBCW_PROF_REL_WINDOW" DataTypeServer="varchar(250)" DbType="AnsiString" Direction="Input" ParameterName="@DESCRIPTION" Precision="0" ProviderType="VarChar" Scale="0" Size="250" SourceColumn="DESCRIPTION" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="REGEX" ColumnName="REGEX" DataSourceName="DD_ECM_TEST.dbo.TBCW_PROF_REL_WINDOW" DataTypeServer="varchar(500)" DbType="AnsiString" Direction="Input" ParameterName="@REGEX" Precision="0" ProviderType="VarChar" Scale="0" Size="500" SourceColumn="REGEX" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="SEQUENCE" ColumnName="SEQUENCE" DataSourceName="DD_ECM_TEST.dbo.TBCW_PROF_REL_WINDOW" DataTypeServer="tinyint" DbType="Byte" Direction="Input" ParameterName="@SEQUENCE" Precision="0" ProviderType="TinyInt" Scale="0" Size="1" SourceColumn="SEQUENCE" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="REGEX_CLIPBOARD" ColumnName="REGEX_CLIPBOARD" DataSourceName="DD_ECM_TEST.dbo.TBCW_PROF_REL_WINDOW" DataTypeServer="varchar(500)" DbType="AnsiString" Direction="Input" ParameterName="@REGEX_CLIPBOARD" Precision="0" ProviderType="VarChar" Scale="0" Size="500" SourceColumn="REGEX_CLIPBOARD" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="ADDED_WHO" ColumnName="ADDED_WHO" DataSourceName="DD_ECM_TEST.dbo.TBCW_PROF_REL_WINDOW" DataTypeServer="varchar(50)" DbType="AnsiString" Direction="Input" ParameterName="@ADDED_WHO" Precision="0" ProviderType="VarChar" Scale="0" Size="50" SourceColumn="ADDED_WHO" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="ADDED_WHEN" ColumnName="ADDED_WHEN" DataSourceName="DD_ECM_TEST.dbo.TBCW_PROF_REL_WINDOW" DataTypeServer="datetime" DbType="DateTime" Direction="Input" ParameterName="@ADDED_WHEN" Precision="0" ProviderType="DateTime" Scale="0" Size="8" SourceColumn="ADDED_WHEN" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="CHANGED_WHO" ColumnName="CHANGED_WHO" DataSourceName="DD_ECM_TEST.dbo.TBCW_PROF_REL_WINDOW" DataTypeServer="varchar(50)" DbType="AnsiString" Direction="Input" ParameterName="@CHANGED_WHO" Precision="0" ProviderType="VarChar" Scale="0" Size="50" SourceColumn="CHANGED_WHO" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="CHANGED_WHEN" ColumnName="CHANGED_WHEN" DataSourceName="DD_ECM_TEST.dbo.TBCW_PROF_REL_WINDOW" DataTypeServer="datetime" DbType="DateTime" Direction="Input" ParameterName="@CHANGED_WHEN" Precision="0" ProviderType="DateTime" Scale="0" Size="8" SourceColumn="CHANGED_WHEN" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="Original_GUID" ColumnName="GUID" DataSourceName="DD_ECM_TEST.dbo.TBCW_PROF_REL_WINDOW" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@Original_GUID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="GUID" SourceColumnNullMapping="false" SourceVersion="Original" />
<Parameter AllowDbNull="false" AutogeneratedName="GUID" ColumnName="GUID" DataSourceName="DD_ECM_TEST.dbo.TBCW_PROF_REL_WINDOW" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@GUID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="GUID" SourceColumnNullMapping="false" SourceVersion="Original" />
</Parameters>
</DbCommand>
</UpdateCommand>
@@ -737,7 +715,7 @@ SELECT GUID, BEZEICHNUNG, SQL_PROVIDER, SERVER, DATENBANK, USERNAME, PASSWORD, B
<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" />
@@ -790,7 +768,7 @@ SELECT GUID, BEZEICHNUNG, SQL_PROVIDER, SERVER, DATENBANK, USERNAME, PASSWORD, B
</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" />
@@ -807,7 +785,7 @@ SELECT GUID, BEZEICHNUNG, SQL_PROVIDER, SERVER, DATENBANK, USERNAME, PASSWORD, B
</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" />
@@ -836,7 +814,7 @@ SELECT GUID, BEZEICHNUNG, SQL_PROVIDER, SERVER, DATENBANK, USERNAME, PASSWORD, B
</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" />
@@ -847,7 +825,7 @@ SELECT GUID, BEZEICHNUNG, SQL_PROVIDER, SERVER, DATENBANK, USERNAME, PASSWORD, B
</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" />
@@ -870,7 +848,7 @@ SELECT GUID, BEZEICHNUNG, SQL_PROVIDER, SERVER, DATENBANK, USERNAME, PASSWORD, B
</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" />
@@ -918,7 +896,7 @@ SELECT GUID, BEZEICHNUNG, SQL_PROVIDER, SERVER, DATENBANK, USERNAME, PASSWORD, B
</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" />
@@ -966,7 +944,7 @@ SELECT GUID, BEZEICHNUNG, SQL_PROVIDER, SERVER, DATENBANK, USERNAME, PASSWORD, B
</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" />
@@ -983,7 +961,7 @@ SELECT GUID, BEZEICHNUNG, SQL_PROVIDER, SERVER, DATENBANK, USERNAME, PASSWORD, B
</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" />
@@ -991,7 +969,7 @@ SELECT GUID, BEZEICHNUNG, SQL_PROVIDER, SERVER, DATENBANK, USERNAME, PASSWORD, B
</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" />
@@ -1005,7 +983,7 @@ SELECT GUID, BEZEICHNUNG, SQL_PROVIDER, SERVER, DATENBANK, USERNAME, PASSWORD, B
</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" />
@@ -1013,7 +991,7 @@ SELECT GUID, BEZEICHNUNG, SQL_PROVIDER, SERVER, DATENBANK, USERNAME, PASSWORD, B
</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" />
@@ -1066,7 +1044,7 @@ SELECT GUID, BEZEICHNUNG, SQL_PROVIDER, SERVER, DATENBANK, USERNAME, PASSWORD, B
</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" />
@@ -1184,9 +1162,9 @@ SELECT GUID, BEZEICHNUNG, SQL_PROVIDER, SERVER, DATENBANK, USERNAME, PASSWORD, B
</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_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_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_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_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_ParentPropName="TBCW_PROFILESRow" msprop:Generator_RelationVarName="relationFK_TBCW_PROF_REL_CONTROL_PROF_ID" msprop:Generator_UserParentTable="TBCW_PROFILES" />
</xs:appinfo>
</xs:annotation>
</xs:schema>

80
app/DD_Clipboard_Searcher/clsWINDOWSApi.vb
View File

@@ -1,80 +0,0 @@
Imports DD_LIB_Standards
Imports System.Text
Public Class clsWINDOWSApi
Private Declare Function GetForegroundWindow Lib "user32.dll" Alias "GetForegroundWindow" () As IntPtr
Private Declare Auto Function GetWindowText Lib "user32.dll" (ByVal hWnd As IntPtr, ByVal lpString As System.Text.StringBuilder, ByVal cch As Integer) As Integer
Private Declare Function GetWindowThreadProcessId Lib "user32.dll" (ByVal hwnd As IntPtr, ByRef lpdwProcessID As Integer) As Integer
Private Declare Function GetWindowText Lib "user32.dll" Alias "GetWindowTextA" (ByVal hWnd As IntPtr, ByVal WinTitle As String, ByVal MaxLength As Integer) As Integer
Private Declare Function GetWindowTextLength Lib "user32.dll" Alias "GetWindowTextLengthA" (ByVal hwnd As Int32) As Integer
Private Shared Function GetClassName(ByVal hWnd As IntPtr,
ByVal lpClassName As System.Text.StringBuilder,
ByVal nMaxCount As Integer) As Integer
' Leave function empty
End Function
Private Shared m_LastHwnd As Long
Public Shared Function GetCaption() As String
Dim oCaption As New StringBuilder(256)
Dim hWnd As IntPtr = GetForegroundWindow()
Dim oPid As Integer = 0
GetWindowThreadProcessId(hWnd, oPid)
If oPid = 0 Then
Return String.Empty
Else
Return oCaption.ToString()
End If
End Function
Public Shared Function IsRelevantWindow(windowname As String)
Try
Dim oEnumerator As New clsWindowApi
'Jedes Formularwindow durchlaufen
For Each oWindow As clsWindowApi.ApiWindow In oEnumerator.GetTopLevelWindows()
Logger.Debug(" ... top-window Name: " & oWindow.MainWindowTitle, False)
If oWindow.MainWindowTitle.Contains(windowname) Or oWindow.MainWindowTitle.ToLower = windowname.ToLower Then
Console.WriteLine(oWindow.MainWindowTitle)
Return False
End If
Next oWindow
Catch ex As Exception
MsgBox("Error in IsRelevantWindowt:" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
Logger.Info(">> Error in IsRelevantWindow:" & ex.Message, False)
Return False
End Try
End Function
Public Shared Sub Get_ForegroundWindow_Info()
'—– Get the Handle to the Current Forground Window —–
Dim hWnd As IntPtr = GetForegroundWindow()
If hWnd = IntPtr.Zero Then Exit Sub
'—– Find the Length of the Window’s Title —–
Dim TitleLength As Int32
TitleLength = GetWindowTextLength(hWnd)
'—– Find the Window’s Title —–
Dim WindowTitle As String = StrDup(TitleLength + 1, "*")
GetWindowText(hWnd, WindowTitle, TitleLength + 1)
'—– Find the PID of the Application that Owns the Window —–
Dim pid As Integer = 0
GetWindowThreadProcessId(hWnd, pid)
If pid = 0 Then Exit Sub
'—– Get the actual PROCESS from the process ID —–
Dim proc As Process = Process.GetProcessById(pid)
If proc Is Nothing Then Exit Sub
Dim msg = pid.ToString & vbNewLine
CurrPROC_PID = pid.ToString
CurrPROC_Name = proc.ProcessName
msg &= vbNewLine & "Procname: " & proc.ProcessName
msg &= vbNewLine & "MainWindowTitle: " & proc.MainWindowTitle
msg &= vbNewLine & "WindowTitle: " & WindowTitle
CurrPROC_WindowTitle = WindowTitle
msg &= vbNewLine & TitleLength.ToString
' MsgBox(msg)
End Sub
End Class

179
app/DD_Clipboard_Searcher/clsWindowApivb.vb
View File

@@ -1,179 +0,0 @@
Imports System.Data
Imports System.Runtime.InteropServices
Imports System.Text
Imports System.Collections.Generic
Public Class clsWindowApi
Public Class ApiWindow
Public MainWindowTitle As String = ""
Public ClassName As String = ""
Public hWnd As Int32
End Class
Private Delegate Function EnumCallBackDelegate(ByVal hwnd As Integer, ByVal lParam As Integer) As Integer
' Top-level windows.
Private Declare Function EnumWindows Lib "user32" _
(ByVal lpEnumFunc As EnumCallBackDelegate, ByVal lParam As Integer) As Integer
' Child windows.
Private Declare Function EnumChildWindows Lib "user32" _
(ByVal hWndParent As Integer, ByVal lpEnumFunc As EnumCallBackDelegate, ByVal lParam As Integer) As Integer
' Get the window class.
Private Declare Function GetClassName _
Lib "user32" Alias "GetClassNameA" _
(ByVal hwnd As Integer, ByVal lpClassName As StringBuilder, ByVal nMaxCount As Integer) As Integer
' Test if the window is visible--only get visible ones.
Private Declare Function IsWindowVisible Lib "user32" _
(ByVal hwnd As Integer) As Integer
' Test if the window's parent--only get the one's without parents.
Private Declare Function GetParent Lib "user32" _
(ByVal hwnd As Integer) As Integer
' Get window text length signature.
Private Declare Function SendMessage _
Lib "user32" Alias "SendMessageA" _
(ByVal hwnd As Int32, ByVal wMsg As Int32, ByVal wParam As Int32, ByVal lParam As Int32) As Int32
' Get window text signature.
Private Declare Function SendMessage _
Lib "user32" Alias "SendMessageA" _
(ByVal hwnd As Int32, ByVal wMsg As Int32, ByVal wParam As Int32, ByVal lParam As StringBuilder) As Int32
Private _listChildren As New List(Of ApiWindow)
Private _listTopLevel As New List(Of ApiWindow)
Private _topLevelClass As String = ""
Private _childClass As String = ""
''' <summary>
''' Get all top-level window information
''' </summary>
''' <returns>List of window information objects</returns>
Public Overloads Function GetTopLevelWindows() As List(Of ApiWindow)
EnumWindows(AddressOf EnumWindowProc, &H0)
Return _listTopLevel
End Function
Public Overloads Function GetTopLevelWindows(ByVal className As String) As List(Of ApiWindow)
_topLevelClass = className
Return Me.GetTopLevelWindows()
End Function
''' <summary>
''' Get all child windows for the specific windows handle (hwnd).
''' </summary>
''' <returns>List of child windows for parent window</returns>
Public Overloads Function GetChildWindows(ByVal hwnd As Int32) As List(Of ApiWindow)
' Clear the window list.
_listChildren = New List(Of ApiWindow)
' Start the enumeration process.
EnumChildWindows(hwnd, AddressOf EnumChildWindowProc, &H0)
' Return the children list when the process is completed.
Return _listChildren
End Function
Public Overloads Function GetChildWindows(ByVal hwnd As Int32, ByVal childClass As String) As List(Of ApiWindow)
' Set the search
_childClass = childClass
Return Me.GetChildWindows(hwnd)
End Function
''' <summary>
''' Callback function that does the work of enumerating top-level windows.
''' </summary>
''' <param name="hwnd">Discovered Window handle</param>
''' <returns>1=keep going, 0=stop</returns>
Private Function EnumWindowProc(ByVal hwnd As Int32, ByVal lParam As Int32) As Int32
' Eliminate windows that are not top-level.
If GetParent(hwnd) = 0 AndAlso CBool(IsWindowVisible(hwnd)) Then
' Get the window title / class name.
Dim window As ApiWindow = GetWindowIdentification(hwnd)
' Match the class name if searching for a specific window class.
If _topLevelClass.Length = 0 OrElse window.ClassName.ToLower() = _topLevelClass.ToLower() Then
_listTopLevel.Add(window)
End If
End If
' To continue enumeration, return True (1), and to stop enumeration
' return False (0).
' When 1 is returned, enumeration continues until there are no
' more windows left.
Return 1
End Function
''' <summary>
''' Callback function that does the work of enumerating child windows.
''' </summary>
''' <param name="hwnd">Discovered Window handle</param>
''' <returns>1=keep going, 0=stop</returns>
Private Function EnumChildWindowProc(ByVal hwnd As Int32, ByVal lParam As Int32) As Int32
Dim window As ApiWindow = GetWindowIdentification(hwnd)
' Attempt to match the child class, if one was specified, otherwise
' enumerate all the child windows.
If _childClass.Length = 0 OrElse window.ClassName.ToLower() = _childClass.ToLower() Then
_listChildren.Add(window)
End If
Return 1
End Function
''' <summary>
''' Build the ApiWindow object to hold information about the Window object.
''' </summary>
Private Function GetWindowIdentification(ByVal hwnd As Integer) As ApiWindow
Const WM_GETTEXT As Int32 = &HD
Const WM_GETTEXTLENGTH As Int32 = &HE
Dim window As New ApiWindow()
Dim title As New StringBuilder()
' Get the size of the string required to hold the window title.
Dim size As Int32 = SendMessage(hwnd, WM_GETTEXTLENGTH, 0, 0)
' If the return is 0, there is no title.
If size > 0 Then
title = New StringBuilder(size + 1)
SendMessage(hwnd, WM_GETTEXT, title.Capacity, title)
End If
' Get the class name for the window.
Dim classBuilder As New StringBuilder(64)
GetClassName(hwnd, classBuilder, 64)
' Set the properties for the ApiWindow object.
window.ClassName = classBuilder.ToString()
window.MainWindowTitle = title.ToString()
window.hWnd = hwnd
Return window
End Function
End Class

1
app/DD_Clipboard_Searcher/ctrlApplicationAssignment.vb
View File

@@ -142,6 +142,7 @@ Public Class ctrlApplicationAssignment
Public Function Window_SaveAssignment() As Boolean
Try
GridView_Window.CloseEditor()
TBCW_PROF_REL_WINDOWBindingSource.EndEdit()
If Not IsNothing(MyDataset.TBCW_PROF_REL_WINDOW.GetChanges) Then
TBCW_PROF_REL_WINDOWBindingSource.EndEdit()

1096
app/DD_Clipboard_Searcher/frmAdministration.Designer.vb generated
View File

File diff suppressed because it is too large Load Diff

72
app/DD_Clipboard_Searcher/frmAdministration.resx
View File

@@ -123,6 +123,9 @@
<metadata name="MyDataset.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>245, 17</value>
</metadata>
<metadata name="MyDataset.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>245, 17</value>
</metadata>
<metadata name="TBWH_UserBindingSource.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>345, 56</value>
</metadata>
@@ -156,10 +159,32 @@
<metadata name="TBCW_PROF_DATA_SEARCHBindingSource.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 95</value>
</metadata>
<assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
<data name="TabPageGeneralSettings.ImageOptions.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAZdEVYdFNvZnR3YXJlAEFkb2JlIEltYWdlUmVhZHlxyWU8AAAAC3RFWHRUaXRsZQBIb21lOx50
ZDgAAADUSURBVDhPnZE9DoJAEIWxtfFkJl7AOwCNHQlmW6O30cTCRlAvY/zDdpw3YcgusLCx+GB4O+9L
yEbGGB8TZsPkms3XBwL6DZqhBcpbBstAJKECu3xkynrOuZyNCdrlKTNjHAm/m85YWc8gKVZmJxIrbwRD
ZUUkjCPBI6SsdCQIcVUIwFBZgUT3MwRLZl8HuqQLbezzE7PQAL/hLFTXhB5FKnwuSZ8AHecWnIU3l+7n
VHiVvQKZIyIS7BDz9xbTs0yF6hp3BNrzCjwEC8bwCoLpCP6Doh9wyB/S6rhfgQAAAABJRU5ErkJggg==
</value>
</data>
<data name="TabPageData.ImageOptions.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAZdEVYdFNvZnR3YXJlAEFkb2JlIEltYWdlUmVhZHlxyWU8AAAAHXRFWHRUaXRsZQBEYXRhYmFz
ZTtEQjtTb3VyY2U7U3Rvcqyx6nIAAACISURBVDhPY/j//z/DuyNFICwAxFFAPAuIzwHxJyQM4oPEQfIg
dWB9IAwzwAiIlwLxfyIwSJ0RugFzkBQQg+egG/AOTQEh/I7qBlDsBTMgJiUQzdANSANiTyAmJhpB6tLQ
DQCFwQMgBimKA2JdIOZBwiA+SBwkD1I3Gga0CAOKMxMIk5Gd/zMAAEoW6kGN/QioAAAAAElFTkSuQmCC
</value>
</data>
<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>
<metadata name="ApplicationMenu1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>997, 134</value>
</metadata>
<assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
<data name="BarButtonItem16.ImageOptions.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m
@@ -664,14 +689,53 @@
L0Mv7KiYDNEyrN2ITDbbQLQR1W7FJptlYLAVQ81hZLJZBgaHEdQcxyabbCB5HEPphcRkkw0kLyRQeiWb
SvZKBqteSh0C/3IkyBUVhzEDwFAxX8WNKUBLjuuwh+QMOHQsy6ZmnyAWTdvtKUoNOMv9OV2PZvMLsfKg
vDjYoZ0AAAAASUVORK5CYII=
</value>
</data>
<data name="TabPageDocuments.ImageOptions.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAZdEVYdFNvZnR3YXJlAEFkb2JlIEltYWdlUmVhZHlxyWU8AAAAFnRFWHRUaXRsZQBUZXh0O1Bh
Z2U7UmVwb3J0dmFhAAAAAFVJREFUOE9j+P//P0UYzmhpafmPB/+D0sbImkEYxQB8ACTf19d3F90QkgwA
gl/ohpBkADIGAtIMQAZ4DfBt2oEXg8CoC2jtAmIA7QwgBWMYQB7+zwAAuicvos+uzscAAAAASUVORK5C
YII=
</value>
</data>
<data name="TabPageProcessAssignment.ImageOptions.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAZdEVYdFNvZnR3YXJlAEFkb2JlIEltYWdlUmVhZHlxyWU8AAAAK3RFWHRUaXRsZQBTZXR1cDtD
dXN0b21pejtEZXNpZ247U2V0dGluZztQcm9wZXJ0OB+1IQAAAL5JREFUOE+tkzEOwyAMRXOMKMrKkiXK
QXqmSB17lJ6gF+qeOQv9D+HIg4cIOjwJ258vY2DIOYc8np8kjkqKNHAtJBrF5OJV5Mrq8pMYLfabEb7F
JmbxEmeFNTlqaNAWE+9qhTugLd0Wg2qCeySO2GyfN6BFE3zFLpYKa3JWny8DBUybgXFOE+wmMMi5Olr2
JApcE0mGZYIlMKATq5v2+ItB3xGcoG2IzqD9GpXoe0gK+p6yM2n7TBES3fjOefgBxElwF8N/bLEAAAAA
SUVORK5CYII=
</value>
</data>
<data name="TabPageUserAssignment.ImageOptions.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAZdEVYdFNvZnR3YXJlAEFkb2JlIEltYWdlUmVhZHlxyWU8AAAAMnRFWHRUaXRsZQBDdXN0b21l
cjtFbXBsb3llZTtQZXJzb247Q29udGFjdDtVc2VyO0NsaWVudH4RNugAAADNSURBVDhPpdExDkFBFAXQ
X4jeMkg0Kir03xrsRaWxCIuQ6EXCGv4KqL8CkXGvzLzMPP8xoTgymXffDaZwzv3l9TFbbLUh7OHiHWAM
Sc4qaMEJnHKGNkjWKuiCXg56IFmrYAJNyzQFyVoFS2haJs4kaxWM4AF6mXf8cyVrFdAOdAHvktynAj7Z
DcIyz9nPGMzh6PH8lrEKOrCC+M155h1nktUFA9jAHfi119D3eOYdZ8wwmxSUcIXwm79htowLqmiYq4oL
ajXMUUvB71zxBKd8P7UB7yhRAAAAAElFTkSuQmCC
</value>
</data>
<data name="TabPageGroupAssignment.ImageOptions.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAZdEVYdFNvZnR3YXJlAEFkb2JlIEltYWdlUmVhZHlxyWU8AAAAGHRFWHRUaXRsZQBUZWFtO1Bl
b3BsZTtHcm91cDtcOegWAAAA80lEQVQ4T6XQPQrCQBAFYJWAWHkGD6CdrQcQxDKthSeQQErFa1jYapnO
Kyh4CbGwF0yl63thJ0zWSREsPojz88yk5Zz7i1lsonyYbU9t2MHT20MHzLoVMAYXYM2sWwGxGrjCEiJv
AWeQfmwFpL75gbpz3sCZ1ArowwsuUHcOe5zp/wT4kAQOoM8RrLGX6B29zFuHMAA5R2ONvRFEZQB+dGED
N7jDFOQcWS5eG9jjDGe502PAEfQ/0Qp4jvzmM2t6hjIG5KrwgDXIOROveG1gjzMyn5ffwH+H8Jy5V3lt
vRMGWOeEMr0TBuhz6uR6pxLQnGt9AcOrflkk3vJqAAAAAElFTkSuQmCC
</value>
</data>
<metadata name="TBWH_PROFILE_TYPEBindingSource.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>751, 134</value>
</metadata>
<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>
<metadata name="VWCW_GROUP_PROFILEBindingSource.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>227, 134</value>
</metadata>

55
app/DD_Clipboard_Searcher/frmAdministration.vb
View File

@@ -2,6 +2,9 @@
Public Class frmAdministration
Private SelectedProcessName As String
Private Const MAX_DATA_SEARCHES = 5
Private Const MAX_DOC_SEARCHES = 5
Class ProfileType
Public Name As String
Public Id As Int16
@@ -82,7 +85,7 @@ Public Class frmAdministration
MyDataset.TBCW_PROFILES.PROFILE_TYPEColumn.DefaultValue = 0
MyDataset.TBCW_PROFILES.WD_SEARCHColumn.DefaultValue = String.Empty
MyDataset.TBCW_PROFILES.REGEX_EXPRESSIONColumn.DefaultValue = ".+"
MyDataset.TBCW_PROFILES.ACTIVEColumn.DefaultValue = False
MyDataset.TBCW_PROFILES.ACTIVEColumn.DefaultValue = True
XtraTabControl3.SelectedTabPage = TabPageGeneralSettings
End Sub
@@ -108,9 +111,15 @@ Public Class frmAdministration
TBCW_PROF_DOC_SEARCHTableAdapter.Connection.ConnectionString = MyConnectionString
TBCW_PROF_DOC_SEARCHTableAdapter.Fill(MyDataset.TBCW_PROF_DOC_SEARCH, GUIDTextBox.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)
If MyDataset.TBCW_PROF_DATA_SEARCH.Count = 0 Then
LayoutControlData.Enabled = False
End If
Catch ex As Exception
MsgBox("Unexpected Error in Refresh Profile User: " & vbNewLine & ex.Message, MsgBoxStyle.Critical)
End Try
@@ -232,17 +241,23 @@ Public Class frmAdministration
End Sub
Private Sub TBCW_PROF_DATA_SEARCHBindingSource_AddingNew(sender As Object, e As System.ComponentModel.AddingNewEventArgs) Handles TBCW_PROF_DATA_SEARCHBindingSource.AddingNew
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.CONN_IDColumn.DefaultValue = 1
MyDataset.TBCW_PROF_DATA_SEARCH.ACTIVEColumn.DefaultValue = False
MyDataset.TBCW_PROF_DATA_SEARCH.ACTIVEColumn.DefaultValue = True
LayoutControlData.Enabled = True
End Sub
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 = False
MyDataset.TBCW_PROF_DOC_SEARCH.ACTIVEColumn.DefaultValue = True
MyDataset.TBCW_PROF_DOC_SEARCH.PROFILE_IDColumn.DefaultValue = GUIDTextBox.Text
MyDataset.TBCW_PROF_DOC_SEARCH.CONN_IDColumn.DefaultValue = 1
LayoutControlDocs.Enabled = True
End Sub
Private Sub ToolStripButton3_Click(sender As Object, e As EventArgs)
@@ -302,7 +317,7 @@ Public Class frmAdministration
MsgBox("Error while assigning process!", MsgBoxStyle.Critical, "Clipboard Watcher")
End If
Status_Changed("Prozess gespeichert")
Status_Changed("Prozess zugeordnet")
End Sub
Private Sub BarButtonItem6_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem6.ItemClick
@@ -314,7 +329,7 @@ Public Class frmAdministration
MsgBox("Error while deleting assignment of process!", MsgBoxStyle.Critical, "Clipboard Watcher")
End If
Status_Changed("Prozess gelöscht")
Status_Changed("Prozesszuordnung gelöscht")
End Sub
Private Sub BarButtonItem7_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem7.ItemClick
@@ -322,7 +337,7 @@ Public Class frmAdministration
MsgBox("Error while assigning window!", MsgBoxStyle.Critical, "Clipboard Watcher")
End If
Status_Changed("Fenster gespeichert")
Status_Changed("Fenster zugeordnet")
End Sub
Private Sub BarButtonItem8_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem8.ItemClick
@@ -334,7 +349,7 @@ Public Class frmAdministration
MsgBox("Error while deleting assignment of window!", MsgBoxStyle.Critical, "Clipboard Watcher")
End If
Status_Changed("Fenster-Zuordnung gelöscht")
Status_Changed("Fensterzuordnung gelöscht")
End Sub
Private Sub BarButtonItem11_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem11.ItemClick
@@ -358,6 +373,8 @@ Public Class frmAdministration
Refresh_ProfileData()
GridViewUserNotInProfile.ClearSelection()
Status_Changed($"{oSelectedRows.Count} Benutzer zugeordnet")
Catch ex As Exception
Logger.Error(ex)
MsgBox("Unexpected Error while adding user-rights: " & vbNewLine & ex.Message, MsgBoxStyle.Critical)
@@ -385,6 +402,8 @@ Public Class frmAdministration
Refresh_ProfileData()
GridViewUserInProfile.ClearSelection()
Status_Changed($"{oSelectedRows.Count} Benutzerzuordnungen gelöscht")
Catch ex As Exception
Logger.Error(ex)
MsgBox("Unexpected Error in deleting ProfileUserRelation: " & vbNewLine & ex.Message, MsgBoxStyle.Critical)
@@ -409,6 +428,8 @@ Public Class frmAdministration
Refresh_Free_Groups(GUIDTextBox.Text)
Refresh_ProfileData()
Status_Changed($"{oSelectedGroups.Count} Gruppen zugeordnet")
Catch ex As Exception
MsgBox("Unexpected Error while adding Group-Rights: " & vbNewLine & ex.Message, MsgBoxStyle.Critical)
End Try
@@ -432,6 +453,8 @@ Public Class frmAdministration
Refresh_Free_Groups(GUIDTextBox.Text)
Refresh_ProfileData()
Status_Changed($"{oSelectedGroups.Count} Gruppenzuordnungen gelöscht")
Catch ex As Exception
MsgBox("Unexpected Error in deleting Group-Rights: " & vbNewLine & ex.Message, MsgBoxStyle.Critical)
End Try
@@ -506,6 +529,8 @@ Public Class frmAdministration
If CtrlApplicationAssignment1.Window_SaveAssignment() = False Then
MsgBox("Error while saving window", MsgBoxStyle.Critical, Text)
End If
Status_Changed("Fensterzuordnung gespeichert")
End Sub
Private Sub BarButtonItem17_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem17.ItemClick
@@ -514,6 +539,11 @@ Public Class frmAdministration
End Sub
Private Sub BarButtonItem15_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem15.ItemClick
If TBCW_PROF_DOC_SEARCHBindingSource.Count = MAX_DOC_SEARCHES Then
MsgBox($"Es können nicht mehr als {MAX_DOC_SEARCHES} Dokument-Suchen angelegt werden!", MsgBoxStyle.Exclamation, Text)
Exit Sub
End If
TBCW_PROF_DOC_SEARCHBindingSource.AddNew()
End Sub
@@ -526,6 +556,7 @@ Public Class frmAdministration
If result = MsgBoxResult.Yes Then
TBCW_PROF_DATA_SEARCHTableAdapter.Delete(txtDATAGUID.Text)
TBCW_PROF_DATA_SEARCHTableAdapter.Fill(MyDataset.TBCW_PROF_DATA_SEARCH, GUIDTextBox.Text)
Status_Changed("Daten-Suche gelöscht")
End If
End Sub
@@ -536,6 +567,8 @@ 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)
Status_Changed("Daten-Suche gespeichert")
End If
Catch ex As NoNullAllowedException
MsgBox("Ein oder mehrere Felder wurden nicht ausgefüllt:" & vbNewLine & ex.Message, MsgBoxStyle.Exclamation, Text)
@@ -545,6 +578,11 @@ Public Class frmAdministration
End Sub
Private Sub BarButtonItem20_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem20.ItemClick
If TBCW_PROF_DATA_SEARCHBindingSource.Count = MAX_DATA_SEARCHES Then
MsgBox($"Es können nicht mehr als {MAX_DATA_SEARCHES} Daten-Suchen angelegt werden!", MsgBoxStyle.Exclamation, Text)
Exit Sub
End If
TBCW_PROF_DATA_SEARCHBindingSource.AddNew()
End Sub
@@ -553,6 +591,7 @@ Public Class frmAdministration
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)
Status_Changed("Dokument-Suche gelöscht")
End If
End Sub
@@ -563,6 +602,8 @@ 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)
Status_Changed("Dokument-Suche gespeichert")
End If
Catch ex As NoNullAllowedException
MsgBox("Ein oder mehrere Felder wurden nicht ausgefüllt:" & vbNewLine & ex.Message, MsgBoxStyle.Exclamation, Text)

33
app/DD_Clipboard_Searcher/frmConnection.Designer.vb generated
View File

@@ -44,7 +44,6 @@ Partial Class frmConnection
Me.colBEZEICHNUNG = New DevExpress.XtraGrid.Columns.GridColumn()
Me.colSQL_PROVIDER = New DevExpress.XtraGrid.Columns.GridColumn()
Me.chkWinAuth = New System.Windows.Forms.CheckBox()
Me.Button1 = New System.Windows.Forms.Button()
Me.GUIDTextBox = New System.Windows.Forms.TextBox()
Me.DATENBANKComboBox = New System.Windows.Forms.ComboBox()
Me.SQL_PROVIDERComboBox = New System.Windows.Forms.ComboBox()
@@ -67,6 +66,7 @@ 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.BarButtonItem1 = New DevExpress.XtraBars.BarButtonItem()
BEZEICHNUNGLabel = New System.Windows.Forms.Label()
SQL_PROVIDERLabel = New System.Windows.Forms.Label()
SERVERLabel = New System.Windows.Forms.Label()
@@ -205,7 +205,6 @@ Partial Class frmConnection
Me.SplitContainerControl1.Panel1.Controls.Add(Me.GridControl1)
Me.SplitContainerControl1.Panel1.Text = "Panel1"
Me.SplitContainerControl1.Panel2.Controls.Add(Me.chkWinAuth)
Me.SplitContainerControl1.Panel2.Controls.Add(Me.Button1)
Me.SplitContainerControl1.Panel2.Controls.Add(GUIDLabel)
Me.SplitContainerControl1.Panel2.Controls.Add(Me.GUIDTextBox)
Me.SplitContainerControl1.Panel2.Controls.Add(Me.DATENBANKComboBox)
@@ -283,24 +282,13 @@ Partial Class frmConnection
'chkWinAuth
'
Me.chkWinAuth.AutoSize = True
Me.chkWinAuth.Location = New System.Drawing.Point(17, 217)
Me.chkWinAuth.Location = New System.Drawing.Point(223, 181)
Me.chkWinAuth.Name = "chkWinAuth"
Me.chkWinAuth.Size = New System.Drawing.Size(154, 17)
Me.chkWinAuth.TabIndex = 31
Me.chkWinAuth.Text = "Windows Authentifizierung"
Me.chkWinAuth.UseVisualStyleBackColor = True
'
'Button1
'
Me.Button1.Image = Global.DD_Clipboard_Watcher.My.Resources.Resources.startwithoutdebugging_6556
Me.Button1.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
Me.Button1.Location = New System.Drawing.Point(223, 166)
Me.Button1.Name = "Button1"
Me.Button1.Size = New System.Drawing.Size(200, 34)
Me.Button1.TabIndex = 30
Me.Button1.Text = "Verbindungstest"
Me.Button1.UseVisualStyleBackColor = True
'
'GUIDTextBox
'
Me.GUIDTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_CONNECTIONBindingSource, "GUID", True))
@@ -430,9 +418,9 @@ Partial Class frmConnection
'RibbonControl1
'
Me.RibbonControl1.ExpandCollapseItem.Id = 0
Me.RibbonControl1.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.RibbonControl1.ExpandCollapseItem, Me.BarButtonAdd, Me.BarButtonDelete, Me.BarButtonSave})
Me.RibbonControl1.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.RibbonControl1.ExpandCollapseItem, Me.BarButtonAdd, Me.BarButtonDelete, Me.BarButtonSave, Me.BarButtonItem1})
Me.RibbonControl1.Location = New System.Drawing.Point(0, 0)
Me.RibbonControl1.MaxItemId = 4
Me.RibbonControl1.MaxItemId = 5
Me.RibbonControl1.Name = "RibbonControl1"
Me.RibbonControl1.Pages.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPage() {Me.RibbonPage1})
Me.RibbonControl1.ShowApplicationButton = DevExpress.Utils.DefaultBoolean.[False]
@@ -473,8 +461,9 @@ Partial Class frmConnection
'RibbonPageGroup1
'
Me.RibbonPageGroup1.ItemLinks.Add(Me.BarButtonAdd)
Me.RibbonPageGroup1.ItemLinks.Add(Me.BarButtonDelete)
Me.RibbonPageGroup1.ItemLinks.Add(Me.BarButtonSave)
Me.RibbonPageGroup1.ItemLinks.Add(Me.BarButtonDelete)
Me.RibbonPageGroup1.ItemLinks.Add(Me.BarButtonItem1)
Me.RibbonPageGroup1.Name = "RibbonPageGroup1"
Me.RibbonPageGroup1.Text = "Verbindungen"
'
@@ -490,6 +479,14 @@ Partial Class frmConnection
Me.RibbonPage2.Name = "RibbonPage2"
Me.RibbonPage2.Text = "RibbonPage2"
'
'BarButtonItem1
'
Me.BarButtonItem1.Caption = "Verbindungstest"
Me.BarButtonItem1.Id = 4
Me.BarButtonItem1.ImageOptions.Image = CType(resources.GetObject("BarButtonItem1.ImageOptions.Image"), System.Drawing.Image)
Me.BarButtonItem1.ImageOptions.LargeImage = CType(resources.GetObject("BarButtonItem1.ImageOptions.LargeImage"), System.Drawing.Image)
Me.BarButtonItem1.Name = "BarButtonItem1"
'
'frmConnection
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
@@ -533,7 +530,6 @@ Partial Class frmConnection
Friend WithEvents ERSTELLTWANNDateTimePicker As DateTimePicker
Friend WithEvents GEANDERTWERTextBox As TextBox
Friend WithEvents DATENBANKComboBox As ComboBox
Friend WithEvents Button1 As Button
Friend WithEvents colBEZEICHNUNG As DevExpress.XtraGrid.Columns.GridColumn
Friend WithEvents colSQL_PROVIDER As DevExpress.XtraGrid.Columns.GridColumn
Friend WithEvents chkWinAuth As CheckBox
@@ -547,4 +543,5 @@ Partial Class frmConnection
Friend WithEvents BarButtonDelete As DevExpress.XtraBars.BarButtonItem
Friend WithEvents BarButtonSave As DevExpress.XtraBars.BarButtonItem
Friend WithEvents GUIDTextBox As TextBox
Friend WithEvents BarButtonItem1 As DevExpress.XtraBars.BarButtonItem
End Class

34
app/DD_Clipboard_Searcher/frmConnection.resx
View File

@@ -159,6 +159,9 @@
<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>
@@ -231,6 +234,37 @@
mPAyQPfsiZyYZ8oDeGFBxYSXAbpnT+TEPFMewAsLKia8DNA9eyIn5pnyAF5YUDHhZVwiZ74HLlmgCfsi
J+9/ho+Ab94FWgUeAma7YB954dpdoBJvhX2M7O4Cd4G7wPUKTEIl3wL7yAvX7gKHwTdtgdmGD2Dmm7YA
PpX33+BfwD3xzarAGbjDnrjDfqThC1oLalOREus2AAAAAElFTkSuQmCC
</value>
</data>
<data name="BarButtonItem1.ImageOptions.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAZdEVYdFNvZnR3YXJlAEFkb2JlIEltYWdlUmVhZHlxyWU8AAAAFXRFWHRUaXRsZQBHYXVnZTtD
aXJjdWxhcjvZ1LzUAAABIUlEQVQ4T6WRsUoDQRRF5xvyA+sPWNkbCCFgIXb+gLJEUFgI2AbigrBoYxWw
TJVuu9iFVGJp5zekyh9M7lneSHYcwcXiLG/fu/fuzFvnvf8XyWYXks0uuLIsY0biWbyLnUFNj1lLf/hy
JJ7ERkxFX/QManrM0KBtBdBYiPntw+vgfPZWiJXYGtQFMzSmbUJCAKnzy1k9lLAW/hceP24uTtGapwng
Xhv7cjCvRS4yg/rl8/rs7utqWC/vx5yE64wIYDlTCTh2MJ/E25bxWKyFFwUevASw4b5M3JOAPDYHZMwt
YIUHLwH8pp6MLIuArKoqL1KnyCxgiwed42EBLoDZQiZxSKAVkID+JLxjCHUMSQ2H6Wb4NsUzCL4fg64k
m3/Huz2jOnVRTFWrbAAAAABJRU5ErkJggg==
</value>
</data>
<data name="BarButtonItem1.ImageOptions.LargeImage" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAZdEVYdFNvZnR3YXJlAEFkb2JlIEltYWdlUmVhZHlxyWU8AAAAFXRFWHRUaXRsZQBHYXVnZTtD
aXJjdWxhcjvZ1LzUAAACwUlEQVRYR8WVP0hWURiHlRocbAhyFgRXEUdpCHRpKBrCVSHCNRFcCpSQRocQ
BBGCIBzEycXRtTmkwEnENmmTbwhvz/Nx3su5t+OfltvwwLm/8573995zzn3vQFVV/5Wi2CVFsUuKYpcU
xS4pil1SFLtkYH19/a6MwwJswhGcQi/hWM05Y4wt5fiLotjiCXyEr7ALSzADozCUcKzmnDHGusa1pZw1
RTExBh/AN1uFidIWljA2rXGtOczVzt+n8fDs/WEfxr7NAWzBVNIHYRbW4ABO4DLhWM05Y4w1z1TKYS5z
Nvyk8ZAWPYdDWPY5MQf7UN2RNzCY7chyymnuhmfjAazSwEUSaDwGG9CDklGJL3Dvx6vZt7ABY6mIxZS7
sRP1ADwntyrefBL2IE9+BjswDxMwnHCs9ho0fwdVYg8ms53Qo74TeQFeli0SxJvn5lewDdOxrdeB2RRs
wxXkRcROeCf0ahTg5+KNjQvntof5Bay0jW4DwxW4SAXIhroeyav/iUYBfrOrGMWFizP3zVeYewmPUmyR
dgGSioid6MGcOvF+onr2C7Br2Tg8Rz+f/LZvpwUP4Aws5j7UxkFunIOpxxG7sA+DxNsn9Bx3sa1z12AM
/YbD3AvXP3Pm5QVU8A0eJ60mN83BcBrOUgEyq84aO+aCA/v3kiKGNpIoYCeSaJD4DBZxBZ+gPpaILYHp
TlbAmhprbNubDrwQM4qY2s2igPlIoEHiIZyDRchv+AlrMBLxbTCdzwo4UCPefnDkwD/ZqCKmttQooO79
zOc8hSggp/9mJTCdyAo4USPeH9ipA3+nQ4qY2tejgOFIwHybX6BpPDs+jvg2mA5nBVyqEe9ftOegLuA6
mG/zHe5cQAni6wJc/C+4xjNv63G52vqNFKu7DRaOgEUcJ268hDdRFLukKHZJUeySotglRbFLimJ3VAN/
AAb7J20pr6P2AAAAAElFTkSuQmCC
</value>
</data>
</root>

5
app/DD_Clipboard_Searcher/frmConnection.vb
View File

@@ -30,7 +30,7 @@ Public Class frmConnection
MyDataset.TBDD_CONNECTION.ERSTELLTWERColumn.DefaultValue = Environment.UserName
End Sub
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Private Sub Button1_Click(sender As Object, e As EventArgs)
ConnectionTest(SQL_PROVIDERComboBox.Text, chkWinAuth.Checked, SERVERTextBox.Text, USERNAMETextBox.Text, PASSWORDTextBox.Text, DATENBANKComboBox.Text)
End Sub
@@ -175,4 +175,7 @@ Public Class frmConnection
TableAdapterManager.UpdateAll(MyDataset)
End Sub
Private Sub BarButtonItem1_ItemClick_1(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem1.ItemClick
ConnectionTest(SQL_PROVIDERComboBox.Text, chkWinAuth.Checked, SERVERTextBox.Text, USERNAMETextBox.Text, PASSWORDTextBox.Text, DATENBANKComboBox.Text)
End Sub
End Class

5
app/DD_Clipboard_Searcher/frmDocView.vb
View File

@@ -24,6 +24,7 @@ Public Class frmDocView
Private Sub frmMain_Load(ByVal sender As System.Object, ByVal e As EventArgs) Handles MyBase.Load
If GDPICTURE_LICENSE = String.Empty Then
Logger.Warn("GD Picture Missing! Please add a license to the Database!")
MsgBox($"Lizenz für den Dokumenten Viewer wurde nicht konfiguriert.{vbNewLine}Bitte wenden Sie sich an Digital Data!", MsgBoxStyle.Exclamation, "Clipboard Watcher")
Exit Sub
End If
@@ -60,17 +61,15 @@ Public Class frmDocView
End If
End Sub
Public Sub Load_File_from_Path(filepath As String)
CloseDocument()
_docPath = filepath
Me.ToolStripStatusLabel2.Text = _docPath
ToolStripStatusLabel2.Text = _docPath
GdViewer1.ZoomMode = ViewerZoomMode.ZoomModeWidthViewer
GdViewer1.DocumentAlignment = ViewerDocumentAlignment.DocumentAlignmentTopCenter
GdViewer1.DisplayFromFile(filepath)
GdViewer1.Focus()
UpdateMainUi()
End Sub
Private Sub UpdateMainUi()

2
app/DD_Clipboard_Searcher/frmLicense.vb
View File

@@ -58,7 +58,7 @@ Public Class frmLicense
End Sub
Sub Refresh_Licence(Neu As Boolean)
Try
clsLicense.Refresh_Licence(CLIENT_ID)
ClassLicense.Refresh_Licence(CLIENT_ID)
txtNewlicences.Text = LICENSE_COUNT
dtpGueltig_GI.Value = LICENSE_DATE

18
app/DD_Clipboard_Searcher/frmProcessCapture.vb
View File

@@ -6,16 +6,18 @@ Public Class frmProcessCapture
Public WindowTitle As String
Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick
clsWINDOWSApi.Get_ForegroundWindow_Info()
Dim oWindow = ClassWindowAPI.GetWindowInfo()
'clsWINDOWSApi.Get_ForegroundWindow_Info()
Dim oProgramName As String = Assembly.GetEntryAssembly().GetName().Name
If CurrPROC_Name <> oProgramName Then
txtPID.Text = CurrPROC_PID
txtName.Text = CurrPROC_Name
txtWindowTitle.Text = CurrPROC_WindowTitle
ProcessId = CurrPROC_PID
ProcessName = CurrPROC_Name
WindowTitle = CurrPROC_WindowTitle
If oWindow.ProcessName <> oProgramName Then
txtPID.Text = oWindow.ProcessId
txtName.Text = oWindow.ProcessName
txtWindowTitle.Text = oWindow.WindowTitle
ProcessId = oWindow.ProcessId
ProcessName = oWindow.ProcessName
WindowTitle = oWindow.WindowTitle
Button1.Enabled = True
End If

4
app/DD_Clipboard_Searcher/frmProfileMatch.vb
View File

@@ -38,8 +38,8 @@ Public Class frmProfileMatch
' Open Result Forms directly if only one match found
If oCreatedTiles = 1 Then
Dim oProfileId As Integer = CURRENT_MATCHING_PROFILES.Select(Function(p) p.Guid).First()
OpenResultForms(oProfileId, ProfileType.ANY)
Dim oProfile As ProfileData = CURRENT_MATCHING_PROFILES.First()
OpenResultForms(oProfile.Guid, oProfile.ProfileType)
ShouldHideInitially = True
End If
End Sub

8
app/DD_Clipboard_Searcher/frmResultDoc.Designer.vb generated
View File

@@ -143,11 +143,11 @@ Partial Class frmResultDoc
Me.ToolStripButtonDocView.Size = New System.Drawing.Size(73, 22)
Me.ToolStripButtonDocView.Text = "DocView"
'
'ToolStripButton1
'btnBackToMatchForm
'
Me.btnBackToMatchForm.Image = Global.DD_Clipboard_Watcher.My.Resources.Resources.control_start_blue
Me.btnBackToMatchForm.ImageTransparentColor = System.Drawing.Color.Magenta
Me.btnBackToMatchForm.Name = "ToolStripButton1"
Me.btnBackToMatchForm.Name = "btnBackToMatchForm"
Me.btnBackToMatchForm.Size = New System.Drawing.Size(157, 22)
Me.btnBackToMatchForm.Text = "Zurück zur Profilauswahl"
'
@@ -167,7 +167,7 @@ Partial Class frmResultDoc
Me.XtraTabPageDoc1.Controls.Add(Me.GridControlDocSearch1)
Me.XtraTabPageDoc1.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4)
Me.XtraTabPageDoc1.Name = "XtraTabPageDoc1"
Me.XtraTabPageDoc1.Size = New System.Drawing.Size(927, 479)
Me.XtraTabPageDoc1.Size = New System.Drawing.Size(931, 482)
Me.XtraTabPageDoc1.Text = "XtraTabPage1"
'
'GridControlDocSearch1
@@ -178,7 +178,7 @@ Partial Class frmResultDoc
Me.GridControlDocSearch1.MainView = Me.GridViewDocSearch1
Me.GridControlDocSearch1.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4)
Me.GridControlDocSearch1.Name = "GridControlDocSearch1"
Me.GridControlDocSearch1.Size = New System.Drawing.Size(927, 479)
Me.GridControlDocSearch1.Size = New System.Drawing.Size(931, 482)
Me.GridControlDocSearch1.TabIndex = 0
Me.GridControlDocSearch1.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridViewDocSearch1})
'

6
app/DD_Clipboard_Searcher/frmResultDoc.vb
View File

@@ -343,7 +343,7 @@ Public Class frmResultDoc
Cursor = Cursors.WaitCursor
For Each oRow As DataRow In clsWMDocGrid.DTDocuments.Rows
Dim oWindows As New Windows(LogConfig)
Dim oWindows As New ClassWindowsAPI(LogConfig)
oWindows.ShowFileProperties(oRow.Item("DOC_PATH"))
Next
Cursor = Cursors.Default
@@ -601,9 +601,9 @@ Public Class frmResultDoc
Private Sub ToolStripButtonDocView_CheckedChanged(sender As Object, e As EventArgs) Handles ToolStripButtonDocView.CheckedChanged
If ToolStripButtonDocView.Checked Then
ToolStripButtonDocView.Text = "DocView (Active)"
ToolStripButtonDocView.Text = "Datei Vorschau (Aktiv)"
Else
ToolStripButtonDocView.Text = "DocView (Inactive)"
ToolStripButtonDocView.Text = "Datei Vorschau (Inaktiv)"
End If
End Sub

4
app/DD_Clipboard_Searcher/frmResultSQL.Designer.vb generated
View File

@@ -131,7 +131,7 @@ Partial Class frmResultSQL
Me.XtraTabPageDoc1.Controls.Add(Me.GridControlDocSearch1)
Me.XtraTabPageDoc1.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4)
Me.XtraTabPageDoc1.Name = "XtraTabPageDoc1"
Me.XtraTabPageDoc1.Size = New System.Drawing.Size(927, 479)
Me.XtraTabPageDoc1.Size = New System.Drawing.Size(931, 482)
Me.XtraTabPageDoc1.Text = "XtraTabPage1"
'
'GridControlDocSearch1
@@ -144,7 +144,7 @@ Partial Class frmResultSQL
Me.GridControlDocSearch1.MainView = Me.GridViewDataSearch1
Me.GridControlDocSearch1.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4)
Me.GridControlDocSearch1.Name = "GridControlDocSearch1"
Me.GridControlDocSearch1.Size = New System.Drawing.Size(927, 479)
Me.GridControlDocSearch1.Size = New System.Drawing.Size(931, 482)
Me.GridControlDocSearch1.TabIndex = 0
Me.GridControlDocSearch1.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridViewDataSearch1})
'

26
app/DD_Clipboard_Searcher/frmStart.Designer.vb generated
View File

@@ -29,7 +29,8 @@ Partial Class frmStart
Me.tsmiChangeState = New System.Windows.Forms.ToolStripMenuItem()
Me.ClientÖffnenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.StatusStrip1 = New System.Windows.Forms.StatusStrip()
Me.tslblUser = New System.Windows.Forms.ToolStripStatusLabel()
Me.labelUser = New System.Windows.Forms.ToolStripStatusLabel()
Me.labelVersion = New System.Windows.Forms.ToolStripStatusLabel()
Me.TimerClose = New System.Windows.Forms.Timer(Me.components)
Me.ContextMenuStripForm = New System.Windows.Forms.ContextMenuStrip(Me.components)
Me.MinimierenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
@@ -77,7 +78,7 @@ Partial Class frmStart
'
'StatusStrip1
'
Me.StatusStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.tslblUser})
Me.StatusStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.labelUser, Me.labelVersion})
Me.StatusStrip1.Location = New System.Drawing.Point(0, 154)
Me.StatusStrip1.Name = "StatusStrip1"
Me.StatusStrip1.Size = New System.Drawing.Size(345, 22)
@@ -85,11 +86,19 @@ Partial Class frmStart
Me.StatusStrip1.TabIndex = 3
Me.StatusStrip1.Text = "StatusStrip1"
'
'tslblUser
'labelUser
'
Me.tslblUser.Image = CType(resources.GetObject("tslblUser.Image"), System.Drawing.Image)
Me.tslblUser.Name = "tslblUser"
Me.tslblUser.Size = New System.Drawing.Size(16, 17)
Me.labelUser.Image = CType(resources.GetObject("labelUser.Image"), System.Drawing.Image)
Me.labelUser.Name = "labelUser"
Me.labelUser.Size = New System.Drawing.Size(37, 17)
Me.labelUser.Text = "{0}"
'
'labelVersion
'
Me.labelVersion.Image = Global.DD_Clipboard_Watcher.My.Resources.Resources.StatusAnnotations_Information_16xMD_color
Me.labelVersion.Name = "labelVersion"
Me.labelVersion.Size = New System.Drawing.Size(78, 17)
Me.labelVersion.Text = "Version {0}"
'
'TimerClose
'
@@ -142,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"
Me.labelHotkey.Text = "STRG+C {0}"
Me.labelHotkey.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
'
'btnUserConfig
@@ -201,7 +210,7 @@ Partial Class frmStart
Friend WithEvents cmstrpNotifyIcon As System.Windows.Forms.ContextMenuStrip
Friend WithEvents tsmiChangeState As System.Windows.Forms.ToolStripMenuItem
Friend WithEvents StatusStrip1 As System.Windows.Forms.StatusStrip
Friend WithEvents tslblUser As System.Windows.Forms.ToolStripStatusLabel
Friend WithEvents labelUser As System.Windows.Forms.ToolStripStatusLabel
Friend WithEvents TimerClose As System.Windows.Forms.Timer
Friend WithEvents ContextMenuStripForm As System.Windows.Forms.ContextMenuStrip
Friend WithEvents MinimierenToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem
@@ -211,4 +220,5 @@ Partial Class frmStart
Friend WithEvents labelHotkey As Label
Friend WithEvents btnUserConfig As Button
Friend WithEvents btnAdminConfig As Button
Friend WithEvents labelVersion As ToolStripStatusLabel
End Class

2
app/DD_Clipboard_Searcher/frmStart.resx
View File

@@ -4638,7 +4638,7 @@
<metadata name="StatusStrip1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>299, 17</value>
</metadata>
<data name="tslblUser.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<data name="labelUser.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
xAAADsQBlSsOGwAAASJJREFUWEftk8sNgzAQRFMKJVADXdAQbdAJ1SS5cuPqeKydaNlMhJSPiVBWehIa

7
app/DD_Clipboard_Searcher/frmStart.vb
View File

@@ -54,8 +54,9 @@ Public Class frmStart
End If
End If
tslblUser.Text = USER_USERNAME
labelHotkey.Text = $"STRG+C {HotkeyFunctionKey.ToUpper}+{HotkeySearchKey.ToUpper}"
labelUser.Text = String.Format(labelUser.Text, USER_USERNAME)
labelVersion.Text = String.Format(labelVersion.Text, My.Application.Info.Version.ToString)
labelHotkey.Text = String.Format(labelHotkey.Text, $"{HotkeyFunctionKey.ToUpper}+{HotkeySearchKey.ToUpper}")
End Sub
Private Sub frmMain_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing
@@ -117,7 +118,7 @@ Public Class frmStart
Dim oProfiles = oProfileFilter.Profiles.AsEnumerable()
oProfiles = oProfileFilter.FilterProfilesByProcess(oProfiles, CurrPROC_Name)
oProfiles = oProfileFilter.FilterProfilesByProcess(oProfiles, CURRENT_PROCESSNAME)
oProfiles = oProfileFilter.FilterProfilesByClipboardRegex(oProfiles, ClipboardContents)
oProfiles = oProfileFilter.FilterWindowsByWindowTitleRegex(oProfiles, WindowTitle)
oProfiles = oProfileFilter.FilterProfilesByWindowClipboardRegex(oProfiles, ClipboardContents)

6
app/DD_Clipboard_Searcher/modCurrent.vb
View File

@@ -55,9 +55,9 @@ Module modCurrent
Public CURR_FOCUSED_WINDOWNAME
Public MONITORING_ACTIVE As Boolean = True
Public CurrPROC_PID As String
Public CurrPROC_Name As String
Public CurrPROC_WindowTitle As String
Public CURRENT_PROCESSID As String
Public CURRENT_PROCESSNAME As String
Public CURRENT_WINDOWTITLE As String
Public CLIENT_SELECTED As Integer = 0
Public CurrDT_PROFILE_MATCH As DataTable