MSNamenÄndern

This commit is contained in:
Digital Data - Marlon Schreiber 2017-12-14 13:54:22 +01:00
parent e2234cd110
commit 420d9fedf7
75 changed files with 4818 additions and 4908 deletions

Binary file not shown.

View File

@ -1,6 +0,0 @@
<?xml version="1.0" encoding="utf-8"?>
<Project ToolsVersion="12.0" xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
<PropertyGroup>
<ProjectView>ShowAllFiles</ProjectView>
</PropertyGroup>
</Project>

View File

@ -1,23 +0,0 @@
<?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_Searcher.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_Searcher.My.MySettings.DD_ECMConnectionString"
connectionString="Data Source=172.24.12.41\tests;Initial Catalog=DD_ECM_RENOLIT;Persist Security Info=True;User ID=sa;Password=dd"
providerName="System.Data.SqlClient" />
</connectionStrings>
<startup>
<supportedRuntime version="v4.0" sku=".NETFramework,Version=v4.5.1" />
</startup>
<userSettings>
<DD_Clipboard_Searcher.My.MySettings>
<setting name="WDSearch_maximized" serializeAs="String">
<value>False</value>
</setting>
</DD_Clipboard_Searcher.My.MySettings>
</userSettings>
</configuration>

View File

@ -1,23 +0,0 @@
<?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_Searcher.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_Searcher.My.MySettings.DD_ECMConnectionString"
connectionString="Data Source=172.24.12.41\tests;Initial Catalog=DD_ECM_RENOLIT;Persist Security Info=True;User ID=sa;Password=dd"
providerName="System.Data.SqlClient" />
</connectionStrings>
<startup>
<supportedRuntime version="v4.0" sku=".NETFramework,Version=v4.5.1" />
</startup>
<userSettings>
<DD_Clipboard_Searcher.My.MySettings>
<setting name="WDSearch_maximized" serializeAs="String">
<value>False</value>
</setting>
</DD_Clipboard_Searcher.My.MySettings>
</userSettings>
</configuration>

View File

@ -1,11 +0,0 @@
<?xml version="1.0" encoding="UTF-8" standalone="yes"?>
<assembly xmlns="urn:schemas-microsoft-com:asm.v1" manifestVersion="1.0">
<assemblyIdentity version="1.0.0.0" name="MyApplication.app"/>
<trustInfo xmlns="urn:schemas-microsoft-com:asm.v2">
<security>
<requestedPrivileges xmlns="urn:schemas-microsoft-com:asm.v3">
<requestedExecutionLevel level="asInvoker" uiAccess="false"/>
</requestedPrivileges>
</security>
</trustInfo>
</assembly>

View File

@ -1,256 +0,0 @@
<?xml version="1.0"?>
<doc>
<assembly>
<name>
DD_Clipboard_Searcher
</name>
</assembly>
<members>
<member name="T:DD_Clipboard_Searcher.My.Resources.Resources">
<summary>
Eine stark typisierte Ressourcenklasse zum Suchen von lokalisierten Zeichenfolgen usw.
</summary>
</member>
<member name="P:DD_Clipboard_Searcher.My.Resources.Resources.ResourceManager">
<summary>
Gibt die zwischengespeicherte ResourceManager-Instanz zurück, die von dieser Klasse verwendet wird.
</summary>
</member>
<member name="P:DD_Clipboard_Searcher.My.Resources.Resources.Culture">
<summary>
Überschreibt die CurrentUICulture-Eigenschaft des aktuellen Threads für alle
Ressourcenzuordnungen, die diese stark typisierte Ressourcenklasse verwenden.
</summary>
</member>
<member name="P:DD_Clipboard_Searcher.My.Resources.Resources.Annotation_New">
<summary>
Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
</summary>
</member>
<member name="P:DD_Clipboard_Searcher.My.Resources.Resources.control_start_blue">
<summary>
Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
</summary>
</member>
<member name="P:DD_Clipboard_Searcher.My.Resources.Resources.folder_Open_16xLG">
<summary>
Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
</summary>
</member>
<member name="P:DD_Clipboard_Searcher.My.Resources.Resources.GoToDefinition_5575">
<summary>
Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
</summary>
</member>
<member name="P:DD_Clipboard_Searcher.My.Resources.Resources.KeyDown_8461">
<summary>
Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
</summary>
</member>
<member name="P:DD_Clipboard_Searcher.My.Resources.Resources.KeyOutput_8167">
<summary>
Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
</summary>
</member>
<member name="P:DD_Clipboard_Searcher.My.Resources.Resources.ReduceSize">
<summary>
Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
</summary>
</member>
<member name="P:DD_Clipboard_Searcher.My.Resources.Resources.StatusAnnotations_Stop_16xLG">
<summary>
Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
</summary>
</member>
<member name="E:DD_Clipboard_Searcher.clsHotkey.HotKeyPressed">
<summary>
Diesem Event wird immer die zugewiesene HotKeyID übergeben wenn eine HotKey Kombination gedrückt wurde.
</summary>
</member>
<member name="M:DD_Clipboard_Searcher.clsHotkey.AddHotKey(System.Windows.Forms.Keys,DD_Clipboard_Searcher.clsHotkey.MODKEY,System.String)">
<summary>
Diese Funktion fügt einen Hotkey hinzu und registriert ihn auch sofort
</summary>
<param name="KeyCode">Den KeyCode für die Taste</param>
<param name="Modifiers">Die Zusatztasten wie z.B. Strg oder Alt, diese können auch mit OR kombiniert werden</param>
<param name="HotKeyID">Die ID die der Hotkey bekommen soll um diesen zu identifizieren</param>
</member>
<member name="M:DD_Clipboard_Searcher.clsHotkey.RemoveHotKey(System.String)">
<summary>
Diese Funktion entfernt einen Hotkey und deregistriert ihn auch sofort
</summary>
<param name="HotKeyID">Gibt die HotkeyID an welche entfernt werden soll</param>
</member>
<member name="M:DD_Clipboard_Searcher.clsWindowApi.GetTopLevelWindows">
<summary>
Get all top-level window information
</summary>
<returns>List of window information objects</returns>
</member>
<member name="M:DD_Clipboard_Searcher.clsWindowApi.GetChildWindows(System.Int32)">
<summary>
Get all child windows for the specific windows handle (hwnd).
</summary>
<returns>List of child windows for parent window</returns>
</member>
<member name="M:DD_Clipboard_Searcher.clsWindowApi.EnumWindowProc(System.Int32,System.Int32)">
<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>
</member>
<member name="M:DD_Clipboard_Searcher.clsWindowApi.EnumChildWindowProc(System.Int32,System.Int32)">
<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>
</member>
<member name="M:DD_Clipboard_Searcher.clsWindowApi.GetWindowIdentification(System.Int32)">
<summary>
Build the ApiWindow object to hold information about the Window object.
</summary>
</member>
<member name="T:DD_Clipboard_Searcher.MyDataset">
<summary>
Represents a strongly typed in-memory cache of data.
</summary>
</member>
<member name="T:DD_Clipboard_Searcher.MyDataset.TBCBS_PROFILESDataTable">
<summary>
Represents the strongly named DataTable class.
</summary>
</member>
<member name="T:DD_Clipboard_Searcher.MyDataset.TBCBS_USER_PROFILEDataTable">
<summary>
Represents the strongly named DataTable class.
</summary>
</member>
<member name="T:DD_Clipboard_Searcher.MyDataset.VWUSER_PROFILEDataTable">
<summary>
Represents the strongly named DataTable class.
</summary>
</member>
<member name="T:DD_Clipboard_Searcher.MyDataset.TBCBS_PROFILE_PROCESSDataTable">
<summary>
Represents the strongly named DataTable class.
</summary>
</member>
<member name="T:DD_Clipboard_Searcher.MyDataset.TBWH_UserDataTable">
<summary>
Represents the strongly named DataTable class.
</summary>
</member>
<member name="T:DD_Clipboard_Searcher.MyDataset.TBCBS_PROFILESRow">
<summary>
Represents strongly named DataRow class.
</summary>
</member>
<member name="T:DD_Clipboard_Searcher.MyDataset.TBCBS_USER_PROFILERow">
<summary>
Represents strongly named DataRow class.
</summary>
</member>
<member name="T:DD_Clipboard_Searcher.MyDataset.VWUSER_PROFILERow">
<summary>
Represents strongly named DataRow class.
</summary>
</member>
<member name="T:DD_Clipboard_Searcher.MyDataset.TBCBS_PROFILE_PROCESSRow">
<summary>
Represents strongly named DataRow class.
</summary>
</member>
<member name="T:DD_Clipboard_Searcher.MyDataset.TBWH_UserRow">
<summary>
Represents strongly named DataRow class.
</summary>
</member>
<member name="T:DD_Clipboard_Searcher.MyDataset.TBCBS_PROFILESRowChangeEvent">
<summary>
Row event argument class
</summary>
</member>
<member name="T:DD_Clipboard_Searcher.MyDataset.TBCBS_USER_PROFILERowChangeEvent">
<summary>
Row event argument class
</summary>
</member>
<member name="T:DD_Clipboard_Searcher.MyDataset.VWUSER_PROFILERowChangeEvent">
<summary>
Row event argument class
</summary>
</member>
<member name="T:DD_Clipboard_Searcher.MyDataset.TBCBS_PROFILE_PROCESSRowChangeEvent">
<summary>
Row event argument class
</summary>
</member>
<member name="T:DD_Clipboard_Searcher.MyDataset.TBWH_UserRowChangeEvent">
<summary>
Row event argument class
</summary>
</member>
<member name="T:DD_Clipboard_Searcher.MyDatasetTableAdapters.TBCBS_PROFILESTableAdapter">
<summary>
Represents the connection and commands used to retrieve and save data.
</summary>
</member>
<member name="T:DD_Clipboard_Searcher.MyDatasetTableAdapters.TBCBS_USER_PROFILETableAdapter">
<summary>
Represents the connection and commands used to retrieve and save data.
</summary>
</member>
<member name="T:DD_Clipboard_Searcher.MyDatasetTableAdapters.VWUSER_PROFILETableAdapter">
<summary>
Represents the connection and commands used to retrieve and save data.
</summary>
</member>
<member name="T:DD_Clipboard_Searcher.MyDatasetTableAdapters.TBCBS_PROFILE_PROCESSTableAdapter">
<summary>
Represents the connection and commands used to retrieve and save data.
</summary>
</member>
<member name="T:DD_Clipboard_Searcher.MyDatasetTableAdapters.TableAdapterManager">
<summary>
TableAdapterManager is used to coordinate TableAdapters in the dataset to enable Hierarchical Update scenarios
</summary>
</member>
<member name="M:DD_Clipboard_Searcher.MyDatasetTableAdapters.TableAdapterManager.UpdateUpdatedRows(DD_Clipboard_Searcher.MyDataset,System.Collections.Generic.List{System.Data.DataRow},System.Collections.Generic.List{System.Data.DataRow})">
<summary>
Update rows in top-down order.
</summary>
</member>
<member name="M:DD_Clipboard_Searcher.MyDatasetTableAdapters.TableAdapterManager.UpdateInsertedRows(DD_Clipboard_Searcher.MyDataset,System.Collections.Generic.List{System.Data.DataRow})">
<summary>
Insert rows in top-down order.
</summary>
</member>
<member name="M:DD_Clipboard_Searcher.MyDatasetTableAdapters.TableAdapterManager.UpdateDeletedRows(DD_Clipboard_Searcher.MyDataset,System.Collections.Generic.List{System.Data.DataRow})">
<summary>
Delete rows in bottom-up order.
</summary>
</member>
<member name="M:DD_Clipboard_Searcher.MyDatasetTableAdapters.TableAdapterManager.GetRealUpdatedRows(System.Data.DataRow[],System.Collections.Generic.List{System.Data.DataRow})">
<summary>
Remove inserted rows that become updated rows after calling TableAdapter.Update(inserted rows) first
</summary>
</member>
<member name="M:DD_Clipboard_Searcher.MyDatasetTableAdapters.TableAdapterManager.UpdateAll(DD_Clipboard_Searcher.MyDataset)">
<summary>
Update all changes to the dataset.
</summary>
</member>
<member name="T:DD_Clipboard_Searcher.MyDatasetTableAdapters.TableAdapterManager.UpdateOrderOption">
<summary>
Update Order Option
</summary>
</member>
<member name="T:DD_Clipboard_Searcher.MyDatasetTableAdapters.TableAdapterManager.SelfReferenceComparer">
<summary>
Used to sort self-referenced table's rows
</summary>
</member>
</members>
</doc>

View File

@ -1,322 +0,0 @@
<?xml version="1.0"?>
<doc>
<assembly>
<name>
DD_LIB_Standards
</name>
</assembly>
<members>
<member name="T:DD_LIB_Standards.My.Resources.Resources">
<summary>
A strongly-typed resource class, for looking up localized strings, etc.
</summary>
</member>
<member name="P:DD_LIB_Standards.My.Resources.Resources.ResourceManager">
<summary>
Returns the cached ResourceManager instance used by this class.
</summary>
</member>
<member name="P:DD_LIB_Standards.My.Resources.Resources.Culture">
<summary>
Overrides the current thread's CurrentUICulture property for all
resource lookups using this strongly typed resource class.
</summary>
</member>
<member name="M:DD_LIB_Standards.clsDatabase.Init(System.String,System.Boolean)">
<summary>
Establishes a databaseconnection and returns false or true
</summary>
<param name="conString">SQL-Server ConnectionString</param>
<param name="isProxy">true if this is a proxy-Conenction</param>
<returns>Returns true when connection was established, false if not</returns>
<remarks></remarks>
</member>
<member name="M:DD_LIB_Standards.clsDatabase.Return_Datatable(System.String,System.Boolean)">
<summary>
Returns a .Net Datatable for an sql-statement
</summary>
<param name="selectStatement">select statement for datatable (select XYZ from TableORView)</param>
<param name="use_proxy">true if this statement shall be executed on the proxy-server</param>
<returns>Returns a .Net Datatable</returns>
<remarks></remarks>
</member>
<member name="M:DD_LIB_Standards.clsDatabase.Execute_non_Query(System.String,System.Boolean)">
<summary>
Executes the passed sql-statement
</summary>
<param name="executeStatement">the sql statement</param>
<param name="use_proxy">true if this statement shall be executed on the proxy-server</param>
<returns>Returns true if properly executed, else false</returns>
<remarks></remarks>
</member>
<member name="M:DD_LIB_Standards.clsDatabase.Execute_Scalar(System.String,System.Boolean)">
<summary>
Executes the passed sql-statement as scalar-Command
</summary>
<param name="scalarCommand">the scalarCommand</param>
<param name="use_proxy">true if this statement shall be executed on the proxy-server</param>
<returns>Returns the scalar-result as .net-object</returns>
<remarks></remarks>
</member>
<member name="M:DD_LIB_Standards.clsLicense.#ctor(System.String,System.DateTime,System.String,System.String)">
<summary>
Konstruktor der Lizenz
</summary>
<param name="modulename">Name des Moduls</param>
<param name="expires">Gültigkeitsdatum der Lizenz</param>
<remarks></remarks>
</member>
<member name="P:DD_LIB_Standards.clsLicense.Modulename">
<summary>
Liefert oder setzt den Namen des Moduls für diese Lizenz
</summary>
<value></value>
<returns></returns>
<remarks></remarks>
</member>
<member name="P:DD_LIB_Standards.clsLicense.Expires">
<summary>
Liefert oder setzt das Gültigkeitsdatum der Lizenz für das Modul
</summary>
<value></value>
<returns></returns>
<remarks></remarks>
</member>
<member name="P:DD_LIB_Standards.clsLicense.IsExpired">
<summary>
Liefert ob die Lizenz schon abgelaufen ist
</summary>
<value></value>
<returns></returns>
<remarks></remarks>
</member>
<member name="P:DD_LIB_Standards.clsLicense.Type">
<summary>
Liefert den Typend er Lizenz
</summary>
<value></value>
<returns></returns>
<remarks></remarks>
</member>
<member name="P:DD_LIB_Standards.clsLicense.Anz_Profile">
<summary>
Liefert die Anzahl der Profile
</summary>
<value></value>
<returns></returns>
<remarks></remarks>
</member>
<member name="M:DD_LIB_Standards.clsLicenseManager.#ctor(System.String,System.String)">
<summary>
Konstruktor für den Lizenz-Manager
</summary>
<param name="password">Passwort zum Entschlüsseln des Lizenzkeys</param>
<param name="key">verschlüsselter Lizenzkey</param>
<remarks></remarks>
</member>
<member name="M:DD_LIB_Standards.clsLicenseManager.#ctor(System.String)">
<summary>
Konstruktor für den Lizenz-Manager ohne License load
</summary>
<param name="password">Passwort zum Entschlüsseln des Lizenzkeys</param>
<remarks></remarks>
</member>
<member name="M:DD_LIB_Standards.clsLicenseManager.LoadLicenses">
<summary>
Lädt alle Lizenzen aus dem Lizenz-Array
</summary>
<remarks></remarks>
</member>
<member name="M:DD_LIB_Standards.clsLicenseManager.EncodeLicenseKey(System.String,System.String)">
<summary>
Codiert eine Zeichenkette
</summary>
<param name="str">zu verschlüsselnde Zeichenkette</param>
<param name="password">das zur Verschlüsselung verwendete Passwort</param>
<returns>liefert eine verschlüsselte Zeichenkette</returns>
<remarks></remarks>
</member>
<member name="M:DD_LIB_Standards.clsLicenseManager.DecodeLicenseKey(System.String)">
<summary>
Decodiert den verschlüsselten Lizenzkey
</summary>
<param name="licenseCodeStr">verschlüsselter Lizenzkey</param>
<returns></returns>
<remarks></remarks>
</member>
<member name="M:DD_LIB_Standards.clsLicenseManager.SplitLicenseString(System.String)">
<summary>
Zerlegt den entschlüsselten Lizenzkey
</summary>
<param name="licenseStr">entschlüsselter Lizenzkey</param>
<returns></returns>
<remarks></remarks>
</member>
<member name="P:DD_LIB_Standards.clsLicenseManager.Password">
<summary>
Liefert das Passwort zum Entschlüsseln des Lizenzschlüssels
</summary>
<value></value>
<returns></returns>
<remarks></remarks>
</member>
<member name="P:DD_LIB_Standards.clsLicenseManager.Licenses">
<summary>
Liefert eine Sammlung von Lizenzobjekten
</summary>
<value></value>
<returns></returns>
<remarks></remarks>
</member>
<member name="P:DD_LIB_Standards.clsLicenseManager.Key">
<summary>
Liefert oder setzt den Lizenzschlüssel
</summary>
<value></value>
<returns></returns>
<remarks></remarks>
</member>
<member name="M:DD_LIB_Standards.clsLicenses.#ctor(System.String[0:,0:])">
<summary>
Konstruktor für die Lizenzen-Sammlung
</summary>
<param name="licenseStringArray">In Array übertragene Lizenzinformationen</param>
<remarks></remarks>
</member>
<member name="M:DD_LIB_Standards.clsLicenses.Add(System.String,System.DateTime,System.String,System.String)">
<summary>
Fügt der Lizenz-Sammlung eine Lizenz hinzu
</summary>
<param name="modulename">Name des Moduls, für das eine Lizenz angelegt werden soll</param>
<param name="expires">Datum der Gültigkeit der Lizenz</param>
<remarks></remarks>
</member>
<member name="M:DD_LIB_Standards.clsLicenses.GetLicense(System.String)">
<summary>
Liefert eine Lizenz an Hand des Modulnamens
</summary>
<param name="modulename">Name des zu suchenden Moduls</param>
<returns>liefert ein Lizenzobjekt</returns>
<remarks></remarks>
</member>
<member name="P:DD_LIB_Standards.clsLicenses.Licenses">
<summary>
liefert eine Sammlung von Lizenzobjekten
</summary>
<value></value>
<returns></returns>
<remarks></remarks>
</member>
<member name="P:DD_LIB_Standards.clsLicenses.License(System.String)">
<summary>
liefert eine Lizenz an Hand des Modulnamens
</summary>
<param name="modulename">Name des zu suchenden Moduls</param>
<value></value>
<returns></returns>
<remarks></remarks>
</member>
<member name="P:DD_LIB_Standards.clsLicenses.Company">
<summary>
Liefert oder setzt den Firmennamen des Lizenzeigentümers
</summary>
<value></value>
<returns></returns>
<remarks></remarks>
</member>
<member name="M:DD_LIB_Standards.clsWD_GET.GetIndicesByObjecttype(System.String)">
<summary>
Liefert alle Indexe eines Objekttypen.
</summary>
<param name="name">Name des Objekttyps</param>
<returns>Array mit allen Objekttyp zugeordneten Indexen als String</returns>
<remarks></remarks>
</member>
<member name="M:DD_LIB_Standards.clsWD_GET.GetObjecttypesAsObjects">
<summary>
returns all objecttypes as windream-Objects
</summary>
<returns>all widnream-Objecttypes as objects</returns>
<remarks></remarks>
</member>
<member name="M:DD_LIB_Standards.clsWD_GET.WDFile_exists(System.String,System.Boolean,System.String,System.Boolean)">
<summary>
Checks wether a file is existing in windream
</summary>
<param name="WD_File">full filepath to the file</param>
<returns>Returns true when file exists, false if not</returns>
<remarks></remarks>
</member>
<member name="M:DD_LIB_Standards.clsWD_GET.GetTypeOfIndexAsIntByName(System.String)">
<summary>
Returns a windream-type as Integer.
</summary>
<param name="indexname">Name of indexfield</param>
<returns>Returns integer, which describes the type</returns>
<remarks></remarks>
</member>
<member name="M:DD_LIB_Standards.clsWD_GET.Get_File_Rights(System.String,System.String)">
<summary>
Returns a windream-type as Integer.
</summary>
<param name="filepath">filepath of windream-file</param>
<param name="username">Username to check</param>
<returns>Returns info about filerights</returns>
<remarks></remarks>
</member>
<member name="M:DD_LIB_Standards.clsWD_SET.Create_Version(System.String,System.String)">
<summary>
Creates a new version of the file
</summary>
<param name="WD_File">full WD_File to the file</param>
<param name="Comment">Comment</param>
<returns>Returns true when version was created exists, false if not</returns>
<remarks></remarks>
</member>
<member name="M:DD_LIB_Standards.clsWD_SET.Delete_WDFile(System.String)">
<summary>
Deletes a file in windream
</summary>
<param name="WD_File">full WD_File to the file</param>
<returns>Returns true when file was deleted, false if not</returns>
<remarks></remarks>
</member>
<member name="M:DD_LIB_Standards.clsWD_SET.IndexFile(System.String,System.String,System.String,System.String)">
<summary>
Passes indexvalues to a windream-file
</summary>
<param name="WD_File">full WD_File to the file</param>
<param name="_Indexname">Indexname of Index</param>
<param name="_Value">Value for indexing</param>
<param name="_objecttype">_objecttype</param>
<returns>Returns true when indexing was successfull, false if not</returns>
<remarks></remarks>
</member>
<member name="M:DD_LIB_Standards.clsWD_SET.REMOVE_VEKTOR_LINK(System.String,System.String,System.String)">
<summary>
Removes the vektorlink from windream
</summary>
<param name="WD_File">full WD_File to the file</param>
<param name="vktIndexName">Indexname of Vektor-Index</param>
<param name="deleteValue">Value which is to be deleted</param>
<returns>Returns true when indexing was successfull, false if not</returns>
<remarks></remarks>
</member>
<member name="M:DD_LIB_Standards.clsWindream.CreateSession_AsUser(System.Object,System.Object,System.Object,System.Object)">
<summary>
Creates a personified session
</summary>
<param name="Domain">Domainname as string</param>
<param name="ServerName">ServerName as string</param>
<param name="UserName">UserName as string</param>
<param name="Password">Password as string</param>
<returns>Returns true when file exists, false if not</returns>
<remarks></remarks>
</member>
<member name="M:DD_LIB_Standards.clsWindream.Create_Session">
<summary>
Creates a windream session with the actual user
</summary>
</member>
</members>
</doc>

View File

@ -1,9 +0,0 @@
<?xml version="1.0" encoding="utf-8"?>
<Include>
<?define ProgramName="DD_Clipboard_Searcher"?>
<?define ProductName="DD Clipboard Searcher"?>
<?define Manufacturer="Digital Data"?>
<?define Description="DD Clipboard Searcher"?>
<?define Comments="DD Clipboard Searcher"?>
<?define UpgradeCode="BB3A9D50-7CCE-42DA-84F2-D67129F57B59"?>
</Include>

View File

@ -2,11 +2,11 @@
<configuration> <configuration>
<configSections> <configSections>
<sectionGroup name="userSettings" type="System.Configuration.UserSettingsGroup, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" > <sectionGroup name="userSettings" type="System.Configuration.UserSettingsGroup, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" >
<section name="DD_Clipboard_Searcher.My.MySettings" type="System.Configuration.ClientSettingsSection, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" allowExeDefinition="MachineToLocalUser" requirePermission="false" /> <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>
</configSections> </configSections>
<connectionStrings> <connectionStrings>
<add name="DD_Clipboard_Searcher.My.MySettings.DD_ECMConnectionString" <add name="DD_Clipboard_Watcher.My.MySettings.DD_ECMConnectionString"
connectionString="Data Source=172.24.12.41\tests;Initial Catalog=DD_ECM_RENOLIT;Persist Security Info=True;User ID=sa;Password=dd" connectionString="Data Source=172.24.12.41\tests;Initial Catalog=DD_ECM_RENOLIT;Persist Security Info=True;User ID=sa;Password=dd"
providerName="System.Data.SqlClient" /> providerName="System.Data.SqlClient" />
</connectionStrings> </connectionStrings>
@ -14,10 +14,10 @@
<supportedRuntime version="v4.0" sku=".NETFramework,Version=v4.5.1" /> <supportedRuntime version="v4.0" sku=".NETFramework,Version=v4.5.1" />
</startup> </startup>
<userSettings> <userSettings>
<DD_Clipboard_Searcher.My.MySettings> <DD_Clipboard_Watcher.My.MySettings>
<setting name="WDSearch_maximized" serializeAs="String"> <setting name="WDSearch_maximized" serializeAs="String">
<value>False</value> <value>False</value>
</setting> </setting>
</DD_Clipboard_Searcher.My.MySettings> </DD_Clipboard_Watcher.My.MySettings>
</userSettings> </userSettings>
</configuration> </configuration>

View File

@ -26,7 +26,7 @@ Public Class ClipboardWatcher : Inherits NativeWindow : Implements IDisposable
clsWINDOWSApi.Get_ForegroundWindow_Info() clsWINDOWSApi.Get_ForegroundWindow_Info()
'Dim CapTxt As String = clsWINDOWSApi.GetCaption() 'Dim CapTxt As String = clsWINDOWSApi.GetCaption()
If IsNothing(PROC_Name) Then Exit Sub If IsNothing(PROC_Name) Then Exit Sub
If PROC_Name.StartsWith("DD_Clipboard_Searcher") Then Exit Sub If PROC_Name.StartsWith("DD_Clipboard_Watcher") Then Exit Sub
If LogErrorsOnly = False Then clsLogger.Add(String.Format(" >>{0} - Clipboard ChangedEvent for process '{1}' fired!", Now.ToString, PROC_Name), False) If LogErrorsOnly = False Then clsLogger.Add(String.Format(" >>{0} - Clipboard ChangedEvent for process '{1}' fired!", Now.ToString, PROC_Name), False)
' If CapTxt.ToUpper.StartsWith("DD") Then Exit Sub ' If CapTxt.ToUpper.StartsWith("DD") Then Exit Sub
RaiseEvent Changed(Me, EventArgs.Empty) RaiseEvent Changed(Me, EventArgs.Empty)

View File

@ -71,6 +71,7 @@ Public Class ClassInit
USER_GUID = USER_DT.Rows(0).Item("GUID") USER_GUID = USER_DT.Rows(0).Item("GUID")
USER_LANGUAGE = USER_DT.Rows(0).Item("LANGUAGE") USER_LANGUAGE = USER_DT.Rows(0).Item("LANGUAGE")
DT_CLIENT_USER = clsDatabase.Return_Datatable("SELECT T.*, T1.CLIENT_NAME FROM TBDD_CLIENT_USER T,TBDD_CLIENT T1 WHERE T.CLIENT_ID = T1.GUID AND T.USER_ID = " & USER_GUID, True) DT_CLIENT_USER = clsDatabase.Return_Datatable("SELECT T.*, T1.CLIENT_NAME FROM TBDD_CLIENT_USER T,TBDD_CLIENT T1 WHERE T.CLIENT_ID = T1.GUID AND T.USER_ID = " & USER_GUID, True)
Dim Access_right As Boolean = False Dim Access_right As Boolean = False
sql = String.Format("SELECT COUNT(T.GUID) FROM TBDD_USER_MODULES T, TBDD_MODULES T1 WHERE T.MODULE_ID = T1.GUID AND UPPER(T1.NAME) = UPPER('Clipboard-Searcher') AND T.USER_ID = {0}", USER_GUID) sql = String.Format("SELECT COUNT(T.GUID) FROM TBDD_USER_MODULES T, TBDD_MODULES T1 WHERE T.MODULE_ID = T1.GUID AND UPPER(T1.NAME) = UPPER('Clipboard-Searcher') AND T.USER_ID = {0}", USER_GUID)
Dim USER2MODULE = clsDatabase.Execute_Scalar(sql) Dim USER2MODULE = clsDatabase.Execute_Scalar(sql)
@ -93,11 +94,19 @@ Public Class ClassInit
MsgBox(msg, MsgBoxStyle.Exclamation, "Attention:") MsgBox(msg, MsgBoxStyle.Exclamation, "Attention:")
Return False Return False
Else Else
If DT_CLIENT_USER.Rows.Count = 0 Then
Dim msg = String.Format("Keine Client-Modul Verknüpfung für Ihren User definiert." & vbNewLine & "Bitte setzen Sie sich mit dem Systembetreuer in Verbindung!")
If USER_LANGUAGE <> "de-DE" Then
msg = String.Format("Noc client-module link for Your user." & vbNewLine & "Please contact the admin.")
End If
MsgBox(msg, MsgBoxStyle.Exclamation, "Attention:")
Return False
End If
'Am System anmelden 'Am System anmelden
clsLicense.Refresh_Licence(0) clsLicense.Refresh_Licence(DT_CLIENT_USER.Rows(0).Item("CLIENT_ID"))
'Am System anmelden 'Am System anmelden
sql = String.Format("UPDATE TBDD_USER SET LOGGED_IN = 1, LOGGED_WHERE = '{0}' WHERE GUID = {1}", Environment.MachineName, USER_GUID) ' sql = String.Format("UPDATE TBDD_USER SET LOGGED_IN = 1, LOGGED_WHERE = '{0}' WHERE GUID = {1}", Environment.MachineName, USER_GUID)
clsDatabase.Execute_non_Query(sql) 'clsDatabase.Execute_non_Query(sql)
sql = "DELETE FROM TBDD_USER_MODULE_LOG_IN WHERE USER_ID = " & USER_GUID & " AND MODULE= 'Clipboard-Searcher'" sql = "DELETE FROM TBDD_USER_MODULE_LOG_IN WHERE USER_ID = " & USER_GUID & " AND MODULE= 'Clipboard-Searcher'"
If clsDatabase.Execute_non_Query(sql, True) = True Then If clsDatabase.Execute_non_Query(sql, True) = True Then

View File

@ -6,9 +6,9 @@
<Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform> <Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
<ProjectGuid>{09BC9934-1A38-4752-8873-639B42779CDB}</ProjectGuid> <ProjectGuid>{09BC9934-1A38-4752-8873-639B42779CDB}</ProjectGuid>
<OutputType>WinExe</OutputType> <OutputType>WinExe</OutputType>
<StartupObject>DD_Clipboard_Searcher.My.MyApplication</StartupObject> <StartupObject>DD_Clipboard_Watcher.My.MyApplication</StartupObject>
<RootNamespace>DD_Clipboard_Searcher</RootNamespace> <RootNamespace>DD_Clipboard_Watcher</RootNamespace>
<AssemblyName>DD_Clipboard_Searcher</AssemblyName> <AssemblyName>DD_Clipboard_Watcher</AssemblyName>
<FileAlignment>512</FileAlignment> <FileAlignment>512</FileAlignment>
<MyType>WindowsForms</MyType> <MyType>WindowsForms</MyType>
<TargetFrameworkVersion>v4.5.1</TargetFrameworkVersion> <TargetFrameworkVersion>v4.5.1</TargetFrameworkVersion>
@ -21,7 +21,7 @@
<DefineDebug>true</DefineDebug> <DefineDebug>true</DefineDebug>
<DefineTrace>true</DefineTrace> <DefineTrace>true</DefineTrace>
<OutputPath>bin\Debug\</OutputPath> <OutputPath>bin\Debug\</OutputPath>
<DocumentationFile>DD_Clipboard_Searcher.xml</DocumentationFile> <DocumentationFile>DD_Clipboard_Watcher.xml</DocumentationFile>
<NoWarn>42016,41999,42017,42018,42019,42032,42036,42020,42021,42022</NoWarn> <NoWarn>42016,41999,42017,42018,42019,42032,42036,42020,42021,42022</NoWarn>
</PropertyGroup> </PropertyGroup>
<PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|AnyCPU' "> <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|AnyCPU' ">
@ -31,7 +31,7 @@
<DefineTrace>true</DefineTrace> <DefineTrace>true</DefineTrace>
<Optimize>true</Optimize> <Optimize>true</Optimize>
<OutputPath>bin\Release\</OutputPath> <OutputPath>bin\Release\</OutputPath>
<DocumentationFile>DD_Clipboard_Searcher.xml</DocumentationFile> <DocumentationFile>DD_Clipboard_Watcher.xml</DocumentationFile>
<NoWarn>42016,41999,42017,42018,42019,42032,42036,42020,42021,42022</NoWarn> <NoWarn>42016,41999,42017,42018,42019,42032,42036,42020,42021,42022</NoWarn>
</PropertyGroup> </PropertyGroup>
<PropertyGroup> <PropertyGroup>
@ -242,6 +242,8 @@
</ItemGroup> </ItemGroup>
<ItemGroup> <ItemGroup>
<Content Include="KeyOutput_8167.ico" /> <Content Include="KeyOutput_8167.ico" />
<None Include="Resources\Symbols_Stop_16xLG.png" />
<None Include="Resources\startwithoutdebugging_6556.png" />
<None Include="Resources\ReduceSize.png" /> <None Include="Resources\ReduceSize.png" />
<None Include="Resources\KeyOutput_8167.png" /> <None Include="Resources\KeyOutput_8167.png" />
</ItemGroup> </ItemGroup>

View File

Before

Width:  |  Height:  |  Size: 2.8 KiB

After

Width:  |  Height:  |  Size: 2.8 KiB

View File

@ -1,10 +1,10 @@
'------------------------------------------------------------------------------ '------------------------------------------------------------------------------
' <auto-generated> ' <auto-generated>
' This code was generated by a tool. ' Dieser Code wurde von einem Tool generiert.
' Runtime Version:4.0.30319.36366 ' Laufzeitversion:4.0.30319.42000
' '
' Changes to this file may cause incorrect behavior and will be lost if ' Änderungen an dieser Datei können falsches Verhalten verursachen und gehen verloren, wenn
' the code is regenerated. ' der Code erneut generiert wird.
' </auto-generated> ' </auto-generated>
'------------------------------------------------------------------------------ '------------------------------------------------------------------------------
@ -14,10 +14,10 @@ Option Explicit On
Namespace My Namespace My
'NOTE: This file is auto-generated; do not modify it directly. To make changes, 'HINWEIS: Diese Datei wird automatisch generiert und darf nicht direkt bearbeitet werden. Wenn Sie Änderungen vornehmen möchten
' or if you encounter build errors in this file, go to the Project Designer ' oder in dieser Datei Buildfehler auftreten, wechseln Sie zum Projekt-Designer.
' (go to Project Properties or double-click the My Project node in ' (Wechseln Sie dazu zu den Projekteigenschaften, oder doppelklicken Sie auf den Knoten "Mein Projekt" im
' Solution Explorer), and make changes on the Application tab. ' Projektmappen-Explorer). Nehmen Sie auf der Registerkarte "Anwendung" entsprechende Änderungen vor.
' '
Partial Friend Class MyApplication Partial Friend Class MyApplication
@ -32,7 +32,7 @@ Namespace My
<Global.System.Diagnostics.DebuggerStepThroughAttribute()> _ <Global.System.Diagnostics.DebuggerStepThroughAttribute()> _
Protected Overrides Sub OnCreateMainForm() Protected Overrides Sub OnCreateMainForm()
Me.MainForm = Global.DD_Clipboard_Searcher.frmMain Me.MainForm = Global.DD_Clipboard_Watcher.frmMain
End Sub End Sub
End Class End Class
End Namespace End Namespace

View File

@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices
' übernehmen, indem Sie "*" eingeben: ' übernehmen, indem Sie "*" eingeben:
' <Assembly: AssemblyVersion("1.0.*")> ' <Assembly: AssemblyVersion("1.0.*")>
<Assembly: AssemblyVersion("1.3.0.3")> <Assembly: AssemblyVersion("1.3.0.4")>
<Assembly: AssemblyFileVersion("1.0.0.0")> <Assembly: AssemblyFileVersion("1.0.0.0")>

View File

@ -1,7 +1,7 @@
'------------------------------------------------------------------------------ '------------------------------------------------------------------------------
' <auto-generated> ' <auto-generated>
' Dieser Code wurde von einem Tool generiert. ' Dieser Code wurde von einem Tool generiert.
' Laufzeitversion:4.0.30319.36366 ' Laufzeitversion:4.0.30319.42000
' '
' Änderungen an dieser Datei können falsches Verhalten verursachen und gehen verloren, wenn ' Änderungen an dieser Datei können falsches Verhalten verursachen und gehen verloren, wenn
' der Code erneut generiert wird. ' der Code erneut generiert wird.
@ -39,7 +39,7 @@ Namespace My.Resources
Friend ReadOnly Property ResourceManager() As Global.System.Resources.ResourceManager Friend ReadOnly Property ResourceManager() As Global.System.Resources.ResourceManager
Get Get
If Object.ReferenceEquals(resourceMan, Nothing) Then If Object.ReferenceEquals(resourceMan, Nothing) Then
Dim temp As Global.System.Resources.ResourceManager = New Global.System.Resources.ResourceManager("DD_Clipboard_Searcher.Resources", GetType(Resources).Assembly) Dim temp As Global.System.Resources.ResourceManager = New Global.System.Resources.ResourceManager("DD_Clipboard_Watcher.Resources", GetType(Resources).Assembly)
resourceMan = temp resourceMan = temp
End If End If
Return resourceMan Return resourceMan
@ -130,6 +130,16 @@ Namespace My.Resources
End Get End Get
End Property End Property
'''<summary>
''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
'''</summary>
Friend ReadOnly Property startwithoutdebugging_6556() As System.Drawing.Bitmap
Get
Dim obj As Object = ResourceManager.GetObject("startwithoutdebugging_6556", resourceCulture)
Return CType(obj,System.Drawing.Bitmap)
End Get
End Property
'''<summary> '''<summary>
''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
'''</summary> '''</summary>
@ -139,5 +149,15 @@ Namespace My.Resources
Return CType(obj,System.Drawing.Bitmap) Return CType(obj,System.Drawing.Bitmap)
End Get End Get
End Property End Property
'''<summary>
''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
'''</summary>
Friend ReadOnly Property Symbols_Stop_16xLG() As System.Drawing.Bitmap
Get
Dim obj As Object = ResourceManager.GetObject("Symbols_Stop_16xLG", resourceCulture)
Return CType(obj,System.Drawing.Bitmap)
End Get
End Property
End Module End Module
End Namespace End Namespace

View File

@ -118,28 +118,34 @@
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> <value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader> </resheader>
<assembly alias="System.Windows.Forms" name="System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" /> <assembly alias="System.Windows.Forms" name="System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
<data name="ReduceSize" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\ReduceSize.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="GoToDefinition_5575" type="System.Resources.ResXFileRef, System.Windows.Forms"> <data name="GoToDefinition_5575" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\GoToDefinition_5575.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> <value>..\Resources\GoToDefinition_5575.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data> </data>
<data name="control_start_blue" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\control_start_blue.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="KeyOutput_8167" type="System.Resources.ResXFileRef, System.Windows.Forms"> <data name="KeyOutput_8167" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\KeyOutput_8167.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> <value>..\Resources\KeyOutput_8167.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data> </data>
<data name="StatusAnnotations_Stop_16xLG" type="System.Resources.ResXFileRef, System.Windows.Forms"> <data name="StatusAnnotations_Stop_16xLG" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\StatusAnnotations_Stop_16xLG.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> <value>..\Resources\StatusAnnotations_Stop_16xLG.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data> </data>
<data name="Annotation_New" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\Annotation_New.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="KeyDown_8461" type="System.Resources.ResXFileRef, System.Windows.Forms"> <data name="KeyDown_8461" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\KeyDown_8461.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> <value>..\Resources\KeyDown_8461.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data> </data>
<data name="folder_Open_16xLG" type="System.Resources.ResXFileRef, System.Windows.Forms"> <data name="folder_Open_16xLG" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\folder_Open_16xLG.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> <value>..\Resources\folder_Open_16xLG.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data> </data>
<data name="Annotation_New" type="System.Resources.ResXFileRef, System.Windows.Forms"> <data name="control_start_blue" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\Annotation_New.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> <value>..\Resources\control_start_blue.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data> </data>
<data name="ReduceSize" type="System.Resources.ResXFileRef, System.Windows.Forms"> <data name="startwithoutdebugging_6556" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\ReduceSize.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> <value>..\Resources\startwithoutdebugging_6556.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="Symbols_Stop_16xLG" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\Symbols_Stop_16xLG.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data> </data>
</root> </root>

View File

@ -1,7 +1,7 @@
'------------------------------------------------------------------------------ '------------------------------------------------------------------------------
' <auto-generated> ' <auto-generated>
' Dieser Code wurde von einem Tool generiert. ' Dieser Code wurde von einem Tool generiert.
' Laufzeitversion:4.0.30319.36366 ' Laufzeitversion:4.0.30319.42000
' '
' Änderungen an dieser Datei können falsches Verhalten verursachen und gehen verloren, wenn ' Änderungen an dieser Datei können falsches Verhalten verursachen und gehen verloren, wenn
' der Code erneut generiert wird. ' der Code erneut generiert wird.
@ -15,21 +15,21 @@ Option Explicit On
Namespace My Namespace My
<Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(), _ <Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Editors.SettingsDesigner.SettingsSingleFileGenerator", "12.0.0.0"), _ Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Editors.SettingsDesigner.SettingsSingleFileGenerator", "15.0.1.0"), _
Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _ Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Partial Friend NotInheritable Class MySettings Partial Friend NotInheritable Class MySettings
Inherits Global.System.Configuration.ApplicationSettingsBase Inherits Global.System.Configuration.ApplicationSettingsBase
Private Shared defaultInstance As MySettings = CType(Global.System.Configuration.ApplicationSettingsBase.Synchronized(New MySettings()),MySettings) Private Shared defaultInstance As MySettings = CType(Global.System.Configuration.ApplicationSettingsBase.Synchronized(New MySettings()),MySettings)
#Region "Funktion zum automatischen Speichern von My.Settings" #Region "Automatische My.Settings-Speicherfunktion"
#If _MyType = "WindowsForms" Then #If _MyType = "WindowsForms" Then
Private Shared addedHandler As Boolean Private Shared addedHandler As Boolean
Private Shared addedHandlerLockObject As New Object Private Shared addedHandlerLockObject As New Object
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _ <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Shared Sub AutoSaveSettings(ByVal sender As Global.System.Object, ByVal e As Global.System.EventArgs) Private Shared Sub AutoSaveSettings(sender As Global.System.Object, e As Global.System.EventArgs)
If My.Application.SaveMySettingsOnExit Then If My.Application.SaveMySettingsOnExit Then
My.Settings.Save() My.Settings.Save()
End If End If
@ -87,9 +87,9 @@ Namespace My
Friend Module MySettingsProperty Friend Module MySettingsProperty
<Global.System.ComponentModel.Design.HelpKeywordAttribute("My.Settings")> _ <Global.System.ComponentModel.Design.HelpKeywordAttribute("My.Settings")> _
Friend ReadOnly Property Settings() As Global.DD_Clipboard_Searcher.My.MySettings Friend ReadOnly Property Settings() As Global.DD_Clipboard_Watcher.My.MySettings
Get Get
Return Global.DD_Clipboard_Searcher.My.MySettings.Default Return Global.DD_Clipboard_Watcher.My.MySettings.Default
End Get End Get
End Property End Property
End Module End Module

View File

@ -4,7 +4,7 @@
<xs:appinfo source="urn:schemas-microsoft-com:xml-msdatasource"> <xs:appinfo source="urn:schemas-microsoft-com:xml-msdatasource">
<DataSource DefaultConnectionIndex="0" FunctionsComponentName="QueriesTableAdapter" Modifier="AutoLayout, AnsiClass, Class, Public" SchemaSerializationMode="IncludeSchema" xmlns="urn:schemas-microsoft-com:xml-msdatasource"> <DataSource DefaultConnectionIndex="0" FunctionsComponentName="QueriesTableAdapter" Modifier="AutoLayout, AnsiClass, Class, Public" SchemaSerializationMode="IncludeSchema" xmlns="urn:schemas-microsoft-com:xml-msdatasource">
<Connections> <Connections>
<Connection AppSettingsObjectName="MySettings" AppSettingsPropertyName="DD_ECMConnectionString" ConnectionStringObject="" IsAppSettingsProperty="true" Modifier="Assembly" Name="DD_ECMConnectionString (MySettings)" ParameterPrefix="@" PropertyReference="ApplicationSettings.DD_Clipboard_Searcher.My.MySettings.GlobalReference.Default.DD_ECMConnectionString" Provider="System.Data.SqlClient" /> <Connection AppSettingsObjectName="MySettings" AppSettingsPropertyName="DD_ECMConnectionString" ConnectionStringObject="" IsAppSettingsProperty="true" Modifier="Assembly" Name="DD_ECMConnectionString (MySettings)" ParameterPrefix="@" PropertyReference="ApplicationSettings.DD_Clipboard_Watcher.My.MySettings.GlobalReference.Default.DD_ECMConnectionString" Provider="System.Data.SqlClient" />
</Connections> </Connections>
<Tables> <Tables>
<TableAdapter BaseClass="System.ComponentModel.Component" DataAccessorModifier="AutoLayout, AnsiClass, Class, Public" DataAccessorName="TBCBS_PROFILESTableAdapter" GeneratorDataComponentClassName="TBCBS_PROFILESTableAdapter" Name="TBCBS_PROFILES" UserDataComponentName="TBCBS_PROFILESTableAdapter"> <TableAdapter BaseClass="System.ComponentModel.Component" DataAccessorModifier="AutoLayout, AnsiClass, Class, Public" DataAccessorName="TBCBS_PROFILESTableAdapter" GeneratorDataComponentClassName="TBCBS_PROFILESTableAdapter" Name="TBCBS_PROFILES" UserDataComponentName="TBCBS_PROFILESTableAdapter">
@ -132,7 +132,7 @@ SELECT GUID, PROFILE_ID, USER_ID, ADDED_WHO, ADDED_WHEN FROM TBCBS_USER_PROFILE
</TableAdapter> </TableAdapter>
<TableAdapter BaseClass="System.ComponentModel.Component" DataAccessorModifier="AutoLayout, AnsiClass, Class, Public" DataAccessorName="VWUSER_PROFILETableAdapter" GeneratorDataComponentClassName="VWUSER_PROFILETableAdapter" Name="VWUSER_PROFILE" UserDataComponentName="VWUSER_PROFILETableAdapter"> <TableAdapter BaseClass="System.ComponentModel.Component" DataAccessorModifier="AutoLayout, AnsiClass, Class, Public" DataAccessorName="VWUSER_PROFILETableAdapter" GeneratorDataComponentClassName="VWUSER_PROFILETableAdapter" Name="VWUSER_PROFILE" UserDataComponentName="VWUSER_PROFILETableAdapter">
<MainSource> <MainSource>
<DbSource ConnectionRef="DD_ECMConnectionString (MySettings)" DbObjectType="Unknown" 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"> <DbSource ConnectionRef="DD_ECMConnectionString (MySettings)" DbObjectName="DD_ECM_RENOLIT.dbo.TBDD_USER" 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">
<SelectCommand> <SelectCommand>
<DbCommand CommandType="Text" ModifiedByUser="true"> <DbCommand CommandType="Text" ModifiedByUser="true">
<CommandText>SELECT T.GUID, T.PROFILE_ID, T1.USERNAME, T1.NAME, T1.PRENAME <CommandText>SELECT T.GUID, T.PROFILE_ID, T1.USERNAME, T1.NAME, T1.PRENAME
@ -219,7 +219,7 @@ WHERE (PROFILE_ID = @PID)</CommandText>
<xs:element name="MyDataset" msdata:IsDataSet="true" msdata:UseCurrentLocale="true" msprop:EnableTableAdapterManager="true" msprop:Generator_DataSetName="MyDataset" msprop:Generator_UserDSName="MyDataset"> <xs:element name="MyDataset" msdata:IsDataSet="true" msdata:UseCurrentLocale="true" msprop:EnableTableAdapterManager="true" msprop:Generator_DataSetName="MyDataset" msprop:Generator_UserDSName="MyDataset">
<xs:complexType> <xs:complexType>
<xs:choice minOccurs="0" maxOccurs="unbounded"> <xs:choice minOccurs="0" maxOccurs="unbounded">
<xs:element name="TBCBS_PROFILES" msprop:Generator_TableClassName="TBCBS_PROFILESDataTable" msprop:Generator_TableVarName="tableTBCBS_PROFILES" msprop:Generator_RowChangedName="TBCBS_PROFILESRowChanged" msprop:Generator_TablePropName="TBCBS_PROFILES" msprop:Generator_RowDeletingName="TBCBS_PROFILESRowDeleting" msprop:Generator_RowChangingName="TBCBS_PROFILESRowChanging" msprop:Generator_RowEvHandlerName="TBCBS_PROFILESRowChangeEventHandler" msprop:Generator_RowDeletedName="TBCBS_PROFILESRowDeleted" msprop:Generator_RowClassName="TBCBS_PROFILESRow" msprop:Generator_UserTableName="TBCBS_PROFILES" msprop:Generator_RowEvArgName="TBCBS_PROFILESRowChangeEvent"> <xs:element name="TBCBS_PROFILES" msprop:Generator_TableClassName="TBCBS_PROFILESDataTable" msprop:Generator_TableVarName="tableTBCBS_PROFILES" msprop:Generator_TablePropName="TBCBS_PROFILES" msprop:Generator_RowDeletingName="TBCBS_PROFILESRowDeleting" msprop:Generator_RowChangingName="TBCBS_PROFILESRowChanging" msprop:Generator_RowEvHandlerName="TBCBS_PROFILESRowChangeEventHandler" msprop:Generator_RowDeletedName="TBCBS_PROFILESRowDeleted" msprop:Generator_UserTableName="TBCBS_PROFILES" msprop:Generator_RowChangedName="TBCBS_PROFILESRowChanged" msprop:Generator_RowEvArgName="TBCBS_PROFILESRowChangeEvent" msprop:Generator_RowClassName="TBCBS_PROFILESRow">
<xs:complexType> <xs:complexType>
<xs:sequence> <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" /> <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" />
@ -270,7 +270,7 @@ WHERE (PROFILE_ID = @PID)</CommandText>
</xs:sequence> </xs:sequence>
</xs:complexType> </xs:complexType>
</xs:element> </xs:element>
<xs:element name="TBCBS_USER_PROFILE" msprop:Generator_TableClassName="TBCBS_USER_PROFILEDataTable" msprop:Generator_TableVarName="tableTBCBS_USER_PROFILE" msprop:Generator_RowChangedName="TBCBS_USER_PROFILERowChanged" msprop:Generator_TablePropName="TBCBS_USER_PROFILE" msprop:Generator_RowDeletingName="TBCBS_USER_PROFILERowDeleting" msprop:Generator_RowChangingName="TBCBS_USER_PROFILERowChanging" msprop:Generator_RowEvHandlerName="TBCBS_USER_PROFILERowChangeEventHandler" msprop:Generator_RowDeletedName="TBCBS_USER_PROFILERowDeleted" msprop:Generator_RowClassName="TBCBS_USER_PROFILERow" msprop:Generator_UserTableName="TBCBS_USER_PROFILE" msprop:Generator_RowEvArgName="TBCBS_USER_PROFILERowChangeEvent"> <xs:element name="TBCBS_USER_PROFILE" msprop:Generator_TableClassName="TBCBS_USER_PROFILEDataTable" msprop:Generator_TableVarName="tableTBCBS_USER_PROFILE" msprop:Generator_TablePropName="TBCBS_USER_PROFILE" msprop:Generator_RowDeletingName="TBCBS_USER_PROFILERowDeleting" msprop:Generator_RowChangingName="TBCBS_USER_PROFILERowChanging" msprop:Generator_RowEvHandlerName="TBCBS_USER_PROFILERowChangeEventHandler" msprop:Generator_RowDeletedName="TBCBS_USER_PROFILERowDeleted" msprop:Generator_UserTableName="TBCBS_USER_PROFILE" msprop:Generator_RowChangedName="TBCBS_USER_PROFILERowChanged" msprop:Generator_RowEvArgName="TBCBS_USER_PROFILERowChangeEvent" msprop:Generator_RowClassName="TBCBS_USER_PROFILERow">
<xs:complexType> <xs:complexType>
<xs:sequence> <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" /> <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" />
@ -287,7 +287,7 @@ WHERE (PROFILE_ID = @PID)</CommandText>
</xs:sequence> </xs:sequence>
</xs:complexType> </xs:complexType>
</xs:element> </xs:element>
<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: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:complexType> <xs:complexType>
<xs:sequence> <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" /> <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" />
@ -316,7 +316,7 @@ WHERE (PROFILE_ID = @PID)</CommandText>
</xs:sequence> </xs:sequence>
</xs:complexType> </xs:complexType>
</xs:element> </xs:element>
<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: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:complexType> <xs:complexType>
<xs:sequence> <xs:sequence>
<xs:element name="Select" msprop:Generator_ColumnVarNameInTable="columnSelect" msprop:Generator_ColumnPropNameInRow="_Select" msprop:Generator_ColumnPropNameInTable="SelectColumn" msprop:Generator_UserColumnName="Select" type="xs:boolean" default="false" minOccurs="0" /> <xs:element name="Select" msprop:Generator_ColumnVarNameInTable="columnSelect" msprop:Generator_ColumnPropNameInRow="_Select" msprop:Generator_ColumnPropNameInTable="SelectColumn" msprop:Generator_UserColumnName="Select" type="xs:boolean" default="false" minOccurs="0" />
@ -328,7 +328,7 @@ WHERE (PROFILE_ID = @PID)</CommandText>
</xs:sequence> </xs:sequence>
</xs:complexType> </xs:complexType>
</xs:element> </xs:element>
<xs:element name="TBCBS_PROFILE_PROCESS" msprop:Generator_TableClassName="TBCBS_PROFILE_PROCESSDataTable" msprop:Generator_TableVarName="tableTBCBS_PROFILE_PROCESS" msprop:Generator_TablePropName="TBCBS_PROFILE_PROCESS" msprop:Generator_RowDeletingName="TBCBS_PROFILE_PROCESSRowDeleting" msprop:Generator_RowChangingName="TBCBS_PROFILE_PROCESSRowChanging" msprop:Generator_RowEvHandlerName="TBCBS_PROFILE_PROCESSRowChangeEventHandler" msprop:Generator_RowDeletedName="TBCBS_PROFILE_PROCESSRowDeleted" msprop:Generator_UserTableName="TBCBS_PROFILE_PROCESS" msprop:Generator_RowChangedName="TBCBS_PROFILE_PROCESSRowChanged" msprop:Generator_RowEvArgName="TBCBS_PROFILE_PROCESSRowChangeEvent" msprop:Generator_RowClassName="TBCBS_PROFILE_PROCESSRow"> <xs:element name="TBCBS_PROFILE_PROCESS" msprop:Generator_TableClassName="TBCBS_PROFILE_PROCESSDataTable" msprop:Generator_TableVarName="tableTBCBS_PROFILE_PROCESS" msprop:Generator_RowChangedName="TBCBS_PROFILE_PROCESSRowChanged" msprop:Generator_TablePropName="TBCBS_PROFILE_PROCESS" msprop:Generator_RowDeletingName="TBCBS_PROFILE_PROCESSRowDeleting" msprop:Generator_RowChangingName="TBCBS_PROFILE_PROCESSRowChanging" msprop:Generator_RowEvHandlerName="TBCBS_PROFILE_PROCESSRowChangeEventHandler" msprop:Generator_RowDeletedName="TBCBS_PROFILE_PROCESSRowDeleted" msprop:Generator_RowClassName="TBCBS_PROFILE_PROCESSRow" msprop:Generator_UserTableName="TBCBS_PROFILE_PROCESS" msprop:Generator_RowEvArgName="TBCBS_PROFILE_PROCESSRowChangeEvent">
<xs:complexType> <xs:complexType>
<xs:sequence> <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" /> <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" />

View File

Before

Width:  |  Height:  |  Size: 2.4 KiB

After

Width:  |  Height:  |  Size: 2.4 KiB

View File

Before

Width:  |  Height:  |  Size: 214 B

After

Width:  |  Height:  |  Size: 214 B

View File

Before

Width:  |  Height:  |  Size: 241 B

After

Width:  |  Height:  |  Size: 241 B

View File

Before

Width:  |  Height:  |  Size: 2.8 KiB

After

Width:  |  Height:  |  Size: 2.8 KiB

View File

Before

Width:  |  Height:  |  Size: 227 B

After

Width:  |  Height:  |  Size: 227 B

View File

Before

Width:  |  Height:  |  Size: 1.5 KiB

After

Width:  |  Height:  |  Size: 1.5 KiB

View File

Before

Width:  |  Height:  |  Size: 336 B

After

Width:  |  Height:  |  Size: 336 B

Binary file not shown.

After

Width:  |  Height:  |  Size: 146 B

View File

Before

Width:  |  Height:  |  Size: 720 B

After

Width:  |  Height:  |  Size: 720 B

View File

Before

Width:  |  Height:  |  Size: 277 B

After

Width:  |  Height:  |  Size: 277 B

Binary file not shown.

After

Width:  |  Height:  |  Size: 269 B

View File

@ -60,7 +60,8 @@ Public Class clsSearch
fileContents = fileContents.Replace("@Clipboard", CURR_MATCH_RESULT) fileContents = fileContents.Replace("@Clipboard", CURR_MATCH_RESULT)
fileContents = fileContents.Replace("@CLIPBOARD", CURR_MATCH_RESULT) fileContents = fileContents.Replace("@CLIPBOARD", CURR_MATCH_RESULT)
fileContents = fileContents.Replace("@Zwischenablage", CURR_MATCH_RESULT) fileContents = fileContents.Replace("@Zwischenablage", CURR_MATCH_RESULT)
fileContents = fileContents.Replace("123456789", CURR_MATCH_RESULT)
fileContents = fileContents.Replace("4711", CURR_MATCH_RESULT)
Try Try
'Die windream File zusammensetzen 'Die windream File zusammensetzen
windream_temp_search = temppath & tempName & extension windream_temp_search = temppath & tempName & extension
@ -135,6 +136,8 @@ Public Class clsSearch
Catch ex As Exception Catch ex As Exception
clsLogger.Add("Unexpected error while Setting foreground: " & ex.Message) clsLogger.Add("Unexpected error while Setting foreground: " & ex.Message)
End Try End Try
CURR_MATCH_WM_SEARCH = Nothing
CURR_MATCH_RESULT = Nothing
Return "" Return ""
Catch ex As Exception Catch ex As Exception
clsLogger.Add("Unexpected error in Create Search: " & ex.Message) clsLogger.Add("Unexpected error in Create Search: " & ex.Message)

View File

@ -37,7 +37,7 @@ Partial Class frmAdministration
Me.btnaddSearch = New System.Windows.Forms.Button() Me.btnaddSearch = New System.Windows.Forms.Button()
Me.GridControl1 = New DevExpress.XtraGrid.GridControl() Me.GridControl1 = New DevExpress.XtraGrid.GridControl()
Me.TBCBS_PROFILESBindingSource = New System.Windows.Forms.BindingSource(Me.components) Me.TBCBS_PROFILESBindingSource = New System.Windows.Forms.BindingSource(Me.components)
Me.MyDataset = New DD_Clipboard_Searcher.MyDataset() Me.MyDataset = New DD_Clipboard_Watcher.MyDataset()
Me.GridView1 = New DevExpress.XtraGrid.Views.Grid.GridView() Me.GridView1 = New DevExpress.XtraGrid.Views.Grid.GridView()
Me.colGUID = New DevExpress.XtraGrid.Columns.GridColumn() Me.colGUID = New DevExpress.XtraGrid.Columns.GridColumn()
Me.colNAME = New DevExpress.XtraGrid.Columns.GridColumn() Me.colNAME = New DevExpress.XtraGrid.Columns.GridColumn()
@ -83,22 +83,22 @@ Partial Class frmAdministration
Me.colUSERNAME = New DevExpress.XtraGrid.Columns.GridColumn() Me.colUSERNAME = New DevExpress.XtraGrid.Columns.GridColumn()
Me.colNAME1 = New DevExpress.XtraGrid.Columns.GridColumn() Me.colNAME1 = New DevExpress.XtraGrid.Columns.GridColumn()
Me.colPRENAME = New DevExpress.XtraGrid.Columns.GridColumn() Me.colPRENAME = New DevExpress.XtraGrid.Columns.GridColumn()
Me.TBCBS_PROFILESTableAdapter = New DD_Clipboard_Searcher.MyDatasetTableAdapters.TBCBS_PROFILESTableAdapter() Me.TBCBS_PROFILESTableAdapter = New DD_Clipboard_Watcher.MyDatasetTableAdapters.TBCBS_PROFILESTableAdapter()
Me.TableAdapterManager = New DD_Clipboard_Searcher.MyDatasetTableAdapters.TableAdapterManager() Me.TableAdapterManager = New DD_Clipboard_Watcher.MyDatasetTableAdapters.TableAdapterManager()
Me.StatusStrip1 = New System.Windows.Forms.StatusStrip() Me.StatusStrip1 = New System.Windows.Forms.StatusStrip()
Me.statuslabel = New System.Windows.Forms.ToolStripStatusLabel() Me.statuslabel = New System.Windows.Forms.ToolStripStatusLabel()
Me.OFDWindreamsuche = New System.Windows.Forms.OpenFileDialog() Me.OFDWindreamsuche = New System.Windows.Forms.OpenFileDialog()
Me.VWUSER_PROFILETableAdapter = New DD_Clipboard_Searcher.MyDatasetTableAdapters.VWUSER_PROFILETableAdapter() Me.VWUSER_PROFILETableAdapter = New DD_Clipboard_Watcher.MyDatasetTableAdapters.VWUSER_PROFILETableAdapter()
Me.GroupBox3 = New System.Windows.Forms.GroupBox() Me.GroupBox3 = New System.Windows.Forms.GroupBox()
Me.btnStartStopProcess = New System.Windows.Forms.Button()
Me.PictureBox1 = New System.Windows.Forms.PictureBox() Me.PictureBox1 = New System.Windows.Forms.PictureBox()
Me.chkRunwindowCheck = New System.Windows.Forms.CheckBox()
Me.txtProcessName = New System.Windows.Forms.TextBox() Me.txtProcessName = New System.Windows.Forms.TextBox()
Me.txtPID = New System.Windows.Forms.TextBox() Me.txtPID = New System.Windows.Forms.TextBox()
Me.Label4 = New System.Windows.Forms.Label() Me.Label4 = New System.Windows.Forms.Label()
Me.Label3 = New System.Windows.Forms.Label() Me.Label3 = New System.Windows.Forms.Label()
Me.TimerTest = New System.Windows.Forms.Timer(Me.components) Me.TimerTest = New System.Windows.Forms.Timer(Me.components)
Me.TBCBS_PROFILE_PROCESSBindingSource = New System.Windows.Forms.BindingSource(Me.components) Me.TBCBS_PROFILE_PROCESSBindingSource = New System.Windows.Forms.BindingSource(Me.components)
Me.TBCBS_PROFILE_PROCESSTableAdapter = New DD_Clipboard_Searcher.MyDatasetTableAdapters.TBCBS_PROFILE_PROCESSTableAdapter() Me.TBCBS_PROFILE_PROCESSTableAdapter = New DD_Clipboard_Watcher.MyDatasetTableAdapters.TBCBS_PROFILE_PROCESSTableAdapter()
Me.GridControl3 = New DevExpress.XtraGrid.GridControl() Me.GridControl3 = New DevExpress.XtraGrid.GridControl()
Me.GridViewProcessProfile = New DevExpress.XtraGrid.Views.Grid.GridView() Me.GridViewProcessProfile = New DevExpress.XtraGrid.Views.Grid.GridView()
Me.colGUID2 = New DevExpress.XtraGrid.Columns.GridColumn() Me.colGUID2 = New DevExpress.XtraGrid.Columns.GridColumn()
@ -106,8 +106,14 @@ Partial Class frmAdministration
Me.colADDED_WHEN = New DevExpress.XtraGrid.Columns.GridColumn() Me.colADDED_WHEN = New DevExpress.XtraGrid.Columns.GridColumn()
Me.colADDED_WHO = New DevExpress.XtraGrid.Columns.GridColumn() Me.colADDED_WHO = New DevExpress.XtraGrid.Columns.GridColumn()
Me.GroupBox4 = New System.Windows.Forms.GroupBox() Me.GroupBox4 = New System.Windows.Forms.GroupBox()
Me.btnLinkProcessPRofile = New System.Windows.Forms.Button()
Me.btndeleteProcessProfileLink = New System.Windows.Forms.Button() Me.btndeleteProcessProfileLink = New System.Windows.Forms.Button()
Me.btnLinkProcessPRofile = New System.Windows.Forms.Button()
Me.BackgroundWorker1 = New System.ComponentModel.BackgroundWorker()
Me.GroupBox5 = New System.Windows.Forms.GroupBox()
Me.lblLicenseDate = New System.Windows.Forms.Label()
Me.lbllicenseCount = New System.Windows.Forms.Label()
Me.Label6 = New System.Windows.Forms.Label()
Me.Label5 = New System.Windows.Forms.Label()
GUIDLabel = New System.Windows.Forms.Label() GUIDLabel = New System.Windows.Forms.Label()
NAMELabel = New System.Windows.Forms.Label() NAMELabel = New System.Windows.Forms.Label()
COMMENTLabel = New System.Windows.Forms.Label() COMMENTLabel = New System.Windows.Forms.Label()
@ -138,6 +144,7 @@ Partial Class frmAdministration
CType(Me.GridControl3, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.GridControl3, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.GridViewProcessProfile, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.GridViewProcessProfile, System.ComponentModel.ISupportInitialize).BeginInit()
Me.GroupBox4.SuspendLayout() Me.GroupBox4.SuspendLayout()
Me.GroupBox5.SuspendLayout()
Me.SuspendLayout() Me.SuspendLayout()
' '
'GUIDLabel 'GUIDLabel
@ -635,7 +642,7 @@ Partial Class frmAdministration
Me.btndeleteUserConstructorRel.ImeMode = System.Windows.Forms.ImeMode.NoControl Me.btndeleteUserConstructorRel.ImeMode = System.Windows.Forms.ImeMode.NoControl
Me.btndeleteUserConstructorRel.Location = New System.Drawing.Point(9, 263) Me.btndeleteUserConstructorRel.Location = New System.Drawing.Point(9, 263)
Me.btndeleteUserConstructorRel.Name = "btndeleteUserConstructorRel" Me.btndeleteUserConstructorRel.Name = "btndeleteUserConstructorRel"
Me.btndeleteUserConstructorRel.Size = New System.Drawing.Size(173, 23) Me.btndeleteUserConstructorRel.Size = New System.Drawing.Size(351, 23)
Me.btndeleteUserConstructorRel.TabIndex = 60 Me.btndeleteUserConstructorRel.TabIndex = 60
Me.btndeleteUserConstructorRel.Text = "Lösche Userzuordnung" Me.btndeleteUserConstructorRel.Text = "Lösche Userzuordnung"
Me.btndeleteUserConstructorRel.TextAlign = System.Drawing.ContentAlignment.MiddleLeft Me.btndeleteUserConstructorRel.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
@ -684,6 +691,13 @@ Partial Class frmAdministration
' '
Me.GridViewProfileUser.Appearance.EvenRow.BackColor = System.Drawing.Color.Aqua Me.GridViewProfileUser.Appearance.EvenRow.BackColor = System.Drawing.Color.Aqua
Me.GridViewProfileUser.Appearance.EvenRow.Options.UseBackColor = True Me.GridViewProfileUser.Appearance.EvenRow.Options.UseBackColor = True
Me.GridViewProfileUser.Appearance.HeaderPanel.BackColor = System.Drawing.Color.Gray
Me.GridViewProfileUser.Appearance.HeaderPanel.ForeColor = System.Drawing.Color.Black
Me.GridViewProfileUser.Appearance.HeaderPanel.Options.UseBackColor = True
Me.GridViewProfileUser.Appearance.HeaderPanel.Options.UseBorderColor = True
Me.GridViewProfileUser.Appearance.HeaderPanel.Options.UseForeColor = True
Me.GridViewProfileUser.Appearance.Row.ForeColor = System.Drawing.Color.Black
Me.GridViewProfileUser.Appearance.Row.Options.UseForeColor = True
Me.GridViewProfileUser.Columns.AddRange(New DevExpress.XtraGrid.Columns.GridColumn() {Me.colGUID1, Me.colUSERNAME, Me.colNAME1, Me.colPRENAME}) Me.GridViewProfileUser.Columns.AddRange(New DevExpress.XtraGrid.Columns.GridColumn() {Me.colGUID1, Me.colUSERNAME, Me.colNAME1, Me.colPRENAME})
Me.GridViewProfileUser.GridControl = Me.GridControl2 Me.GridViewProfileUser.GridControl = Me.GridControl2
Me.GridViewProfileUser.Name = "GridViewProfileUser" Me.GridViewProfileUser.Name = "GridViewProfileUser"
@ -742,7 +756,7 @@ Partial Class frmAdministration
Me.TableAdapterManager.TBCBS_PROFILE_PROCESSTableAdapter = Nothing Me.TableAdapterManager.TBCBS_PROFILE_PROCESSTableAdapter = Nothing
Me.TableAdapterManager.TBCBS_PROFILESTableAdapter = Me.TBCBS_PROFILESTableAdapter Me.TableAdapterManager.TBCBS_PROFILESTableAdapter = Me.TBCBS_PROFILESTableAdapter
Me.TableAdapterManager.TBCBS_USER_PROFILETableAdapter = Nothing Me.TableAdapterManager.TBCBS_USER_PROFILETableAdapter = Nothing
Me.TableAdapterManager.UpdateOrder = DD_Clipboard_Searcher.MyDatasetTableAdapters.TableAdapterManager.UpdateOrderOption.InsertUpdateDelete Me.TableAdapterManager.UpdateOrder = DD_Clipboard_Watcher.MyDatasetTableAdapters.TableAdapterManager.UpdateOrderOption.InsertUpdateDelete
' '
'StatusStrip1 'StatusStrip1
' '
@ -770,22 +784,34 @@ Partial Class frmAdministration
' '
'GroupBox3 'GroupBox3
' '
Me.GroupBox3.Controls.Add(Me.btnStartStopProcess)
Me.GroupBox3.Controls.Add(Me.PictureBox1) Me.GroupBox3.Controls.Add(Me.PictureBox1)
Me.GroupBox3.Controls.Add(Me.chkRunwindowCheck)
Me.GroupBox3.Controls.Add(Me.txtProcessName) Me.GroupBox3.Controls.Add(Me.txtProcessName)
Me.GroupBox3.Controls.Add(Me.txtPID) Me.GroupBox3.Controls.Add(Me.txtPID)
Me.GroupBox3.Controls.Add(Me.Label4) Me.GroupBox3.Controls.Add(Me.Label4)
Me.GroupBox3.Controls.Add(Me.Label3) Me.GroupBox3.Controls.Add(Me.Label3)
Me.GroupBox3.Location = New System.Drawing.Point(12, 310) Me.GroupBox3.Location = New System.Drawing.Point(12, 310)
Me.GroupBox3.Name = "GroupBox3" Me.GroupBox3.Name = "GroupBox3"
Me.GroupBox3.Size = New System.Drawing.Size(606, 81) Me.GroupBox3.Size = New System.Drawing.Size(570, 81)
Me.GroupBox3.TabIndex = 2 Me.GroupBox3.TabIndex = 2
Me.GroupBox3.TabStop = False Me.GroupBox3.TabStop = False
Me.GroupBox3.Text = "Auswahl Fenster/Prozess:" Me.GroupBox3.Text = "Auswahl Fenster/Prozess:"
' '
'btnStartStopProcess
'
Me.btnStartStopProcess.Image = Global.DD_Clipboard_Watcher.My.Resources.Resources.startwithoutdebugging_6556
Me.btnStartStopProcess.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
Me.btnStartStopProcess.Location = New System.Drawing.Point(6, 35)
Me.btnStartStopProcess.Name = "btnStartStopProcess"
Me.btnStartStopProcess.Size = New System.Drawing.Size(190, 23)
Me.btnStartStopProcess.TabIndex = 8
Me.btnStartStopProcess.Text = "Starte Aktive Fenster-Auswahl"
Me.btnStartStopProcess.TextAlign = System.Drawing.ContentAlignment.MiddleRight
Me.btnStartStopProcess.UseVisualStyleBackColor = True
'
'PictureBox1 'PictureBox1
' '
Me.PictureBox1.Image = Global.DD_Clipboard_Searcher.My.Resources.Resources.Annotation_New Me.PictureBox1.Image = Global.DD_Clipboard_Watcher.My.Resources.Resources.Annotation_New
Me.PictureBox1.Location = New System.Drawing.Point(510, 28) Me.PictureBox1.Location = New System.Drawing.Point(510, 28)
Me.PictureBox1.Name = "PictureBox1" Me.PictureBox1.Name = "PictureBox1"
Me.PictureBox1.Size = New System.Drawing.Size(48, 40) Me.PictureBox1.Size = New System.Drawing.Size(48, 40)
@ -793,16 +819,6 @@ Partial Class frmAdministration
Me.PictureBox1.TabStop = False Me.PictureBox1.TabStop = False
Me.PictureBox1.Visible = False Me.PictureBox1.Visible = False
' '
'chkRunwindowCheck
'
Me.chkRunwindowCheck.AutoSize = True
Me.chkRunwindowCheck.Location = New System.Drawing.Point(6, 39)
Me.chkRunwindowCheck.Name = "chkRunwindowCheck"
Me.chkRunwindowCheck.Size = New System.Drawing.Size(173, 17)
Me.chkRunwindowCheck.TabIndex = 6
Me.chkRunwindowCheck.Text = "Starte Aktive-Fenster Auswahl"
Me.chkRunwindowCheck.UseVisualStyleBackColor = True
'
'txtProcessName 'txtProcessName
' '
Me.txtProcessName.Font = New System.Drawing.Font("Tahoma", 8.25!, CType((System.Drawing.FontStyle.Bold Or System.Drawing.FontStyle.Italic), System.Drawing.FontStyle), System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.txtProcessName.Font = New System.Drawing.Font("Tahoma", 8.25!, CType((System.Drawing.FontStyle.Bold Or System.Drawing.FontStyle.Italic), System.Drawing.FontStyle), System.Drawing.GraphicsUnit.Point, CType(0, Byte))
@ -815,7 +831,7 @@ Partial Class frmAdministration
'txtPID 'txtPID
' '
Me.txtPID.Font = New System.Drawing.Font("Tahoma", 8.25!, CType((System.Drawing.FontStyle.Bold Or System.Drawing.FontStyle.Italic), System.Drawing.FontStyle), System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.txtPID.Font = New System.Drawing.Font("Tahoma", 8.25!, CType((System.Drawing.FontStyle.Bold Or System.Drawing.FontStyle.Italic), System.Drawing.FontStyle), System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.txtPID.Location = New System.Drawing.Point(192, 37) Me.txtPID.Location = New System.Drawing.Point(206, 37)
Me.txtPID.Name = "txtPID" Me.txtPID.Name = "txtPID"
Me.txtPID.ReadOnly = True Me.txtPID.ReadOnly = True
Me.txtPID.Size = New System.Drawing.Size(59, 21) Me.txtPID.Size = New System.Drawing.Size(59, 21)
@ -833,7 +849,7 @@ Partial Class frmAdministration
'Label3 'Label3
' '
Me.Label3.AutoSize = True Me.Label3.AutoSize = True
Me.Label3.Location = New System.Drawing.Point(192, 21) Me.Label3.Location = New System.Drawing.Point(206, 21)
Me.Label3.Name = "Label3" Me.Label3.Name = "Label3"
Me.Label3.Size = New System.Drawing.Size(59, 13) Me.Label3.Size = New System.Drawing.Size(59, 13)
Me.Label3.TabIndex = 0 Me.Label3.TabIndex = 0
@ -922,24 +938,11 @@ Partial Class frmAdministration
Me.GroupBox4.Controls.Add(Me.GridControl3) Me.GroupBox4.Controls.Add(Me.GridControl3)
Me.GroupBox4.Location = New System.Drawing.Point(12, 397) Me.GroupBox4.Location = New System.Drawing.Point(12, 397)
Me.GroupBox4.Name = "GroupBox4" Me.GroupBox4.Name = "GroupBox4"
Me.GroupBox4.Size = New System.Drawing.Size(606, 308) Me.GroupBox4.Size = New System.Drawing.Size(570, 308)
Me.GroupBox4.TabIndex = 21 Me.GroupBox4.TabIndex = 21
Me.GroupBox4.TabStop = False Me.GroupBox4.TabStop = False
Me.GroupBox4.Text = "Aktuell zugeordnete Prozesse:" Me.GroupBox4.Text = "Aktuell zugeordnete Prozesse:"
' '
'btnLinkProcessPRofile
'
Me.btnLinkProcessPRofile.Image = CType(resources.GetObject("btnLinkProcessPRofile.Image"), System.Drawing.Image)
Me.btnLinkProcessPRofile.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
Me.btnLinkProcessPRofile.ImeMode = System.Windows.Forms.ImeMode.NoControl
Me.btnLinkProcessPRofile.Location = New System.Drawing.Point(353, 20)
Me.btnLinkProcessPRofile.Name = "btnLinkProcessPRofile"
Me.btnLinkProcessPRofile.Size = New System.Drawing.Size(205, 28)
Me.btnLinkProcessPRofile.TabIndex = 60
Me.btnLinkProcessPRofile.Text = "Prozess und Profil verknüpfen"
Me.btnLinkProcessPRofile.TextAlign = System.Drawing.ContentAlignment.MiddleRight
Me.btnLinkProcessPRofile.UseVisualStyleBackColor = True
'
'btndeleteProcessProfileLink 'btndeleteProcessProfileLink
' '
Me.btndeleteProcessProfileLink.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles) Me.btndeleteProcessProfileLink.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
@ -954,11 +957,79 @@ Partial Class frmAdministration
Me.btndeleteProcessProfileLink.TextAlign = System.Drawing.ContentAlignment.MiddleRight Me.btndeleteProcessProfileLink.TextAlign = System.Drawing.ContentAlignment.MiddleRight
Me.btndeleteProcessProfileLink.UseVisualStyleBackColor = True Me.btndeleteProcessProfileLink.UseVisualStyleBackColor = True
' '
'btnLinkProcessPRofile
'
Me.btnLinkProcessPRofile.Image = CType(resources.GetObject("btnLinkProcessPRofile.Image"), System.Drawing.Image)
Me.btnLinkProcessPRofile.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
Me.btnLinkProcessPRofile.ImeMode = System.Windows.Forms.ImeMode.NoControl
Me.btnLinkProcessPRofile.Location = New System.Drawing.Point(353, 20)
Me.btnLinkProcessPRofile.Name = "btnLinkProcessPRofile"
Me.btnLinkProcessPRofile.Size = New System.Drawing.Size(205, 28)
Me.btnLinkProcessPRofile.TabIndex = 60
Me.btnLinkProcessPRofile.Text = "Prozess und Profil verknüpfen"
Me.btnLinkProcessPRofile.TextAlign = System.Drawing.ContentAlignment.MiddleRight
Me.btnLinkProcessPRofile.UseVisualStyleBackColor = True
'
'GroupBox5
'
Me.GroupBox5.Controls.Add(Me.lblLicenseDate)
Me.GroupBox5.Controls.Add(Me.lbllicenseCount)
Me.GroupBox5.Controls.Add(Me.Label6)
Me.GroupBox5.Controls.Add(Me.Label5)
Me.GroupBox5.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.GroupBox5.Location = New System.Drawing.Point(914, 310)
Me.GroupBox5.Name = "GroupBox5"
Me.GroupBox5.Size = New System.Drawing.Size(271, 71)
Me.GroupBox5.TabIndex = 22
Me.GroupBox5.TabStop = False
Me.GroupBox5.Text = "Lizenzübersicht"
'
'lblLicenseDate
'
Me.lblLicenseDate.AutoSize = True
Me.lblLicenseDate.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.lblLicenseDate.Location = New System.Drawing.Point(135, 45)
Me.lblLicenseDate.Name = "lblLicenseDate"
Me.lblLicenseDate.RightToLeft = System.Windows.Forms.RightToLeft.Yes
Me.lblLicenseDate.Size = New System.Drawing.Size(13, 13)
Me.lblLicenseDate.TabIndex = 7
Me.lblLicenseDate.Text = "0"
'
'lbllicenseCount
'
Me.lbllicenseCount.AutoSize = True
Me.lbllicenseCount.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.lbllicenseCount.Location = New System.Drawing.Point(135, 20)
Me.lbllicenseCount.Name = "lbllicenseCount"
Me.lbllicenseCount.RightToLeft = System.Windows.Forms.RightToLeft.Yes
Me.lbllicenseCount.Size = New System.Drawing.Size(13, 13)
Me.lbllicenseCount.TabIndex = 6
Me.lbllicenseCount.Text = "0"
'
'Label6
'
Me.Label6.AutoSize = True
Me.Label6.Location = New System.Drawing.Point(7, 45)
Me.Label6.Name = "Label6"
Me.Label6.Size = New System.Drawing.Size(65, 13)
Me.Label6.TabIndex = 1
Me.Label6.Text = "Gültigkeit:"
'
'Label5
'
Me.Label5.AutoSize = True
Me.Label5.Location = New System.Drawing.Point(7, 20)
Me.Label5.Name = "Label5"
Me.Label5.Size = New System.Drawing.Size(122, 13)
Me.Label5.TabIndex = 0
Me.Label5.Text = "Anzahl der Lizenzen:"
'
'frmAdministration 'frmAdministration
' '
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.ClientSize = New System.Drawing.Size(1240, 730) Me.ClientSize = New System.Drawing.Size(1240, 730)
Me.Controls.Add(Me.GroupBox5)
Me.Controls.Add(Me.GroupBox4) Me.Controls.Add(Me.GroupBox4)
Me.Controls.Add(Me.GroupBox3) Me.Controls.Add(Me.GroupBox3)
Me.Controls.Add(Me.GroupBox2) Me.Controls.Add(Me.GroupBox2)
@ -995,16 +1066,18 @@ Partial Class frmAdministration
CType(Me.GridControl3, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.GridControl3, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.GridViewProcessProfile, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.GridViewProcessProfile, System.ComponentModel.ISupportInitialize).EndInit()
Me.GroupBox4.ResumeLayout(False) Me.GroupBox4.ResumeLayout(False)
Me.GroupBox5.ResumeLayout(False)
Me.GroupBox5.PerformLayout()
Me.ResumeLayout(False) Me.ResumeLayout(False)
Me.PerformLayout() Me.PerformLayout()
End Sub End Sub
Friend WithEvents GroupBox2 As System.Windows.Forms.GroupBox Friend WithEvents GroupBox2 As System.Windows.Forms.GroupBox
Friend WithEvents GroupBox1 As System.Windows.Forms.GroupBox Friend WithEvents GroupBox1 As System.Windows.Forms.GroupBox
Friend WithEvents MyDataset As DD_Clipboard_Searcher.MyDataset Friend WithEvents MyDataset As DD_Clipboard_Watcher.MyDataset
Friend WithEvents TBCBS_PROFILESBindingSource As System.Windows.Forms.BindingSource Friend WithEvents TBCBS_PROFILESBindingSource As System.Windows.Forms.BindingSource
Friend WithEvents TBCBS_PROFILESTableAdapter As DD_Clipboard_Searcher.MyDatasetTableAdapters.TBCBS_PROFILESTableAdapter Friend WithEvents TBCBS_PROFILESTableAdapter As DD_Clipboard_Watcher.MyDatasetTableAdapters.TBCBS_PROFILESTableAdapter
Friend WithEvents TableAdapterManager As DD_Clipboard_Searcher.MyDatasetTableAdapters.TableAdapterManager Friend WithEvents TableAdapterManager As DD_Clipboard_Watcher.MyDatasetTableAdapters.TableAdapterManager
Friend WithEvents TBCBS_PROFILESBindingNavigator As System.Windows.Forms.BindingNavigator Friend WithEvents TBCBS_PROFILESBindingNavigator As System.Windows.Forms.BindingNavigator
Friend WithEvents BindingNavigatorAddNewItem As System.Windows.Forms.ToolStripButton Friend WithEvents BindingNavigatorAddNewItem As System.Windows.Forms.ToolStripButton
Friend WithEvents BindingNavigatorCountItem As System.Windows.Forms.ToolStripLabel Friend WithEvents BindingNavigatorCountItem As System.Windows.Forms.ToolStripLabel
@ -1038,7 +1111,7 @@ Partial Class frmAdministration
Friend WithEvents GridControl2 As DevExpress.XtraGrid.GridControl Friend WithEvents GridControl2 As DevExpress.XtraGrid.GridControl
Friend WithEvents GridViewProfileUser As DevExpress.XtraGrid.Views.Grid.GridView Friend WithEvents GridViewProfileUser As DevExpress.XtraGrid.Views.Grid.GridView
Friend WithEvents VWUSER_PROFILEBindingSource As System.Windows.Forms.BindingSource Friend WithEvents VWUSER_PROFILEBindingSource As System.Windows.Forms.BindingSource
Friend WithEvents VWUSER_PROFILETableAdapter As DD_Clipboard_Searcher.MyDatasetTableAdapters.VWUSER_PROFILETableAdapter Friend WithEvents VWUSER_PROFILETableAdapter As DD_Clipboard_Watcher.MyDatasetTableAdapters.VWUSER_PROFILETableAdapter
Friend WithEvents Label1 As System.Windows.Forms.Label Friend WithEvents Label1 As System.Windows.Forms.Label
Friend WithEvents colGUID1 As DevExpress.XtraGrid.Columns.GridColumn Friend WithEvents colGUID1 As DevExpress.XtraGrid.Columns.GridColumn
Friend WithEvents colUSERNAME As DevExpress.XtraGrid.Columns.GridColumn Friend WithEvents colUSERNAME As DevExpress.XtraGrid.Columns.GridColumn
@ -1059,12 +1132,11 @@ Partial Class frmAdministration
Friend WithEvents txtPID As System.Windows.Forms.TextBox Friend WithEvents txtPID As System.Windows.Forms.TextBox
Friend WithEvents Label4 As System.Windows.Forms.Label Friend WithEvents Label4 As System.Windows.Forms.Label
Friend WithEvents Label3 As System.Windows.Forms.Label Friend WithEvents Label3 As System.Windows.Forms.Label
Friend WithEvents chkRunwindowCheck As System.Windows.Forms.CheckBox
Friend WithEvents TimerTest As System.Windows.Forms.Timer Friend WithEvents TimerTest As System.Windows.Forms.Timer
Friend WithEvents PictureBox1 As System.Windows.Forms.PictureBox Friend WithEvents PictureBox1 As System.Windows.Forms.PictureBox
Friend WithEvents TBWH_UserBindingSource As System.Windows.Forms.BindingSource Friend WithEvents TBWH_UserBindingSource As System.Windows.Forms.BindingSource
Friend WithEvents TBCBS_PROFILE_PROCESSBindingSource As System.Windows.Forms.BindingSource Friend WithEvents TBCBS_PROFILE_PROCESSBindingSource As System.Windows.Forms.BindingSource
Friend WithEvents TBCBS_PROFILE_PROCESSTableAdapter As DD_Clipboard_Searcher.MyDatasetTableAdapters.TBCBS_PROFILE_PROCESSTableAdapter Friend WithEvents TBCBS_PROFILE_PROCESSTableAdapter As DD_Clipboard_Watcher.MyDatasetTableAdapters.TBCBS_PROFILE_PROCESSTableAdapter
Friend WithEvents GridControl3 As DevExpress.XtraGrid.GridControl Friend WithEvents GridControl3 As DevExpress.XtraGrid.GridControl
Friend WithEvents GridViewProcessProfile As DevExpress.XtraGrid.Views.Grid.GridView Friend WithEvents GridViewProcessProfile As DevExpress.XtraGrid.Views.Grid.GridView
Friend WithEvents colGUID2 As DevExpress.XtraGrid.Columns.GridColumn Friend WithEvents colGUID2 As DevExpress.XtraGrid.Columns.GridColumn
@ -1074,4 +1146,11 @@ Partial Class frmAdministration
Friend WithEvents GroupBox4 As System.Windows.Forms.GroupBox Friend WithEvents GroupBox4 As System.Windows.Forms.GroupBox
Friend WithEvents btnLinkProcessPRofile As System.Windows.Forms.Button Friend WithEvents btnLinkProcessPRofile As System.Windows.Forms.Button
Friend WithEvents btndeleteProcessProfileLink As System.Windows.Forms.Button Friend WithEvents btndeleteProcessProfileLink As System.Windows.Forms.Button
Friend WithEvents btnStartStopProcess As Button
Friend WithEvents BackgroundWorker1 As System.ComponentModel.BackgroundWorker
Friend WithEvents GroupBox5 As GroupBox
Friend WithEvents lblLicenseDate As Label
Friend WithEvents lbllicenseCount As Label
Friend WithEvents Label6 As Label
Friend WithEvents Label5 As Label
End Class End Class

View File

@ -321,6 +321,9 @@
D6j0I59LJxNQMSLqx2LdPwrM0UyYo5kwR/OA5RDpc3VgpHUOZwAAAABJRU5ErkJggg== D6j0I59LJxNQMSLqx2LdPwrM0UyYo5kwR/OA5RDpc3VgpHUOZwAAAABJRU5ErkJggg==
</value> </value>
</data> </data>
<metadata name="BackgroundWorker1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 95</value>
</metadata>
<data name="$this.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64"> <data name="$this.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value> <value>
AAABAAMAEBAQAAEABAAoAQAANgAAABAQAAABAAgAaAUAAF4BAAAQEAAAAQAgAGgEAADGBgAAKAAAABAA AAABAAMAEBAQAAEABAAoAQAANgAAABAQAAABAAgAaAUAAF4BAAAQEAAAAQAgAGgEAADGBgAAKAAAABAA

View File

@ -32,6 +32,13 @@ Public Class frmAdministration
End Sub End Sub
Private Sub frmAdministration_Load(sender As Object, e As EventArgs) Handles MyBase.Load Private Sub frmAdministration_Load(sender As Object, e As EventArgs) Handles MyBase.Load
Load_Profiles() Load_Profiles()
lbllicenseCount.Text = LICENSE_COUNT
If LICENSE_DATE.ToString.Contains("2099") Then
lblLicenseDate.Text = "Unlimited"
Else
lblLicenseDate.Text = LICENSE_DATE
End If
End Sub End Sub
Sub Status_Changed(text As String, col As System.Drawing.Color) Sub Status_Changed(text As String, col As System.Drawing.Color)
statuslabel.Text = text statuslabel.Text = text
@ -147,25 +154,13 @@ Public Class frmAdministration
End Try End Try
End Sub End Sub
Private Sub chkRunwindowCheck_CheckedChanged(sender As Object, e As EventArgs) Handles chkRunwindowCheck.CheckedChanged Private Sub chkRunwindowCheck_CheckedChanged(sender As Object, e As EventArgs)
If chkRunwindowCheck.Checked Then
Me.Cursor = Cursors.WaitCursor
txtPID.Text = ""
txtProcessName.Text = ""
TimerTest.Start()
chkRunwindowCheck.Text = "Stoppe Auswertung"
Status_Changed("Auswertung von aktivem Fenster läuft! Alle 5 Sekunden Prüfung! - Wechseln Sie durch die aktiven Anwendungen!", Color.Orange)
Else
Me.Cursor = Cursors.Default
TimerTest.Stop()
chkRunwindowCheck.Text = "Starte Aktive-Fenster Auswahl"
Status_Changed("", Color.Transparent)
End If
End Sub End Sub
Private Sub TimerTest_Tick(sender As Object, e As EventArgs) Handles TimerTest.Tick Private Sub TimerTest_Tick(sender As Object, e As EventArgs) Handles TimerTest.Tick
clsWINDOWSApi.Get_ForegroundWindow_Info() clsWINDOWSApi.Get_ForegroundWindow_Info()
If PID <> PROC_PID And PROC_Name <> "DD_Clipboard_Searcher" Then If PID <> PROC_PID And PROC_Name <> "DD_Clipboard_Watcher" Then
PictureBox1.Visible = True PictureBox1.Visible = True
PID = PROC_PID PID = PROC_PID
txtPID.Text = PROC_PID txtPID.Text = PROC_PID
@ -223,4 +218,20 @@ Public Class frmAdministration
MsgBox("Unexpected Error in deleting ProfileProcess-Relation: " & vbNewLine & ex.Message, MsgBoxStyle.Critical) MsgBox("Unexpected Error in deleting ProfileProcess-Relation: " & vbNewLine & ex.Message, MsgBoxStyle.Critical)
End Try End Try
End Sub End Sub
Private Sub btnStartStopProcess_Click(sender As Object, e As EventArgs) Handles btnStartStopProcess.Click
If btnStartStopProcess.Text = "Starte Aktive Fenster-Auswahl" Then
Me.Cursor = Cursors.WaitCursor
txtPID.Text = ""
txtProcessName.Text = ""
TimerTest.Start()
btnStartStopProcess.Text = "Stoppe Auswertung Fenster"
Status_Changed("Auswertung von aktivem Fenster läuft! Alle 5 Sekunden Prüfung! - Wechseln Sie durch die aktiven Anwendungen!", Color.Orange)
Else
Me.Cursor = Cursors.Default
TimerTest.Stop()
btnStartStopProcess.Text = "Starte Aktive Fenster-Auswahl"
Status_Changed("", Color.Transparent)
End If
End Sub
End Class End Class

View File

@ -43,6 +43,12 @@ Partial Class frmConfig_Basic
Me.Button1 = New System.Windows.Forms.Button() Me.Button1 = New System.Windows.Forms.Button()
Me.btnApplicationFolder = New System.Windows.Forms.Button() Me.btnApplicationFolder = New System.Windows.Forms.Button()
Me.LinkLabel1 = New System.Windows.Forms.LinkLabel() Me.LinkLabel1 = New System.Windows.Forms.LinkLabel()
Me.cmbfunctionHit = New System.Windows.Forms.ComboBox()
Me.Label6 = New System.Windows.Forms.Label()
Me.Label7 = New System.Windows.Forms.Label()
Me.txtHotkeySearchKey = New System.Windows.Forms.TextBox()
Me.btnChangeHotkey = New System.Windows.Forms.Button()
Me.lblChanges = New System.Windows.Forms.Label()
Me.TabControl1.SuspendLayout() Me.TabControl1.SuspendLayout()
Me.TabPage1.SuspendLayout() Me.TabPage1.SuspendLayout()
Me.TabPage2.SuspendLayout() Me.TabPage2.SuspendLayout()
@ -201,6 +207,12 @@ Partial Class frmConfig_Basic
' '
'TabPage2 'TabPage2
' '
Me.TabPage2.Controls.Add(Me.lblChanges)
Me.TabPage2.Controls.Add(Me.btnChangeHotkey)
Me.TabPage2.Controls.Add(Me.txtHotkeySearchKey)
Me.TabPage2.Controls.Add(Me.Label7)
Me.TabPage2.Controls.Add(Me.Label6)
Me.TabPage2.Controls.Add(Me.cmbfunctionHit)
Me.TabPage2.Controls.Add(Me.chkWDMaximized) Me.TabPage2.Controls.Add(Me.chkWDMaximized)
Me.TabPage2.Controls.Add(Me.chkLogErrorsOnly) Me.TabPage2.Controls.Add(Me.chkLogErrorsOnly)
Me.TabPage2.Controls.Add(Me.Button1) Me.TabPage2.Controls.Add(Me.Button1)
@ -238,7 +250,7 @@ Partial Class frmConfig_Basic
' '
'Button1 'Button1
' '
Me.Button1.Image = Global.DD_Clipboard_Searcher.My.Resources.Resources.folder_Open_16xLG Me.Button1.Image = Global.DD_Clipboard_Watcher.My.Resources.Resources.folder_Open_16xLG
Me.Button1.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft Me.Button1.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
Me.Button1.ImeMode = System.Windows.Forms.ImeMode.NoControl Me.Button1.ImeMode = System.Windows.Forms.ImeMode.NoControl
Me.Button1.Location = New System.Drawing.Point(462, 71) Me.Button1.Location = New System.Drawing.Point(462, 71)
@ -251,7 +263,7 @@ Partial Class frmConfig_Basic
' '
'btnApplicationFolder 'btnApplicationFolder
' '
Me.btnApplicationFolder.Image = Global.DD_Clipboard_Searcher.My.Resources.Resources.folder_Open_16xLG Me.btnApplicationFolder.Image = Global.DD_Clipboard_Watcher.My.Resources.Resources.folder_Open_16xLG
Me.btnApplicationFolder.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft Me.btnApplicationFolder.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
Me.btnApplicationFolder.ImeMode = System.Windows.Forms.ImeMode.NoControl Me.btnApplicationFolder.ImeMode = System.Windows.Forms.ImeMode.NoControl
Me.btnApplicationFolder.Location = New System.Drawing.Point(462, 45) Me.btnApplicationFolder.Location = New System.Drawing.Point(462, 45)
@ -269,11 +281,66 @@ Partial Class frmConfig_Basic
Me.LinkLabel1.ImeMode = System.Windows.Forms.ImeMode.NoControl Me.LinkLabel1.ImeMode = System.Windows.Forms.ImeMode.NoControl
Me.LinkLabel1.Location = New System.Drawing.Point(459, 16) Me.LinkLabel1.Location = New System.Drawing.Point(459, 16)
Me.LinkLabel1.Name = "LinkLabel1" Me.LinkLabel1.Name = "LinkLabel1"
Me.LinkLabel1.Size = New System.Drawing.Size(201, 17) Me.LinkLabel1.Size = New System.Drawing.Size(200, 17)
Me.LinkLabel1.TabIndex = 1 Me.LinkLabel1.TabIndex = 1
Me.LinkLabel1.TabStop = True Me.LinkLabel1.TabStop = True
Me.LinkLabel1.Text = "Link zu Support-Tool Digital Data" Me.LinkLabel1.Text = "Link zu Support-Tool Digital Data"
' '
'cmbfunctionHit
'
Me.cmbfunctionHit.FormattingEnabled = True
Me.cmbfunctionHit.Items.AddRange(New Object() {"strg", "SHIFT"})
Me.cmbfunctionHit.Location = New System.Drawing.Point(11, 91)
Me.cmbfunctionHit.Name = "cmbfunctionHit"
Me.cmbfunctionHit.Size = New System.Drawing.Size(79, 21)
Me.cmbfunctionHit.TabIndex = 9
'
'Label6
'
Me.Label6.AutoSize = True
Me.Label6.Location = New System.Drawing.Point(8, 75)
Me.Label6.Name = "Label6"
Me.Label6.Size = New System.Drawing.Size(82, 13)
Me.Label6.TabIndex = 10
Me.Label6.Text = "Funktionstaste:"
'
'Label7
'
Me.Label7.AutoSize = True
Me.Label7.Location = New System.Drawing.Point(102, 75)
Me.Label7.Name = "Label7"
Me.Label7.Size = New System.Drawing.Size(68, 13)
Me.Label7.TabIndex = 11
Me.Label7.Text = "Zifferntaste:"
'
'txtHotkeySearchKey
'
Me.txtHotkeySearchKey.Location = New System.Drawing.Point(105, 91)
Me.txtHotkeySearchKey.Name = "txtHotkeySearchKey"
Me.txtHotkeySearchKey.Size = New System.Drawing.Size(65, 21)
Me.txtHotkeySearchKey.TabIndex = 12
Me.txtHotkeySearchKey.Text = "f"
'
'btnChangeHotkey
'
Me.btnChangeHotkey.Location = New System.Drawing.Point(185, 89)
Me.btnChangeHotkey.Name = "btnChangeHotkey"
Me.btnChangeHotkey.Size = New System.Drawing.Size(121, 23)
Me.btnChangeHotkey.TabIndex = 13
Me.btnChangeHotkey.Text = "Ändere Hotkey"
Me.btnChangeHotkey.UseVisualStyleBackColor = True
'
'lblChanges
'
Me.lblChanges.AutoSize = True
Me.lblChanges.BackColor = System.Drawing.Color.Yellow
Me.lblChanges.Location = New System.Drawing.Point(8, 115)
Me.lblChanges.Name = "lblChanges"
Me.lblChanges.Size = New System.Drawing.Size(38, 13)
Me.lblChanges.TabIndex = 14
Me.lblChanges.Text = "Label8"
Me.lblChanges.Visible = False
'
'frmConfig_Basic 'frmConfig_Basic
' '
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
@ -316,4 +383,10 @@ Partial Class frmConfig_Basic
Friend WithEvents Button1 As System.Windows.Forms.Button Friend WithEvents Button1 As System.Windows.Forms.Button
Friend WithEvents btnApplicationFolder As System.Windows.Forms.Button Friend WithEvents btnApplicationFolder As System.Windows.Forms.Button
Friend WithEvents LinkLabel1 As System.Windows.Forms.LinkLabel Friend WithEvents LinkLabel1 As System.Windows.Forms.LinkLabel
Friend WithEvents Label6 As Label
Friend WithEvents cmbfunctionHit As ComboBox
Friend WithEvents txtHotkeySearchKey As TextBox
Friend WithEvents Label7 As Label
Friend WithEvents btnChangeHotkey As Button
Friend WithEvents lblChanges As Label
End Class End Class

View File

@ -2,6 +2,7 @@
Imports System.Globalization Imports System.Globalization
Imports DD_LIB_Standards Imports DD_LIB_Standards
Public Class frmConfig_Basic Public Class frmConfig_Basic
Dim WithEvents Hotkey As New clsHotkey(Me)
Dim formloaded As Boolean = False Dim formloaded As Boolean = False
Private Sub BtnConnect_Click(sender As Object, e As EventArgs) Handles BtnConnect.Click Private Sub BtnConnect_Click(sender As Object, e As EventArgs) Handles BtnConnect.Click
Try Try
@ -101,6 +102,7 @@ Public Class frmConfig_Basic
End Sub End Sub
Private Sub frmConfig_Basic_Load(sender As Object, e As EventArgs) Handles MyBase.Load Private Sub frmConfig_Basic_Load(sender As Object, e As EventArgs) Handles MyBase.Load
lblChanges.Visible = False
If Not MyConnectionString = String.Empty Then If Not MyConnectionString = String.Empty Then
CONNECTION_CHANGED = False CONNECTION_CHANGED = False
Try Try
@ -166,6 +168,12 @@ Public Class frmConfig_Basic
Private Sub TabControl1_SelectedIndexChanged(sender As Object, e As EventArgs) Handles TabControl1.SelectedIndexChanged Private Sub TabControl1_SelectedIndexChanged(sender As Object, e As EventArgs) Handles TabControl1.SelectedIndexChanged
Select Case TabControl1.SelectedIndex Select Case TabControl1.SelectedIndex
Case 1 Case 1
Try
cmbfunctionHit.SelectedIndex = cmbfunctionHit.FindStringExact(HotkeyFunctionKey)
txtHotkeySearchKey.Text = HotkeySearchKey
Catch ex As Exception
End Try
@ -196,4 +204,35 @@ Public Class frmConfig_Basic
Private Sub txtPasswort_TextChanged(sender As Object, e As EventArgs) Handles txtPasswort.TextChanged Private Sub txtPasswort_TextChanged(sender As Object, e As EventArgs) Handles txtPasswort.TextChanged
End Sub End Sub
Private Sub btnChangeHotkey_Click(sender As Object, e As EventArgs) Handles btnChangeHotkey.Click
Try
If cmbfunctionHit.SelectedIndex <> -1 Then
Hotkey.RemoveHotKey(354523017)
SaveConfigValue("HotkeyFunctionKey", cmbfunctionHit.Text)
SaveConfigValue("HotkeySearchKey", txtHotkeySearchKey.Text)
Dim keyCode As Keys
Dim kc As New KeysConverter
Dim obj As Object = kc.ConvertFromString(txtHotkeySearchKey.Text.ToUpper)
keyCode = CType(obj, Keys)
If cmbfunctionHit.Text = "strg" Then
Hotkey.AddHotKey(keyCode, clsHotkey.MODKEY.MOD_CONTROL, 354523017)
ElseIf cmbfunctionHit.Text = "SHIFT" Then
Hotkey.AddHotKey(keyCode, clsHotkey.MODKEY.MOD_SHIFT, 354523017)
End If
lblChanges.Text = "Hotkey changed - " & Now.ToString & " - Restart required"
lblChanges.Visible = True
Dim msg = "Die Änderung des Hotkeys war erfolgreich." & vbNewLine & "Da es sich um einen global Hotkey handelt muss die Anwendung aber neugestartet werden!"
If USER_LANGUAGE <> "de-DE" Then
msg = "The change of your desired hotkey was successfull." & vbNewLine & "For using it the application must be restarted now!"
End If
MsgBox(msg, MsgBoxStyle.Information)
Cursor = Cursors.WaitCursor
Application.Restart()
End If
Catch ex As Exception
MsgBox(ex.Message, MsgBoxStyle.Critical, "Unexpected Error in ChangeHotkey:")
End Try
End Sub
End Class End Class

View File

@ -118,7 +118,7 @@ Partial Class frmLicense
'btnnewLicenses 'btnnewLicenses
' '
Me.btnnewLicenses.Font = New System.Drawing.Font("Tahoma", 9.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.btnnewLicenses.Font = New System.Drawing.Font("Tahoma", 9.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.btnnewLicenses.Image = Global.DD_Clipboard_Searcher.My.Resources.Resources.KeyDown_8461 Me.btnnewLicenses.Image = Global.DD_Clipboard_Watcher.My.Resources.Resources.KeyDown_8461
Me.btnnewLicenses.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft Me.btnnewLicenses.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
Me.btnnewLicenses.ImeMode = System.Windows.Forms.ImeMode.NoControl Me.btnnewLicenses.ImeMode = System.Windows.Forms.ImeMode.NoControl
Me.btnnewLicenses.Location = New System.Drawing.Point(307, 91) Me.btnnewLicenses.Location = New System.Drawing.Point(307, 91)
@ -151,7 +151,7 @@ Partial Class frmLicense
' '
'btnPW_check 'btnPW_check
' '
Me.btnPW_check.Image = Global.DD_Clipboard_Searcher.My.Resources.Resources.KeyDown_8461 Me.btnPW_check.Image = Global.DD_Clipboard_Watcher.My.Resources.Resources.KeyDown_8461
Me.btnPW_check.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft Me.btnPW_check.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
Me.btnPW_check.ImeMode = System.Windows.Forms.ImeMode.NoControl Me.btnPW_check.ImeMode = System.Windows.Forms.ImeMode.NoControl
Me.btnPW_check.Location = New System.Drawing.Point(322, 1) Me.btnPW_check.Location = New System.Drawing.Point(322, 1)

View File

@ -35,9 +35,13 @@ Partial Class frmMain
Me.btnAdminConfig = New System.Windows.Forms.Button() Me.btnAdminConfig = New System.Windows.Forms.Button()
Me.btnUserConfig = New System.Windows.Forms.Button() Me.btnUserConfig = New System.Windows.Forms.Button()
Me.Label1 = New System.Windows.Forms.Label() Me.Label1 = New System.Windows.Forms.Label()
Me.Label3 = New System.Windows.Forms.Label()
Me.lbHKFunction = New System.Windows.Forms.Label()
Me.GroupBox1 = New System.Windows.Forms.GroupBox()
Me.cmstrpNotifyIcon.SuspendLayout() Me.cmstrpNotifyIcon.SuspendLayout()
Me.StatusStrip1.SuspendLayout() Me.StatusStrip1.SuspendLayout()
Me.ContextMenuStripForm.SuspendLayout() Me.ContextMenuStripForm.SuspendLayout()
Me.GroupBox1.SuspendLayout()
Me.SuspendLayout() Me.SuspendLayout()
' '
'NotifyIconMain 'NotifyIconMain
@ -58,7 +62,7 @@ Partial Class frmMain
' '
'tsmiChangeState 'tsmiChangeState
' '
Me.tsmiChangeState.Image = Global.DD_Clipboard_Searcher.My.Resources.Resources.StatusAnnotations_Stop_16xLG Me.tsmiChangeState.Image = Global.DD_Clipboard_Watcher.My.Resources.Resources.StatusAnnotations_Stop_16xLG
Me.tsmiChangeState.Name = "tsmiChangeState" Me.tsmiChangeState.Name = "tsmiChangeState"
Me.tsmiChangeState.Size = New System.Drawing.Size(249, 22) Me.tsmiChangeState.Size = New System.Drawing.Size(249, 22)
Me.tsmiChangeState.Tag = "stop" Me.tsmiChangeState.Tag = "stop"
@ -67,9 +71,10 @@ Partial Class frmMain
'StatusStrip1 'StatusStrip1
' '
Me.StatusStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.tslblUser}) Me.StatusStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.tslblUser})
Me.StatusStrip1.Location = New System.Drawing.Point(0, 88) Me.StatusStrip1.Location = New System.Drawing.Point(0, 111)
Me.StatusStrip1.Name = "StatusStrip1" Me.StatusStrip1.Name = "StatusStrip1"
Me.StatusStrip1.Size = New System.Drawing.Size(338, 22) Me.StatusStrip1.Size = New System.Drawing.Size(328, 22)
Me.StatusStrip1.SizingGrip = False
Me.StatusStrip1.TabIndex = 3 Me.StatusStrip1.TabIndex = 3
Me.StatusStrip1.Text = "StatusStrip1" Me.StatusStrip1.Text = "StatusStrip1"
' '
@ -91,7 +96,7 @@ Partial Class frmMain
' '
'MinimierenToolStripMenuItem 'MinimierenToolStripMenuItem
' '
Me.MinimierenToolStripMenuItem.Image = Global.DD_Clipboard_Searcher.My.Resources.Resources.ReduceSize Me.MinimierenToolStripMenuItem.Image = Global.DD_Clipboard_Watcher.My.Resources.Resources.ReduceSize
Me.MinimierenToolStripMenuItem.Name = "MinimierenToolStripMenuItem" Me.MinimierenToolStripMenuItem.Name = "MinimierenToolStripMenuItem"
Me.MinimierenToolStripMenuItem.Size = New System.Drawing.Size(135, 22) Me.MinimierenToolStripMenuItem.Size = New System.Drawing.Size(135, 22)
Me.MinimierenToolStripMenuItem.Text = "Minimieren" Me.MinimierenToolStripMenuItem.Text = "Minimieren"
@ -127,17 +132,50 @@ Partial Class frmMain
Me.Label1.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Italic, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.Label1.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Italic, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label1.Location = New System.Drawing.Point(12, 44) Me.Label1.Location = New System.Drawing.Point(12, 44)
Me.Label1.Name = "Label1" Me.Label1.Name = "Label1"
Me.Label1.Size = New System.Drawing.Size(253, 26) Me.Label1.Size = New System.Drawing.Size(281, 26)
Me.Label1.TabIndex = 7 Me.Label1.TabIndex = 7
Me.Label1.Text = "Inaktivieren des Watchers über Rechtsklick Systray" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "oder Tastaturkombination Strg" & Me.Label1.Text = "Inaktivieren des Watchers über Rechtsklick Systray oder " & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "Tastaturkombination Str" &
" + T" "g + T"
'
'Label3
'
Me.Label3.AutoSize = True
Me.Label3.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Italic, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label3.Location = New System.Drawing.Point(6, 17)
Me.Label3.Name = "Label3"
Me.Label3.Size = New System.Drawing.Size(145, 13)
Me.Label3.TabIndex = 9
Me.Label3.Text = "Zwischenablage gefolgt von:"
'
'lbHKFunction
'
Me.lbHKFunction.AutoSize = True
Me.lbHKFunction.Font = New System.Drawing.Font("Tahoma", 8.25!, CType((System.Drawing.FontStyle.Bold Or System.Drawing.FontStyle.Italic), System.Drawing.FontStyle), System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.lbHKFunction.Location = New System.Drawing.Point(154, 17)
Me.lbHKFunction.Name = "lbHKFunction"
Me.lbHKFunction.Size = New System.Drawing.Size(30, 13)
Me.lbHKFunction.TabIndex = 10
Me.lbHKFunction.Text = "strg"
'
'GroupBox1
'
Me.GroupBox1.Controls.Add(Me.Label3)
Me.GroupBox1.Controls.Add(Me.lbHKFunction)
Me.GroupBox1.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.GroupBox1.Location = New System.Drawing.Point(12, 73)
Me.GroupBox1.Name = "GroupBox1"
Me.GroupBox1.Size = New System.Drawing.Size(308, 32)
Me.GroupBox1.TabIndex = 11
Me.GroupBox1.TabStop = False
Me.GroupBox1.Text = "Aktueller GlobalHook:"
' '
'frmMain 'frmMain
' '
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.ClientSize = New System.Drawing.Size(338, 110) Me.ClientSize = New System.Drawing.Size(328, 133)
Me.ContextMenuStrip = Me.ContextMenuStripForm Me.ContextMenuStrip = Me.ContextMenuStripForm
Me.Controls.Add(Me.GroupBox1)
Me.Controls.Add(Me.Label1) Me.Controls.Add(Me.Label1)
Me.Controls.Add(Me.btnAdminConfig) Me.Controls.Add(Me.btnAdminConfig)
Me.Controls.Add(Me.StatusStrip1) Me.Controls.Add(Me.StatusStrip1)
@ -154,6 +192,8 @@ Partial Class frmMain
Me.StatusStrip1.ResumeLayout(False) Me.StatusStrip1.ResumeLayout(False)
Me.StatusStrip1.PerformLayout() Me.StatusStrip1.PerformLayout()
Me.ContextMenuStripForm.ResumeLayout(False) Me.ContextMenuStripForm.ResumeLayout(False)
Me.GroupBox1.ResumeLayout(False)
Me.GroupBox1.PerformLayout()
Me.ResumeLayout(False) Me.ResumeLayout(False)
Me.PerformLayout() Me.PerformLayout()
@ -169,5 +209,7 @@ Partial Class frmMain
Friend WithEvents ContextMenuStripForm As System.Windows.Forms.ContextMenuStrip Friend WithEvents ContextMenuStripForm As System.Windows.Forms.ContextMenuStrip
Friend WithEvents MinimierenToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem Friend WithEvents MinimierenToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem
Friend WithEvents Label1 As System.Windows.Forms.Label Friend WithEvents Label1 As System.Windows.Forms.Label
Friend WithEvents Label3 As Label
Friend WithEvents lbHKFunction As Label
Friend WithEvents GroupBox1 As GroupBox
End Class End Class

View File

@ -10,11 +10,16 @@ Public Class frmMain
_Watcher.Dispose() _Watcher.Dispose()
End Sub End Sub
Private Sub _Watcher_Changed(ByVal sender As Object, _ Private Sub _Watcher_Changed(ByVal sender As Object,
ByVal e As EventArgs) Handles _Watcher.Changed ByVal e As EventArgs) Handles _Watcher.Changed
If DT_USER_PROFILES Is Nothing Then
Exit Sub
End If
If DT_USER_PROFILES.Rows.Count = 0 Then If DT_USER_PROFILES.Rows.Count = 0 Then
Exit Sub Exit Sub
End If End If
CURR_MATCH_RESULT = Nothing
CURR_MATCH_WM_SEARCH = Nothing
If MONITORING_ACTIVE = False Then If MONITORING_ACTIVE = False Then
NotifyIconMain.ShowBalloonTip(20000, "Clipboard Watcher", "Clipboard-watcher is inactive.", ToolTipIcon.Info) NotifyIconMain.ShowBalloonTip(20000, "Clipboard Watcher", "Clipboard-watcher is inactive.", ToolTipIcon.Info)
Exit Sub Exit Sub
@ -44,7 +49,8 @@ Public Class frmMain
' If match.Groups(0).Value <> CURR_MATCH_RESULT Then ' If match.Groups(0).Value <> CURR_MATCH_RESULT Then
CURR_MATCH_RESULT = match.Groups(0).Value CURR_MATCH_RESULT = match.Groups(0).Value
If Not IsNothing(CURR_MATCH_RESULT) Then If Not IsNothing(CURR_MATCH_RESULT) Then
clsSearch.RUN_WD_SEARCH(row.Item("WD_SEARCH")) CURR_MATCH_WM_SEARCH = row.Item("WD_SEARCH")
found = True found = True
End If End If
'Else 'Else
@ -92,9 +98,9 @@ Public Class frmMain
Exit Sub Exit Sub
End If End If
Try Try
Dim sql = String.Format("UPDATE TBDD_USER SET LOGGED_IN = 0, LOGGED_WHERE = '{0}' WHERE (LOWER(USERNAME) = LOWER('{1}'))", "", USER_USERNAME) 'Dim sql = String.Format("UPDATE TBDD_USER SET LOGGED_IN = 0, LOGGED_WHERE = '{0}' WHERE (LOWER(USERNAME) = LOWER('{1}'))", "", USER_USERNAME)
clsDatabase.Execute_non_Query(sql, True) 'clsDatabase.Execute_non_Query(sql, True)
sql = "DELETE FROM TBDD_USER_MODULE_LOG_IN WHERE USER_ID = " & USER_GUID & " AND MODULE = 'Clipboard-Searcher'" Dim sql = "DELETE FROM TBDD_USER_MODULE_LOG_IN WHERE USER_ID = " & USER_GUID & " AND UPPER(MODULE) = UPPER('Clipboard-Searcher')"
clsDatabase.Execute_non_Query(sql, True) clsDatabase.Execute_non_Query(sql, True)
ClassWindowLocation.SaveFormLocationSize(Me, "") ClassWindowLocation.SaveFormLocationSize(Me, "")
My.Settings.Save() My.Settings.Save()
@ -107,6 +113,12 @@ Public Class frmMain
Catch ex As Exception Catch ex As Exception
End Try End Try
Try
Hotkey.RemoveHotKey(354523017)
Catch ex As Exception
End Try
'TempDateien löschen 'TempDateien löschen
Try Try
For Each _file In TEMP_FILES For Each _file In TEMP_FILES
@ -126,11 +138,29 @@ Public Class frmMain
Me.NotifyIconMain.Visible = True Me.NotifyIconMain.Visible = True
clsHotkey.Refresh_Profile_Links() clsHotkey.Refresh_Profile_Links()
Hotkey.AddHotKey(Keys.T, clsHotkey.MODKEY.MOD_CONTROL, 354522017) Hotkey.AddHotKey(Keys.T, clsHotkey.MODKEY.MOD_CONTROL, 354522017)
Dim keyCode As Keys
Dim kc As New KeysConverter
Dim obj As Object = kc.ConvertFromString(HotkeySearchKey.ToUpper)
keyCode = CType(obj, Keys)
If HotkeyFunctionKey = "strg" Then
Hotkey.AddHotKey(keyCode, clsHotkey.MODKEY.MOD_CONTROL, 354523017)
ElseIf HotkeyFunctionKey = "SHIFT" Then
Hotkey.AddHotKey(keyCode, clsHotkey.MODKEY.MOD_SHIFT, 354523017)
End If
End If End If
tslblUser.Text = USER_USERNAME tslblUser.Text = USER_USERNAME
lbHKFunction.Text = HotkeyFunctionKey & " + " & HotkeySearchKey.ToUpper
End Sub End Sub
Private Sub ReceiveHotKey(ByVal HotKeyID As String) Handles Hotkey.HotKeyPressed Private Sub ReceiveHotKey(ByVal HotKeyID As String) Handles Hotkey.HotKeyPressed
If HotKeyID = 354523017 Then
If Not IsNothing(CURR_MATCH_RESULT) And Not IsNothing(CURR_MATCH_WM_SEARCH) Then
clsSearch.RUN_WD_SEARCH(CURR_MATCH_WM_SEARCH)
End If
ElseIf HotKeyID = 354522017 Then
Change_Monitoring_State() Change_Monitoring_State()
End If
End Sub End Sub
Sub Change_Monitoring_State() Sub Change_Monitoring_State()
If MONITORING_ACTIVE = True Then If MONITORING_ACTIVE = True Then
@ -227,4 +257,5 @@ Public Class frmMain
Private Sub MinimierenToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles MinimierenToolStripMenuItem.Click Private Sub MinimierenToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles MinimierenToolStripMenuItem.Click
Me.Hide() Me.Hide()
End Sub End Sub
End Class End Class

View File

@ -26,7 +26,6 @@ Partial Class frmSplash
Me.Copyright = New System.Windows.Forms.Label() Me.Copyright = New System.Windows.Forms.Label()
Me.Version = New System.Windows.Forms.Label() Me.Version = New System.Windows.Forms.Label()
Me.Label1 = New System.Windows.Forms.Label() Me.Label1 = New System.Windows.Forms.Label()
Me.ApplicationTitle = New System.Windows.Forms.Label()
Me.lblStatus = New System.Windows.Forms.Label() Me.lblStatus = New System.Windows.Forms.Label()
Me.pbStatus = New System.Windows.Forms.ProgressBar() Me.pbStatus = New System.Windows.Forms.ProgressBar()
Me.PictureBox1 = New System.Windows.Forms.PictureBox() Me.PictureBox1 = New System.Windows.Forms.PictureBox()
@ -41,7 +40,7 @@ Partial Class frmSplash
Me.Copyright.BackColor = System.Drawing.Color.Transparent Me.Copyright.BackColor = System.Drawing.Color.Transparent
Me.Copyright.Font = New System.Drawing.Font("Segoe UI", 9.0!) Me.Copyright.Font = New System.Drawing.Font("Segoe UI", 9.0!)
Me.Copyright.ImeMode = System.Windows.Forms.ImeMode.NoControl Me.Copyright.ImeMode = System.Windows.Forms.ImeMode.NoControl
Me.Copyright.Location = New System.Drawing.Point(261, 77) Me.Copyright.Location = New System.Drawing.Point(261, 33)
Me.Copyright.Name = "Copyright" Me.Copyright.Name = "Copyright"
Me.Copyright.Size = New System.Drawing.Size(185, 21) Me.Copyright.Size = New System.Drawing.Size(185, 21)
Me.Copyright.TabIndex = 2 Me.Copyright.TabIndex = 2
@ -54,7 +53,7 @@ Partial Class frmSplash
Me.Version.BackColor = System.Drawing.Color.Transparent Me.Version.BackColor = System.Drawing.Color.Transparent
Me.Version.Font = New System.Drawing.Font("Segoe UI", 9.0!) Me.Version.Font = New System.Drawing.Font("Segoe UI", 9.0!)
Me.Version.ImeMode = System.Windows.Forms.ImeMode.NoControl Me.Version.ImeMode = System.Windows.Forms.ImeMode.NoControl
Me.Version.Location = New System.Drawing.Point(261, 56) Me.Version.Location = New System.Drawing.Point(261, 12)
Me.Version.Name = "Version" Me.Version.Name = "Version"
Me.Version.Size = New System.Drawing.Size(185, 21) Me.Version.Size = New System.Drawing.Size(185, 21)
Me.Version.TabIndex = 1 Me.Version.TabIndex = 1
@ -72,18 +71,6 @@ Partial Class frmSplash
Me.Label1.TabIndex = 12 Me.Label1.TabIndex = 12
Me.Label1.Text = "This software is in parts based on:" Me.Label1.Text = "This software is in parts based on:"
' '
'ApplicationTitle
'
Me.ApplicationTitle.BackColor = System.Drawing.Color.Transparent
Me.ApplicationTitle.Font = New System.Drawing.Font("Tahoma", 14.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.ApplicationTitle.ImeMode = System.Windows.Forms.ImeMode.NoControl
Me.ApplicationTitle.Location = New System.Drawing.Point(260, 12)
Me.ApplicationTitle.Name = "ApplicationTitle"
Me.ApplicationTitle.Size = New System.Drawing.Size(469, 33)
Me.ApplicationTitle.TabIndex = 6
Me.ApplicationTitle.Text = "Anwendungstitel"
Me.ApplicationTitle.TextAlign = System.Drawing.ContentAlignment.BottomLeft
'
'lblStatus 'lblStatus
' '
Me.lblStatus.AutoSize = True Me.lblStatus.AutoSize = True
@ -137,7 +124,6 @@ Partial Class frmSplash
Me.Controls.Add(Me.Copyright) Me.Controls.Add(Me.Copyright)
Me.Controls.Add(Me.Label1) Me.Controls.Add(Me.Label1)
Me.Controls.Add(Me.Version) Me.Controls.Add(Me.Version)
Me.Controls.Add(Me.ApplicationTitle)
Me.Controls.Add(Me.PictureBox1) Me.Controls.Add(Me.PictureBox1)
Me.Controls.Add(Me.lblStatus) Me.Controls.Add(Me.lblStatus)
Me.Controls.Add(Me.pbStatus) Me.Controls.Add(Me.pbStatus)
@ -156,7 +142,6 @@ Partial Class frmSplash
Friend WithEvents Copyright As System.Windows.Forms.Label Friend WithEvents Copyright As System.Windows.Forms.Label
Friend WithEvents Version As System.Windows.Forms.Label Friend WithEvents Version As System.Windows.Forms.Label
Friend WithEvents Label1 As System.Windows.Forms.Label Friend WithEvents Label1 As System.Windows.Forms.Label
Friend WithEvents ApplicationTitle As System.Windows.Forms.Label
Friend WithEvents PictureBox1 As System.Windows.Forms.PictureBox Friend WithEvents PictureBox1 As System.Windows.Forms.PictureBox
Friend WithEvents lblStatus As System.Windows.Forms.Label Friend WithEvents lblStatus As System.Windows.Forms.Label
Friend WithEvents pbStatus As System.Windows.Forms.ProgressBar Friend WithEvents pbStatus As System.Windows.Forms.ProgressBar

View File

@ -25,12 +25,12 @@ Public NotInheritable Class frmSplash
' Projekteigenschaften (im Menü "Projekt") anpassen. ' Projekteigenschaften (im Menü "Projekt") anpassen.
'Anwendungstitel 'Anwendungstitel
If My.Application.Info.Title <> "" Then 'If My.Application.Info.Title <> "" Then
ApplicationTitle.Text = My.Application.Info.Title ' ApplicationTitle.Text = My.Application.Info.Title
Else 'Else
'Wenn der Anwendungstitel fehlt, Anwendungsnamen ohne Erweiterung verwenden ' 'Wenn der Anwendungstitel fehlt, Anwendungsnamen ohne Erweiterung verwenden
ApplicationTitle.Text = System.IO.Path.GetFileNameWithoutExtension(My.Application.Info.AssemblyName) ' ApplicationTitle.Text = System.IO.Path.GetFileNameWithoutExtension(My.Application.Info.AssemblyName)
End If 'End If
'Verwenden Sie zum Formatieren der Versionsinformationen den Text, der zur Entwurfszeit in der Versionskontrolle festgelegt wurde, als 'Verwenden Sie zum Formatieren der Versionsinformationen den Text, der zur Entwurfszeit in der Versionskontrolle festgelegt wurde, als
' Formatierungszeichenfolge. Dies ermöglicht ggf. eine effektive Lokalisierung. ' Formatierungszeichenfolge. Dies ermöglicht ggf. eine effektive Lokalisierung.
@ -84,8 +84,7 @@ Public NotInheritable Class frmSplash
End If End If
System.Threading.Thread.Sleep(500) System.Threading.Thread.Sleep(800)
'bw.ReportProgress(CalcProgress(5), "Initializing Addons") 'bw.ReportProgress(CalcProgress(5), "Initializing Addons")
'Init.InitAddons() 'Init.InitAddons()

View File

@ -1,6 +1,8 @@
Module modCurrent Module modCurrent
Public MyConnectionString As String = "" Public MyConnectionString As String = ""
Public HotkeyFunctionKey As String = "strg"
Public HotkeySearchKey As String = "f"
Public LogErrorsOnly As Boolean = True Public LogErrorsOnly As Boolean = True
Public USER_LANGUAGE As String = "de-DE" Public USER_LANGUAGE As String = "de-DE"
@ -32,6 +34,7 @@
Public CLIPBOARD_TEXT As String Public CLIPBOARD_TEXT As String
Public CURR_MATCH_RESULT Public CURR_MATCH_RESULT
Public CURR_MATCH_WM_SEARCH
Public MONITORING_ACTIVE As Boolean = True Public MONITORING_ACTIVE As Boolean = True

View File

@ -15,7 +15,7 @@ Module modMySettings
DT = GetTablefromXML() DT = GetTablefromXML()
For Each Row As DataRow In DT.Rows For Each Row As DataRow In DT.Rows
rowresult &= Row.Item("ConfigName") rowresult &= Row.Item("ConfigName")
Select Row.Item("ConfigName") Select Case Row.Item("ConfigName")
Case "MyConnectionString" Case "MyConnectionString"
Dim connstring As String Dim connstring As String
'Den ConnectonString mit verschlüsseltem PW laden 'Den ConnectonString mit verschlüsseltem PW laden
@ -41,8 +41,27 @@ Module modMySettings
MyConnectionString = connstring MyConnectionString = connstring
Case "LogErrorsOnly" Case "LogErrorsOnly"
LogErrorsOnly = CBool(Row.Item("Value")) LogErrorsOnly = CBool(Row.Item("Value"))
Case "HotkeyFunctionKey"
HotkeyFunctionKey = Row.Item("Value")
Case "HotkeySearchKey"
HotkeySearchKey = Row.Item("Value")
End Select End Select
Next Next
If rowresult.Contains("HotkeyFunctionKey") = False Then
Dim newRow As DataRow = DT.NewRow()
newRow("ConfigName") = "HotkeyFunctionKey"
newRow("Value") = "strg"
DT.Rows.Add(newRow)
DT.WriteXml(ConfigPath)
End If
If rowresult.Contains("HotkeySearchKey") = False Then
Dim newRow As DataRow = DT.NewRow()
newRow("ConfigName") = "HotkeySearchKey"
newRow("Value") = "f"
DT.Rows.Add(newRow)
DT.WriteXml(ConfigPath)
End If
Return True Return True
Catch ex As Exception Catch ex As Exception
MsgBox("Error in MySettings-LoadMyConfig" & vbNewLine & ex.Message, MsgBoxStyle.Critical) MsgBox("Error in MySettings-LoadMyConfig" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
@ -86,6 +105,14 @@ Module modMySettings
newRow1("ConfigName") = "LogErrorsOnly" newRow1("ConfigName") = "LogErrorsOnly"
newRow1("Value") = "True" newRow1("Value") = "True"
table.Rows.Add(newRow1) table.Rows.Add(newRow1)
Dim newRow2 As DataRow = table.NewRow()
newRow2("ConfigName") = "HotkeyFunctionKey"
newRow2("Value") = "strg"
table.Rows.Add(newRow2)
Dim newRow3 As DataRow = table.NewRow()
newRow3("ConfigName") = "HotkeySearchKey"
newRow3("Value") = "f"
table.Rows.Add(newRow3)
table.AcceptChanges() table.AcceptChanges()
Return table Return table
Catch ex As Exception Catch ex As Exception

View File

@ -1,9 +1,9 @@
 
Microsoft Visual Studio Solution File, Format Version 12.00 Microsoft Visual Studio Solution File, Format Version 12.00
# Visual Studio 2013 # Visual Studio 15
VisualStudioVersion = 12.0.21005.1 VisualStudioVersion = 15.0.26228.9
MinimumVisualStudioVersion = 10.0.40219.1 MinimumVisualStudioVersion = 10.0.40219.1
Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "DD_Clipboard_Searcher", "DD_Clipboard_Searcher\DD_Clipboard_Searcher.vbproj", "{09BC9934-1A38-4752-8873-639B42779CDB}" Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "DD_Clipboard_Watcher", "DD_Clipboard_Searcher\DD_Clipboard_Watcher.vbproj", "{09BC9934-1A38-4752-8873-639B42779CDB}"
EndProject EndProject
Project("{930C7802-8A8C-48F9-8165-68863BCCD9DD}") = "SetupWix", "SetupWix\SetupWix.wixproj", "{15FC07B7-9FF7-4F14-9BAB-05674E20D839}" Project("{930C7802-8A8C-48F9-8165-68863BCCD9DD}") = "SetupWix", "SetupWix\SetupWix.wixproj", "{15FC07B7-9FF7-4F14-9BAB-05674E20D839}"
EndProject EndProject

63
app/SetupWix/.gitattributes vendored Normal file
View File

@ -0,0 +1,63 @@
###############################################################################
# Set default behavior to automatically normalize line endings.
###############################################################################
* text=auto
###############################################################################
# Set default behavior for command prompt diff.
#
# This is need for earlier builds of msysgit that does not have it on by
# default for csharp files.
# Note: This is only used by command line
###############################################################################
#*.cs diff=csharp
###############################################################################
# Set the merge driver for project and solution files
#
# Merging from the command prompt will add diff markers to the files if there
# are conflicts (Merging from VS is not affected by the settings below, in VS
# the diff markers are never inserted). Diff markers may cause the following
# file extensions to fail to load in VS. An alternative would be to treat
# these files as binary and thus will always conflict and require user
# intervention with every merge. To do so, just uncomment the entries below
###############################################################################
#*.sln merge=binary
#*.csproj merge=binary
#*.vbproj merge=binary
#*.vcxproj merge=binary
#*.vcproj merge=binary
#*.dbproj merge=binary
#*.fsproj merge=binary
#*.lsproj merge=binary
#*.wixproj merge=binary
#*.modelproj merge=binary
#*.sqlproj merge=binary
#*.wwaproj merge=binary
###############################################################################
# behavior for image files
#
# image files are treated as binary by default.
###############################################################################
#*.jpg binary
#*.png binary
#*.gif binary
###############################################################################
# diff behavior for common document formats
#
# Convert binary document formats to text before diffing them. This feature
# is only available from the command line. Turn it on by uncommenting the
# entries below.
###############################################################################
#*.doc diff=astextplain
#*.DOC diff=astextplain
#*.docx diff=astextplain
#*.DOCX diff=astextplain
#*.dot diff=astextplain
#*.DOT diff=astextplain
#*.pdf diff=astextplain
#*.PDF diff=astextplain
#*.rtf diff=astextplain
#*.RTF diff=astextplain

156
app/SetupWix/.gitignore vendored Normal file
View File

@ -0,0 +1,156 @@
## Ignore Visual Studio temporary files, build results, and
## files generated by popular Visual Studio add-ons.
# User-specific files
*.suo
*.user
*.sln.docstates
# Build results
[Dd]ebug/
[Rr]elease/
x64/
build/
[Bb]in/
[Oo]bj/
# Enable "build/" folder in the NuGet Packages folder since NuGet packages use it for MSBuild targets
!packages/*/build/
# MSTest test Results
[Tt]est[Rr]esult*/
[Bb]uild[Ll]og.*
*_i.c
*_p.c
*.ilk
*.meta
*.obj
*.pch
*.pdb
*.pgc
*.pgd
*.rsp
*.sbr
*.tlb
*.tli
*.tlh
*.tmp
*.tmp_proj
*.log
*.vspscc
*.vssscc
.builds
*.pidb
*.log
*.scc
# Visual C++ cache files
ipch/
*.aps
*.ncb
*.opensdf
*.sdf
*.cachefile
# Visual Studio profiler
*.psess
*.vsp
*.vspx
# Guidance Automation Toolkit
*.gpState
# ReSharper is a .NET coding add-in
_ReSharper*/
*.[Rr]e[Ss]harper
# TeamCity is a build add-in
_TeamCity*
# DotCover is a Code Coverage Tool
*.dotCover
# NCrunch
*.ncrunch*
.*crunch*.local.xml
# Installshield output folder
[Ee]xpress/
# DocProject is a documentation generator add-in
DocProject/buildhelp/
DocProject/Help/*.HxT
DocProject/Help/*.HxC
DocProject/Help/*.hhc
DocProject/Help/*.hhk
DocProject/Help/*.hhp
DocProject/Help/Html2
DocProject/Help/html
# Click-Once directory
publish/
# Publish Web Output
*.Publish.xml
# NuGet Packages Directory
## TODO: If you have NuGet Package Restore enabled, uncomment the next line
#packages/
# Windows Azure Build Output
csx
*.build.csdef
# Windows Store app package directory
AppPackages/
# Others
sql/
*.Cache
ClientBin/
[Ss]tyle[Cc]op.*
~$*
*~
*.dbmdl
*.[Pp]ublish.xml
*.pfx
*.publishsettings
# RIA/Silverlight projects
Generated_Code/
# Backup & report files from converting an old project file to a newer
# Visual Studio version. Backup files are not needed, because we have git ;-)
_UpgradeReport_Files/
Backup*/
UpgradeLog*.XML
UpgradeLog*.htm
# SQL Server files
App_Data/*.mdf
App_Data/*.ldf
#LightSwitch generated files
GeneratedArtifacts/
_Pvt_Extensions/
ModelManifest.xml
# =========================
# Windows detritus
# =========================
# Windows image file caches
Thumbs.db
ehthumbs.db
# Folder config file
Desktop.ini
# Recycle Bin used on file shares
$RECYCLE.BIN/
# Mac desktop service store files
.DS_Store

9
app/SetupWix/Config.wxi Normal file
View File

@ -0,0 +1,9 @@
<?xml version="1.0" encoding="utf-8"?>
<Include>
<?define ProgramName="DD_Clipboard_Watcher"?>
<?define ProductName="DD Clipboard Watcher"?>
<?define Manufacturer="Digital Data"?>
<?define Description="DD Clipboard Watcher"?>
<?define Comments="DD Clipboard Watcher"?>
<?define UpgradeCode="BB3A9D50-7CCE-42DA-84F2-D67129F57B59"?>
</Include>