Prepare for Version 2.0.0.0

This commit is contained in:
Jonathan Jenne 2019-07-31 15:37:48 +02:00
parent 257ed65246
commit 71559c9ca5
44 changed files with 13768 additions and 7629 deletions

View File

@ -7,4 +7,8 @@
Public Const HOTKEY_CTRL = "strg"
Public Const HOTKEY_SHIFT = "SHIFT"
Public Const PROFILE_TYPE_DATA_DOCS As Integer = 0
Public Const PROFILE_TYPE_DOCS_ONLY As Integer = 1
Public Const PROFILE_TYPE_DATA_ONLY As Integer = 2
End Class

View File

@ -163,6 +163,7 @@ Public Class ClassInit
End If
WD_UNICODE = clsDatabase.Execute_Scalar("SELECT WD_UNICODE FROM TBCW_CONFIGURATION WHERE GUID = 1")
GDPICTURE_LICENSE = clsDatabase.Execute_Scalar("SELECT GDPICTURE_LICENSE FROM TBCW_CONFIGURATION WHERE GUID = 1")
Logger.Debug(" >> Count Users logged in: " & USERCOUNT_LOGGED_IN.ToString, False)
If LICENSE_COUNT < USERCOUNT_LOGGED_IN And LICENSE_EXPIRED = False Then

View File

@ -15,6 +15,8 @@ Public Class ClassProfileFilter
Public Comment As String
Public SQLCountDocs As String
Public SQLCountData As String
Public ProfileType As Integer
Public Windows As List(Of WindowData)
Public CountDocs As Integer = 0
@ -91,37 +93,66 @@ Public Class ClassProfileFilter
End Function)
End Function
Public Function FilterWindowsByWindowTitle(Profiles As IEnumerable(Of ProfileData), WindowTitle As String) As IEnumerable(Of ProfileData)
Return _Profiles.Select(Function(p)
Dim oWindows As List(Of WindowData) = p.Windows
Public Function FilterWindowsByWindowTitleRegex(Profiles As IEnumerable(Of ProfileData), WindowTitle As String) As IEnumerable(Of ProfileData)
Dim oProfiles As New List(Of ProfileData)
p.Windows = oWindows.
Where(Function(w)
Try
If w.Regex = String.Empty Then Return True
For Each p As ProfileData In Profiles
Dim oWindows As New List(Of WindowData)
Dim oRegex As New Regex(w.Regex)
Dim oMatch = oRegex.Match(WindowTitle)
For Each w As WindowData In p.Windows
Try
If w.Regex = String.Empty Then
oWindows.Add(w)
End If
If oMatch.Success Then
'TODO: Add Debug Data
Return True
Else
Return False
End If
Catch ex As Exception
Logger.Warn("Regex '{0}' could not be processed for input '{1}'", w.Regex, WindowTitle)
Logger.Error(ex)
Return False
End Try
Dim oRegex As New Regex(w.Regex)
Dim oMatch = oRegex.Match(WindowTitle)
End Function).
ToList()
Return p
End Function)
If oMatch.Success Then
'TODO: Add Debug Data
oWindows.Add(w)
End If
Catch ex As Exception
Logger.Warn("Regex '{0}' could not be processed for input '{1}'", w.Regex, WindowTitle)
Logger.Error(ex)
End Try
Next
p.Windows = oWindows
Next
'Dim oProfiles = _Profiles.Select(Function(p As ProfileData)
' Dim oWindows As List(Of WindowData) = p.Windows
' p.Windows = oWindows.
' Where(Function(w)
' Try
' If w.Regex = String.Empty Then Return True
' Dim oRegex As New Regex(w.Regex)
' Dim oMatch = oRegex.Match(WindowTitle)
' If oMatch.Success Then
' 'TODO: Add Debug Data
' Return True
' Else
' Return False
' End If
' Catch ex As Exception
' Logger.Warn("Regex '{0}' could not be processed for input '{1}'", w.Regex, WindowTitle)
' Logger.Error(ex)
' Return False
' End Try
' End Function).
' ToList()
' Return p
' End Function)
Return oProfiles
End Function
Public Function FilterProfilesByWindowRegex(Profiles As IEnumerable(Of ProfileData), ClipboardContents As String) As IEnumerable(Of ProfileData)
Public Function FilterProfilesByWindowClipboardRegex(Profiles As IEnumerable(Of ProfileData), ClipboardContents As String) As IEnumerable(Of ProfileData)
Return _Profiles.Where(Function(p)
If p.Windows.Count = 0 Then Return True
@ -164,6 +195,7 @@ Public Class ClassProfileFilter
.Comment = oRow.Item("COMMENT"),
.SQLCountDocs = oRow.Item("SQL_COUNT_DOCS"),
.SQLCountData = oRow.Item("SQL_COUNT_DATA"),
.ProfileType = oRow.Item("PROFILE_TYPE"),
.Windows = oWindowList
})
Next

View File

@ -84,6 +84,9 @@
<Reference Include="Oracle.ManagedDataAccess">
<HintPath>P:\Visual Studio Projekte\Bibliotheken\Oracle.ManagedDataAccess.dll</HintPath>
</Reference>
<Reference Include="RegexEditor">
<HintPath>..\..\..\DDMonorepo\Controls.RegexEditor\bin\Debug\RegexEditor.dll</HintPath>
</Reference>
<Reference Include="System" />
<Reference Include="System.ComponentModel.DataAnnotations" />
<Reference Include="System.Configuration" />
@ -130,10 +133,16 @@
<Compile Include="clsWindowApivb.vb" />
<Compile Include="clsWINDOWSApi.vb" />
<Compile Include="clsWMDocGrid.vb" />
<Compile Include="frmAbout.designer.vb">
<DependentUpon>frmAbout.vb</DependentUpon>
<Compile Include="ctrlApplicationAssignment.Designer.vb">
<DependentUpon>ctrlApplicationAssignment.vb</DependentUpon>
</Compile>
<Compile Include="frmAbout.vb">
<Compile Include="ctrlApplicationAssignment.vb">
<SubType>UserControl</SubType>
</Compile>
<Compile Include="frmDocViewAbout.designer.vb">
<DependentUpon>frmDocViewAbout.vb</DependentUpon>
</Compile>
<Compile Include="frmDocViewAbout.vb">
<SubType>Form</SubType>
</Compile>
<Compile Include="frmAdministration.Designer.vb">
@ -160,10 +169,10 @@
<Compile Include="frmDocView.vb">
<SubType>Form</SubType>
</Compile>
<Compile Include="frmGdPictureOpen.designer.vb">
<DependentUpon>frmGdPictureOpen.vb</DependentUpon>
<Compile Include="frmDocViewOpen.designer.vb">
<DependentUpon>frmDocViewOpen.vb</DependentUpon>
</Compile>
<Compile Include="frmGdPictureOpen.vb">
<Compile Include="frmDocViewOpen.vb">
<SubType>Form</SubType>
</Compile>
<Compile Include="frmPrint.designer.vb">
@ -221,6 +230,7 @@
<Compile Include="frmSplash.vb">
<SubType>Form</SubType>
</Compile>
<Compile Include="IResultForm.vb" />
<Compile Include="modCurrent.vb" />
<Compile Include="My Project\AssemblyInfo.vb" />
<Compile Include="My Project\Application.Designer.vb">
@ -248,8 +258,11 @@
<Compile Include="Windows.vb" />
</ItemGroup>
<ItemGroup>
<EmbeddedResource Include="frmAbout.resx">
<DependentUpon>frmAbout.vb</DependentUpon>
<EmbeddedResource Include="ctrlApplicationAssignment.resx">
<DependentUpon>ctrlApplicationAssignment.vb</DependentUpon>
</EmbeddedResource>
<EmbeddedResource Include="frmDocViewAbout.resx">
<DependentUpon>frmDocViewAbout.vb</DependentUpon>
</EmbeddedResource>
<EmbeddedResource Include="frmAdministration.resx">
<DependentUpon>frmAdministration.vb</DependentUpon>
@ -267,8 +280,8 @@
<EmbeddedResource Include="frmDocView.resx">
<DependentUpon>frmDocView.vb</DependentUpon>
</EmbeddedResource>
<EmbeddedResource Include="frmGdPictureOpen.resx">
<DependentUpon>frmGdPictureOpen.vb</DependentUpon>
<EmbeddedResource Include="frmDocViewOpen.resx">
<DependentUpon>frmDocViewOpen.vb</DependentUpon>
</EmbeddedResource>
<EmbeddedResource Include="frmPrint.resx">
<DependentUpon>frmPrint.vb</DependentUpon>
@ -350,6 +363,10 @@
<ItemGroup>
<Content Include="DD_Icons_ICO_CBWATCHER_48px.ico" />
<Content Include="KeyOutput_8167.ico" />
<None Include="Resources\PrepareProcess.png" />
<None Include="Resources\base_cog_32.png" />
<None Include="Resources\Editdatasetwithdesigner_8449.png" />
<None Include="Resources\user_16xLG.png" />
<None Include="Resources\application_go.png" />
<None Include="Resources\add.png" />
<None Include="Resources\PreviewTab.png" />

View File

@ -0,0 +1,3 @@
Public Interface IResultForm
Property ShouldReturnToMatchForm As Boolean
End Interface

View File

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

View File

@ -110,6 +110,16 @@ Namespace My.Resources
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
'''</summary>
Friend ReadOnly Property base_cog_32() As System.Drawing.Bitmap
Get
Dim obj As Object = ResourceManager.GetObject("base_cog_32", resourceCulture)
Return CType(obj,System.Drawing.Bitmap)
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
'''</summary>
@ -190,6 +200,16 @@ Namespace My.Resources
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
'''</summary>
Friend ReadOnly Property Editdatasetwithdesigner_8449() As System.Drawing.Bitmap
Get
Dim obj As Object = ResourceManager.GetObject("Editdatasetwithdesigner_8449", resourceCulture)
Return CType(obj,System.Drawing.Bitmap)
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
'''</summary>
@ -330,6 +350,16 @@ Namespace My.Resources
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
'''</summary>
Friend ReadOnly Property PrepareProcess() As System.Drawing.Bitmap
Get
Dim obj As Object = ResourceManager.GetObject("PrepareProcess", resourceCulture)
Return CType(obj,System.Drawing.Bitmap)
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
'''</summary>
@ -470,6 +500,16 @@ Namespace My.Resources
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
'''</summary>
Friend ReadOnly Property user_16xLG() As System.Drawing.Bitmap
Get
Dim obj As Object = ResourceManager.GetObject("user_16xLG", resourceCulture)
Return CType(obj,System.Drawing.Bitmap)
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
'''</summary>

View File

@ -136,8 +136,8 @@
<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="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>
<data name="user_16xLG" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\user_16xLG.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="dxf" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\dxf.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
@ -148,6 +148,9 @@
<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>
</data>
<data name="sql" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\sql.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="ppt" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\ppt.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
@ -160,12 +163,18 @@
<data name="email_go" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\email_go.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="Editdatasetwithdesigner_8449" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\Editdatasetwithdesigner_8449.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="StatusAnnotations_Alert_32xMD_color" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\StatusAnnotations_Alert_32xMD_color.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="refresh_16xLG" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\refresh_16xLG.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</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="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>
@ -190,11 +199,11 @@
<data name="rar" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\rar.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</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 name="tiff" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\tiff.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="sql" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\sql.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
<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>
</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>
@ -202,9 +211,6 @@
<data name="PreviewTab" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\PreviewTab.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="OpenFile" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\OpenFile.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="mp4" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\mp4.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
@ -217,8 +223,8 @@
<data name="search" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\search.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="tiff" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\tiff.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
<data name="OpenFile" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\OpenFile.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="StatusAnnotations_Information_16xMD_color" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\StatusAnnotations_Information_16xMD_color.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
@ -232,6 +238,9 @@
<data name="properties_16xMD" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\properties_16xMD.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="application_go" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\application_go.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="build_Selection_32xLG" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\build_Selection_32xLG.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
@ -241,10 +250,13 @@
<data name="png" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\png.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="base_cog_32" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\base_cog_32.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="ID_FILE_PAGE_SETUP" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\ID_FILE_PAGE_SETUP.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="application_go" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\application_go.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
<data name="PrepareProcess" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\PrepareProcess.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
</root>

View File

@ -1,5 +1,8 @@
DevExpress.XtraEditors.Repository.RepositoryItemTextEdit, DevExpress.XtraEditors.v18.1, Version=18.1.5.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
DevExpress.XtraBars.Ribbon.RibbonControl, DevExpress.XtraBars.v18.1, Version=18.1.5.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
DevExpress.XtraEditors.TileControl, DevExpress.XtraEditors.v18.1, Version=18.1.5.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
DevExpress.XtraGrid.GridControl, DevExpress.XtraGrid.v18.1, Version=18.1.5.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
DevExpress.XtraEditors.Repository.RepositoryItemButtonEdit, DevExpress.XtraEditors.v18.1, Version=18.1.5.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
DevExpress.XtraGrid.GridControl, DevExpress.XtraGrid.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
DevExpress.XtraEditors.TileControl, DevExpress.XtraEditors.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
DevExpress.XtraGrid.GridControl, DevExpress.XtraGrid.v18.1, Version=18.1.5.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
DevExpress.XtraEditors.TileControl, DevExpress.XtraEditors.v18.1, Version=18.1.5.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
DevExpress.XtraGauges.Win.GaugeControl, DevExpress.XtraGauges.v18.1.Win, Version=18.1.5.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a

Binary file not shown.

After

Width:  |  Height:  |  Size: 388 B

Binary file not shown.

After

Width:  |  Height:  |  Size: 384 B

Binary file not shown.

After

Width:  |  Height:  |  Size: 3.9 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 284 B

View File

@ -69,11 +69,11 @@ Public Class clsPatterns
Try
Dim result = input
' Replace Clipboard
result = result.Replace("@Clipboard", CURR_MATCH_RESULT)
result = result.Replace("@CLIPBOARD", CURR_MATCH_RESULT)
result = result.Replace("@Zwischenablage", CURR_MATCH_RESULT)
result = result.Replace("123456789", CURR_MATCH_RESULT)
result = result.Replace("4711", CURR_MATCH_RESULT)
result = result.Replace("@Clipboard", CURRENT_CLIPBOARD_CONTENTS)
result = result.Replace("@CLIPBOARD", CURRENT_CLIPBOARD_CONTENTS)
result = result.Replace("@Zwischenablage", CURRENT_CLIPBOARD_CONTENTS)
result = result.Replace("123456789", CURRENT_CLIPBOARD_CONTENTS)
result = result.Replace("4711", CURRENT_CLIPBOARD_CONTENTS)
' Replace Username(s)
While ContainsPatternAndValue(result, PATTERN_INT, INT_VALUE_USERNAME)
result = ReplacePattern(result, PATTERN_INT, Environment.UserName)

View File

@ -55,11 +55,11 @@ Public Class clsSearch
fileContents = My.Computer.FileSystem.ReadAllText(BaseSearch, EncodingFormat) ', System.Text.Encoding.Unicode
Logger.Debug(" ...fileContents geladen", False)
fileContents = fileContents.Replace("Í", "Ö")
fileContents = fileContents.Replace("@Clipboard", CURR_MATCH_RESULT)
fileContents = fileContents.Replace("@CLIPBOARD", CURR_MATCH_RESULT)
fileContents = fileContents.Replace("@Zwischenablage", CURR_MATCH_RESULT)
fileContents = fileContents.Replace("123456789", CURR_MATCH_RESULT)
fileContents = fileContents.Replace("4711", CURR_MATCH_RESULT)
fileContents = fileContents.Replace("@Clipboard", CURRENT_CLIPBOARD_CONTENTS)
fileContents = fileContents.Replace("@CLIPBOARD", CURRENT_CLIPBOARD_CONTENTS)
fileContents = fileContents.Replace("@Zwischenablage", CURRENT_CLIPBOARD_CONTENTS)
fileContents = fileContents.Replace("123456789", CURRENT_CLIPBOARD_CONTENTS)
fileContents = fileContents.Replace("4711", CURRENT_CLIPBOARD_CONTENTS)
Try
'Die windream File zusammensetzen
windream_temp_search = temppath & tempName & extension
@ -135,7 +135,7 @@ Public Class clsSearch
Logger.Info("Unexpected error while Setting foreground: " & ex.Message)
End Try
'CURR_MATCH_WM_SEARCH = Nothing
CURR_MATCH_RESULT = Nothing
CURRENT_CLIPBOARD_CONTENTS = Nothing
Return ""
Catch ex As Exception
Logger.Info("Unexpected error in Create Search: " & ex.Message)

View File

@ -0,0 +1,319 @@
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()>
Partial Class ctrlApplicationAssignment
Inherits System.Windows.Forms.UserControl
'UserControl überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
<System.Diagnostics.DebuggerNonUserCode()>
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
Try
If disposing AndAlso components IsNot Nothing Then
components.Dispose()
End If
Finally
MyBase.Dispose(disposing)
End Try
End Sub
'Wird vom Windows Form-Designer benötigt.
Private components As System.ComponentModel.IContainer
'Hinweis: Die folgende Prozedur ist für den Windows Form-Designer erforderlich.
'Das Bearbeiten ist mit dem Windows Form-Designer möglich.
'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
<System.Diagnostics.DebuggerStepThrough()>
Private Sub InitializeComponent()
Me.components = New System.ComponentModel.Container()
Me.SplitContainer3 = New System.Windows.Forms.SplitContainer()
Me.GridControl_Window = New DevExpress.XtraGrid.GridControl()
Me.TBCW_PROF_REL_WINDOWBindingSource = New System.Windows.Forms.BindingSource(Me.components)
Me.MyDataset = New DD_Clipboard_Watcher.MyDataset()
Me.GridView_Window = New DevExpress.XtraGrid.Views.Grid.GridView()
Me.colPROCESS_NAME = New DevExpress.XtraGrid.Columns.GridColumn()
Me.colGUID = New DevExpress.XtraGrid.Columns.GridColumn()
Me.colDESCRIPTION = New DevExpress.XtraGrid.Columns.GridColumn()
Me.colREGEX = New DevExpress.XtraGrid.Columns.GridColumn()
Me.RepositoryItemRegexEdit = New DevExpress.XtraEditors.Repository.RepositoryItemButtonEdit()
Me.colREGEX_CLIPBOARD = New DevExpress.XtraGrid.Columns.GridColumn()
Me.colSEQUENCE = New DevExpress.XtraGrid.Columns.GridColumn()
Me.RepositoryItemSpinEdit1 = New DevExpress.XtraEditors.Repository.RepositoryItemSpinEdit()
Me.GridControl2 = New DevExpress.XtraGrid.GridControl()
Me.GridView3 = New DevExpress.XtraGrid.Views.Grid.GridView()
Me.GridControl3 = New DevExpress.XtraGrid.GridControl()
Me.TBCW_PROFILE_PROCESSBindingSource = New System.Windows.Forms.BindingSource(Me.components)
Me.GridViewProcessProfile = New DevExpress.XtraGrid.Views.Grid.GridView()
Me.colGUID2 = New DevExpress.XtraGrid.Columns.GridColumn()
Me.colPROC_NAME = New DevExpress.XtraGrid.Columns.GridColumn()
Me.TBCW_PROFILE_PROCESSTableAdapter = New DD_Clipboard_Watcher.MyDatasetTableAdapters.TBCW_PROFILE_PROCESSTableAdapter()
Me.TBCW_PROF_REL_WINDOWTableAdapter = New DD_Clipboard_Watcher.MyDatasetTableAdapters.TBCW_PROF_REL_WINDOWTableAdapter()
Me.Label1 = New System.Windows.Forms.Label()
Me.Label2 = New System.Windows.Forms.Label()
CType(Me.SplitContainer3, System.ComponentModel.ISupportInitialize).BeginInit()
Me.SplitContainer3.Panel1.SuspendLayout()
Me.SplitContainer3.Panel2.SuspendLayout()
Me.SplitContainer3.SuspendLayout()
CType(Me.GridControl_Window, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.TBCW_PROF_REL_WINDOWBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.MyDataset, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.GridView_Window, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.RepositoryItemRegexEdit, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.RepositoryItemSpinEdit1, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.GridControl2, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.GridView3, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.GridControl3, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.TBCW_PROFILE_PROCESSBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.GridViewProcessProfile, System.ComponentModel.ISupportInitialize).BeginInit()
Me.SuspendLayout()
'
'SplitContainer3
'
Me.SplitContainer3.Dock = System.Windows.Forms.DockStyle.Fill
Me.SplitContainer3.Location = New System.Drawing.Point(192, 0)
Me.SplitContainer3.Name = "SplitContainer3"
Me.SplitContainer3.Orientation = System.Windows.Forms.Orientation.Horizontal
'
'SplitContainer3.Panel1
'
Me.SplitContainer3.Panel1.Controls.Add(Me.GridControl_Window)
Me.SplitContainer3.Panel1.Controls.Add(Me.Label1)
'
'SplitContainer3.Panel2
'
Me.SplitContainer3.Panel2.Controls.Add(Me.GridControl2)
Me.SplitContainer3.Panel2.Controls.Add(Me.Label2)
Me.SplitContainer3.Size = New System.Drawing.Size(915, 635)
Me.SplitContainer3.SplitterDistance = 304
Me.SplitContainer3.TabIndex = 71
'
'GridControl_Window
'
Me.GridControl_Window.DataSource = Me.TBCW_PROF_REL_WINDOWBindingSource
Me.GridControl_Window.Dock = System.Windows.Forms.DockStyle.Fill
Me.GridControl_Window.Location = New System.Drawing.Point(0, 25)
Me.GridControl_Window.MainView = Me.GridView_Window
Me.GridControl_Window.Name = "GridControl_Window"
Me.GridControl_Window.RepositoryItems.AddRange(New DevExpress.XtraEditors.Repository.RepositoryItem() {Me.RepositoryItemRegexEdit, Me.RepositoryItemSpinEdit1})
Me.GridControl_Window.Size = New System.Drawing.Size(915, 279)
Me.GridControl_Window.TabIndex = 66
Me.GridControl_Window.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridView_Window})
'
'TBCW_PROF_REL_WINDOWBindingSource
'
Me.TBCW_PROF_REL_WINDOWBindingSource.AllowNew = True
Me.TBCW_PROF_REL_WINDOWBindingSource.DataMember = "TBCW_PROF_REL_WINDOW"
Me.TBCW_PROF_REL_WINDOWBindingSource.DataSource = Me.MyDataset
'
'MyDataset
'
Me.MyDataset.DataSetName = "MyDataset"
Me.MyDataset.SchemaSerializationMode = System.Data.SchemaSerializationMode.IncludeSchema
'
'GridView_Window
'
Me.GridView_Window.Columns.AddRange(New DevExpress.XtraGrid.Columns.GridColumn() {Me.colPROCESS_NAME, Me.colGUID, Me.colDESCRIPTION, Me.colREGEX, Me.colREGEX_CLIPBOARD, Me.colSEQUENCE})
Me.GridView_Window.GridControl = Me.GridControl_Window
Me.GridView_Window.Name = "GridView_Window"
'
'colPROCESS_NAME
'
Me.colPROCESS_NAME.FieldName = "PROCESS_NAME"
Me.colPROCESS_NAME.Name = "colPROCESS_NAME"
'
'colGUID
'
Me.colGUID.Caption = "GUID"
Me.colGUID.FieldName = "GUID"
Me.colGUID.Name = "colGUID"
'
'colDESCRIPTION
'
Me.colDESCRIPTION.Caption = "Fenster Beschreibung"
Me.colDESCRIPTION.FieldName = "DESCRIPTION"
Me.colDESCRIPTION.Name = "colDESCRIPTION"
Me.colDESCRIPTION.Visible = True
Me.colDESCRIPTION.VisibleIndex = 0
'
'colREGEX
'
Me.colREGEX.Caption = "Fenster Titel Regex"
Me.colREGEX.ColumnEdit = Me.RepositoryItemRegexEdit
Me.colREGEX.FieldName = "REGEX"
Me.colREGEX.Name = "colREGEX"
Me.colREGEX.Visible = True
Me.colREGEX.VisibleIndex = 1
'
'RepositoryItemRegexEdit
'
Me.RepositoryItemRegexEdit.AutoHeight = False
Me.RepositoryItemRegexEdit.Buttons.AddRange(New DevExpress.XtraEditors.Controls.EditorButton() {New DevExpress.XtraEditors.Controls.EditorButton()})
Me.RepositoryItemRegexEdit.Name = "RepositoryItemRegexEdit"
'
'colREGEX_CLIPBOARD
'
Me.colREGEX_CLIPBOARD.Caption = "Clipboard Regex"
Me.colREGEX_CLIPBOARD.ColumnEdit = Me.RepositoryItemRegexEdit
Me.colREGEX_CLIPBOARD.FieldName = "REGEX_CLIPBOARD"
Me.colREGEX_CLIPBOARD.Name = "colREGEX_CLIPBOARD"
Me.colREGEX_CLIPBOARD.Visible = True
Me.colREGEX_CLIPBOARD.VisibleIndex = 2
'
'colSEQUENCE
'
Me.colSEQUENCE.Caption = "Anordnung"
Me.colSEQUENCE.ColumnEdit = Me.RepositoryItemSpinEdit1
Me.colSEQUENCE.FieldName = "SEQUENCE"
Me.colSEQUENCE.Name = "colSEQUENCE"
Me.colSEQUENCE.Visible = True
Me.colSEQUENCE.VisibleIndex = 3
'
'RepositoryItemSpinEdit1
'
Me.RepositoryItemSpinEdit1.AutoHeight = False
Me.RepositoryItemSpinEdit1.Buttons.AddRange(New DevExpress.XtraEditors.Controls.EditorButton() {New DevExpress.XtraEditors.Controls.EditorButton(DevExpress.XtraEditors.Controls.ButtonPredefines.Combo)})
Me.RepositoryItemSpinEdit1.Name = "RepositoryItemSpinEdit1"
'
'GridControl2
'
Me.GridControl2.Dock = System.Windows.Forms.DockStyle.Fill
Me.GridControl2.Enabled = False
Me.GridControl2.Location = New System.Drawing.Point(0, 25)
Me.GridControl2.MainView = Me.GridView3
Me.GridControl2.Name = "GridControl2"
Me.GridControl2.Size = New System.Drawing.Size(915, 302)
Me.GridControl2.TabIndex = 69
Me.GridControl2.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridView3})
'
'GridView3
'
Me.GridView3.GridControl = Me.GridControl2
Me.GridView3.Name = "GridView3"
'
'GridControl3
'
Me.GridControl3.DataSource = Me.TBCW_PROFILE_PROCESSBindingSource
Me.GridControl3.Dock = System.Windows.Forms.DockStyle.Left
Me.GridControl3.Location = New System.Drawing.Point(0, 0)
Me.GridControl3.MainView = Me.GridViewProcessProfile
Me.GridControl3.Name = "GridControl3"
Me.GridControl3.Size = New System.Drawing.Size(192, 635)
Me.GridControl3.TabIndex = 72
Me.GridControl3.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridViewProcessProfile})
'
'TBCW_PROFILE_PROCESSBindingSource
'
Me.TBCW_PROFILE_PROCESSBindingSource.DataMember = "TBCW_PROFILE_PROCESS"
Me.TBCW_PROFILE_PROCESSBindingSource.DataSource = Me.MyDataset
'
'GridViewProcessProfile
'
Me.GridViewProcessProfile.Appearance.EvenRow.BackColor = System.Drawing.Color.Aqua
Me.GridViewProcessProfile.Appearance.EvenRow.Options.UseBackColor = True
Me.GridViewProcessProfile.Columns.AddRange(New DevExpress.XtraGrid.Columns.GridColumn() {Me.colGUID2, Me.colPROC_NAME})
Me.GridViewProcessProfile.GridControl = Me.GridControl3
Me.GridViewProcessProfile.Name = "GridViewProcessProfile"
Me.GridViewProcessProfile.OptionsBehavior.Editable = False
Me.GridViewProcessProfile.OptionsView.ColumnAutoWidth = False
Me.GridViewProcessProfile.OptionsView.EnableAppearanceEvenRow = True
Me.GridViewProcessProfile.OptionsView.ShowAutoFilterRow = True
Me.GridViewProcessProfile.OptionsView.ShowDetailButtons = False
Me.GridViewProcessProfile.OptionsView.ShowGroupPanel = False
Me.GridViewProcessProfile.OptionsView.ShowHorizontalLines = DevExpress.Utils.DefaultBoolean.[True]
Me.GridViewProcessProfile.OptionsView.ShowVerticalLines = DevExpress.Utils.DefaultBoolean.[True]
'
'colGUID2
'
Me.colGUID2.Caption = "ID"
Me.colGUID2.FieldName = "GUID"
Me.colGUID2.Name = "colGUID2"
Me.colGUID2.Width = 43
'
'colPROC_NAME
'
Me.colPROC_NAME.Caption = "Prozess"
Me.colPROC_NAME.FieldName = "PROC_NAME"
Me.colPROC_NAME.Name = "colPROC_NAME"
Me.colPROC_NAME.Visible = True
Me.colPROC_NAME.VisibleIndex = 0
Me.colPROC_NAME.Width = 104
'
'TBCW_PROFILE_PROCESSTableAdapter
'
Me.TBCW_PROFILE_PROCESSTableAdapter.ClearBeforeFill = True
'
'TBCW_PROF_REL_WINDOWTableAdapter
'
Me.TBCW_PROF_REL_WINDOWTableAdapter.ClearBeforeFill = True
'
'Label1
'
Me.Label1.Dock = System.Windows.Forms.DockStyle.Top
Me.Label1.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label1.Location = New System.Drawing.Point(0, 0)
Me.Label1.Name = "Label1"
Me.Label1.Size = New System.Drawing.Size(915, 25)
Me.Label1.TabIndex = 67
Me.Label1.Text = "Zugeordnete Fenster:"
Me.Label1.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
'
'Label2
'
Me.Label2.Dock = System.Windows.Forms.DockStyle.Top
Me.Label2.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label2.Location = New System.Drawing.Point(0, 0)
Me.Label2.Name = "Label2"
Me.Label2.Size = New System.Drawing.Size(915, 25)
Me.Label2.TabIndex = 68
Me.Label2.Text = "Zugeordnete Controls:"
Me.Label2.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
'
'ctrlApplicationAssignment
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.Controls.Add(Me.SplitContainer3)
Me.Controls.Add(Me.GridControl3)
Me.Name = "ctrlApplicationAssignment"
Me.Size = New System.Drawing.Size(1107, 635)
Me.SplitContainer3.Panel1.ResumeLayout(False)
Me.SplitContainer3.Panel2.ResumeLayout(False)
CType(Me.SplitContainer3, System.ComponentModel.ISupportInitialize).EndInit()
Me.SplitContainer3.ResumeLayout(False)
CType(Me.GridControl_Window, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.TBCW_PROF_REL_WINDOWBindingSource, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.MyDataset, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.GridView_Window, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.RepositoryItemRegexEdit, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.RepositoryItemSpinEdit1, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.GridControl2, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.GridView3, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.GridControl3, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.TBCW_PROFILE_PROCESSBindingSource, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.GridViewProcessProfile, System.ComponentModel.ISupportInitialize).EndInit()
Me.ResumeLayout(False)
End Sub
Friend WithEvents SplitContainer3 As SplitContainer
Friend WithEvents GridControl_Window As DevExpress.XtraGrid.GridControl
Friend WithEvents GridView_Window As DevExpress.XtraGrid.Views.Grid.GridView
Friend WithEvents colPROCESS_NAME As DevExpress.XtraGrid.Columns.GridColumn
Friend WithEvents colSEQUENCE As DevExpress.XtraGrid.Columns.GridColumn
Friend WithEvents colDESCRIPTION As DevExpress.XtraGrid.Columns.GridColumn
Friend WithEvents colREGEX As DevExpress.XtraGrid.Columns.GridColumn
Friend WithEvents colREGEX_CLIPBOARD As DevExpress.XtraGrid.Columns.GridColumn
Friend WithEvents GridControl2 As DevExpress.XtraGrid.GridControl
Friend WithEvents GridView3 As DevExpress.XtraGrid.Views.Grid.GridView
Friend WithEvents GridControl3 As DevExpress.XtraGrid.GridControl
Friend WithEvents GridViewProcessProfile As DevExpress.XtraGrid.Views.Grid.GridView
Friend WithEvents colGUID2 As DevExpress.XtraGrid.Columns.GridColumn
Friend WithEvents colPROC_NAME As DevExpress.XtraGrid.Columns.GridColumn
Friend WithEvents TBCW_PROFILE_PROCESSBindingSource As BindingSource
Friend WithEvents TBCW_PROFILE_PROCESSTableAdapter As MyDatasetTableAdapters.TBCW_PROFILE_PROCESSTableAdapter
Friend WithEvents MyDataset As MyDataset
Friend WithEvents TBCW_PROF_REL_WINDOWTableAdapter As MyDatasetTableAdapters.TBCW_PROF_REL_WINDOWTableAdapter
Friend WithEvents TBCW_PROF_REL_WINDOWBindingSource As BindingSource
Friend WithEvents RepositoryItemRegexEdit As DevExpress.XtraEditors.Repository.RepositoryItemButtonEdit
Friend WithEvents colGUID As DevExpress.XtraGrid.Columns.GridColumn
Friend WithEvents RepositoryItemSpinEdit1 As DevExpress.XtraEditors.Repository.RepositoryItemSpinEdit
Friend WithEvents Label1 As Label
Friend WithEvents Label2 As Label
End Class

View File

@ -0,0 +1,141 @@
<?xml version="1.0" encoding="utf-8"?>
<root>
<!--
Microsoft ResX Schema
Version 2.0
The primary goals of this format is to allow a simple XML format
that is mostly human readable. The generation and parsing of the
various data types are done through the TypeConverter classes
associated with the data types.
Example:
... ado.net/XML headers & schema ...
<resheader name="resmimetype">text/microsoft-resx</resheader>
<resheader name="version">2.0</resheader>
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
<value>[base64 mime encoded serialized .NET Framework object]</value>
</data>
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
<comment>This is a comment</comment>
</data>
There are any number of "resheader" rows that contain simple
name/value pairs.
Each data row contains a name, and value. The row also contains a
type or mimetype. Type corresponds to a .NET class that support
text/value conversion through the TypeConverter architecture.
Classes that don't support this are serialized and stored with the
mimetype set.
The mimetype is used for serialized objects, and tells the
ResXResourceReader how to depersist the object. This is currently not
extensible. For a given mimetype the value must be set accordingly:
Note - application/x-microsoft.net.object.binary.base64 is the format
that the ResXResourceWriter will generate, however the reader can
read any of the formats listed below.
mimetype: application/x-microsoft.net.object.binary.base64
value : The object must be serialized with
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
: and then encoded with base64 encoding.
mimetype: application/x-microsoft.net.object.soap.base64
value : The object must be serialized with
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
: and then encoded with base64 encoding.
mimetype: application/x-microsoft.net.object.bytearray.base64
value : The object must be serialized into a byte array
: using a System.ComponentModel.TypeConverter
: and then encoded with base64 encoding.
-->
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
<xsd:element name="root" msdata:IsDataSet="true">
<xsd:complexType>
<xsd:choice maxOccurs="unbounded">
<xsd:element name="metadata">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" />
</xsd:sequence>
<xsd:attribute name="name" use="required" type="xsd:string" />
<xsd:attribute name="type" type="xsd:string" />
<xsd:attribute name="mimetype" type="xsd:string" />
<xsd:attribute ref="xml:space" />
</xsd:complexType>
</xsd:element>
<xsd:element name="assembly">
<xsd:complexType>
<xsd:attribute name="alias" type="xsd:string" />
<xsd:attribute name="name" type="xsd:string" />
</xsd:complexType>
</xsd:element>
<xsd:element name="data">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
<xsd:attribute ref="xml:space" />
</xsd:complexType>
</xsd:element>
<xsd:element name="resheader">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" use="required" />
</xsd:complexType>
</xsd:element>
</xsd:choice>
</xsd:complexType>
</xsd:element>
</xsd:schema>
<resheader name="resmimetype">
<value>text/microsoft-resx</value>
</resheader>
<resheader name="version">
<value>2.0</value>
</resheader>
<resheader name="reader">
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<metadata name="TBCW_PROF_REL_WINDOWBindingSource.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>969, 17</value>
</metadata>
<metadata name="MyDataset.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>558, 12</value>
</metadata>
<metadata name="MyDataset.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>558, 12</value>
</metadata>
<metadata name="TBCW_PROFILE_PROCESSBindingSource.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>20, 10</value>
</metadata>
<metadata name="TBCW_PROFILE_PROCESSTableAdapter.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>295, 12</value>
</metadata>
<metadata name="TBCW_PROF_REL_WINDOWTableAdapter.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>703, 18</value>
</metadata>
<metadata name="$this.TrayHeight" type="System.Int32, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>112</value>
</metadata>
</root>

View File

@ -0,0 +1,183 @@
Imports DD_LIB_Standards
Imports DevExpress.XtraEditors
Imports DevExpress.XtraEditors.Controls
Imports DevExpress.XtraGrid
Imports DevExpress.XtraGrid.Views.Grid
Imports DigitalData.Controls.RegexEditor
Public Class ctrlApplicationAssignment
Private Current_ProfileId As Integer
Private Current_ProcessName As String
Private Sub ctrlApplicationAssignment_Load(sender As Object, e As EventArgs) Handles Me.Load
TBCW_PROFILE_PROCESSTableAdapter.Connection.ConnectionString = MyConnectionString
TBCW_PROF_REL_WINDOWTableAdapter.Connection.ConnectionString = MyConnectionString
AddHandler RepositoryItemRegexEdit.ButtonClick, AddressOf RepositoryItemRegexEdit_Click
End Sub
Public Function Process_Load(ProfileId As Integer) As Boolean
Try
Current_ProfileId = ProfileId
TBCW_PROFILE_PROCESSTableAdapter.Fill(MyDataset.TBCW_PROFILE_PROCESS, ProfileId)
Return True
Catch ex As Exception
Logger.Error(ex)
Return False
End Try
End Function
Public Function Process_CreateAssignment(ProfileId As Integer) As Boolean
Dim oForm As New frmProcessCapture()
Dim oResult = oForm.ShowDialog()
If oResult = DialogResult.OK Then
Try
Dim oWindowTitle As String = GetSQLFriendlyString(oForm.WindowTitle)
Dim oProcessName As String = oForm.ProcessName
If oProcessName <> "" Then
Dim oSQL = String.Format("INSERT INTO TBCW_PROFILE_PROCESS (PROFILE_ID,PROC_NAME,ADDED_WHO) VALUES ({0},'{1}','{2}')", ProfileId, oProcessName, Environment.UserName)
If clsDatabase.Execute_non_Query(oSQL) = False Then
Return False
Else
oSQL = String.Format("INSERT INTO TBCW_PROF_REL_WINDOW (PROFILE_ID, DESCRIPTION, PROCESS_NAME, REGEX, ADDED_WHO) VALUES ({0}, '{1}', '{2}','^{3}$','{4}')", ProfileId, oProcessName, oProcessName, oWindowTitle, Environment.UserName)
If clsDatabase.Execute_non_Query(oSQL) = False Then
Return False
End If
End If
End If
Process_Load(Current_ProfileId)
Return True
Catch ex As Exception
Logger.Error(ex)
Return False
End Try
End If
End Function
Public Function Process_DeleteAssignment() As Boolean
Try
Dim oProcessId = GridViewProcessProfile.GetFocusedRowCellValue(GridViewProcessProfile.Columns("GUID"))
Dim oSQL = String.Format("EXEC PRCW_DELETE_PROCESS {0}", oProcessId)
If clsDatabase.Execute_non_Query(oSQL) Then
Process_Load(Current_ProfileId)
Return True
End If
Return False
Catch ex As Exception
Logger.Error(ex)
Return False
End Try
End Function
Public Function Window_Load() As Boolean
Try
TBCW_PROF_REL_WINDOWTableAdapter.Fill(MyDataset.TBCW_PROF_REL_WINDOW, Current_ProcessName, Current_ProfileId)
Return True
Catch ex As Exception
Logger.Error(ex)
Return False
End Try
End Function
Private Sub RepositoryItemRegexEdit_Click(sender As Object, e As ButtonPressedEventArgs)
Dim oButtonEdit As ButtonEdit = sender
Dim oGridControl As GridControl = oButtonEdit.Parent
Dim oGridView As GridView = oGridControl.FocusedView
Dim oRowHandle As Integer = oGridView.FocusedRowHandle
Dim oForm As New frmRegexEditor(oButtonEdit.EditValue)
If oForm.ShowDialog() = DialogResult.OK Then
oButtonEdit.EditValue = oForm.RegexString
End If
Console.WriteLine()
End Sub
Public Function Window_CreateAssignment(ProfileId As Integer) As Boolean
Dim oForm As New frmProcessCapture()
Dim oResult = oForm.ShowDialog()
If oResult = DialogResult.OK Then
Try
Dim oWindowTitle As String = GetSQLFriendlyString(oForm.WindowTitle)
Dim oProcessName As String = oForm.ProcessName
If oWindowTitle <> "" Then
Dim insert = String.Format("INSERT INTO TBCW_PROF_REL_WINDOW (PROFILE_ID, DESCRIPTION, PROCESS_NAME, REGEX, ADDED_WHO) VALUES ({0}, '{1}', '{2}','^{3}$','{4}')", ProfileId, oProcessName, oProcessName, oWindowTitle, Environment.UserName)
If clsDatabase.Execute_non_Query(insert) = False Then
Return False
End If
End If
Window_Load()
Return True
Catch ex As Exception
Logger.Error(ex)
Return False
End Try
End If
End Function
Public Function Window_DeleteAssignment() As Boolean
Try
Dim oGuid = GridView_Window.GetFocusedRowCellValue(GridView_Window.Columns("GUID"))
Dim oSQL = String.Format("DELETE FROM TBCW_PROF_REL_WINDOW WHERE GUID = {0}", oGuid)
If clsDatabase.Execute_non_Query(oSQL) Then
Process_Load(Current_ProfileId)
Return True
End If
Return False
Catch ex As Exception
Logger.Error(ex)
Return False
End Try
End Function
Public Function Window_SaveAssignment() As Boolean
Try
TBCW_PROF_REL_WINDOWBindingSource.EndEdit()
If Not IsNothing(MyDataset.TBCW_PROF_REL_WINDOW.GetChanges) Then
TBCW_PROF_REL_WINDOWBindingSource.EndEdit()
TBCW_PROF_REL_WINDOWTableAdapter.Update(MyDataset.TBCW_PROF_REL_WINDOW)
End If
Return True
Catch ex As Exception
Logger.Error(ex)
Return False
End Try
End Function
Private Sub GridViewProcessProfile_FocusedRowChanged(sender As Object, e As DevExpress.XtraGrid.Views.Base.FocusedRowChangedEventArgs) Handles GridViewProcessProfile.FocusedRowChanged
If e.FocusedRowHandle < 0 Then
Exit Sub
End If
Dim oSelectedRow As DataRow = GridViewProcessProfile.GetDataRow(e.FocusedRowHandle)
Dim oProcessName As String = oSelectedRow.Item("PROC_NAME")
Current_ProcessName = oProcessName
If Window_Load() = False Then
MsgBox($"Error while loading windows for process {oProcessName}", vbCritical, "")
End If
End Sub
Private Function GetSQLFriendlyString(UnfriendlyString As String) As String
Return UnfriendlyString.
Trim().
Replace(vbNullChar, "")
End Function
Public Class RegexEdit
Inherits BaseEdit
End Class
End Class

View File

@ -55,6 +55,10 @@ Partial Class frmAdministration
Dim CHANGED_WHENLabel2 As System.Windows.Forms.Label
Dim Label7 As System.Windows.Forms.Label
Dim Label8 As System.Windows.Forms.Label
Dim Label12 As System.Windows.Forms.Label
Dim Label11 As System.Windows.Forms.Label
Dim Label4 As System.Windows.Forms.Label
Dim Label3 As System.Windows.Forms.Label
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmAdministration))
Me.btnaddSearch = New System.Windows.Forms.Button()
Me.CHANGED_WHENTextBox = New System.Windows.Forms.TextBox()
@ -96,8 +100,6 @@ Partial Class frmAdministration
Me.OFDWindreamsuche = New System.Windows.Forms.OpenFileDialog()
Me.VWUSER_PROFILETableAdapter = New DD_Clipboard_Watcher.MyDatasetTableAdapters.VWUSER_PROFILETableAdapter()
Me.TimerTest = New System.Windows.Forms.Timer(Me.components)
Me.TBCW_PROFILE_PROCESSBindingSource = New System.Windows.Forms.BindingSource(Me.components)
Me.TBCW_PROFILE_PROCESSTableAdapter = New DD_Clipboard_Watcher.MyDatasetTableAdapters.TBCW_PROFILE_PROCESSTableAdapter()
Me.BackgroundWorker1 = New System.ComponentModel.BackgroundWorker()
Me.lblLicenseDate = New System.Windows.Forms.Label()
Me.lbllicenseCount = New System.Windows.Forms.Label()
@ -112,34 +114,16 @@ Partial Class frmAdministration
Me.PROFILE_TYPEComboBox = New System.Windows.Forms.ComboBox()
Me.TBWH_PROFILE_TYPEBindingSource = New System.Windows.Forms.BindingSource(Me.components)
Me.TabPageProcessAssignment = New DevExpress.XtraTab.XtraTabPage()
Me.BindingNavigator3 = New System.Windows.Forms.BindingNavigator(Me.components)
Me.BindingNavigatorAddNewItem3 = New System.Windows.Forms.ToolStripButton()
Me.TBCW_PROF_REL_WINDOWBindingSource = New System.Windows.Forms.BindingSource(Me.components)
Me.BindingNavigatorCountItem3 = New System.Windows.Forms.ToolStripLabel()
Me.BindingNavigatorDeleteItem3 = New System.Windows.Forms.ToolStripButton()
Me.BindingNavigatorMoveFirstItem3 = New System.Windows.Forms.ToolStripButton()
Me.BindingNavigatorMovePreviousItem3 = New System.Windows.Forms.ToolStripButton()
Me.BindingNavigatorSeparator9 = New System.Windows.Forms.ToolStripSeparator()
Me.BindingNavigatorPositionItem3 = New System.Windows.Forms.ToolStripTextBox()
Me.BindingNavigatorSeparator10 = New System.Windows.Forms.ToolStripSeparator()
Me.BindingNavigatorMoveNextItem3 = New System.Windows.Forms.ToolStripButton()
Me.BindingNavigatorMoveLastItem3 = New System.Windows.Forms.ToolStripButton()
Me.BindingNavigatorSeparator11 = New System.Windows.Forms.ToolStripSeparator()
Me.ToolStripButton7 = New System.Windows.Forms.ToolStripButton()
Me.GridControl1 = New DevExpress.XtraGrid.GridControl()
Me.GridView2 = New DevExpress.XtraGrid.Views.Grid.GridView()
Me.colPROCESS_NAME = New DevExpress.XtraGrid.Columns.GridColumn()
Me.colDESCRIPTION = New DevExpress.XtraGrid.Columns.GridColumn()
Me.colREGEX = New DevExpress.XtraGrid.Columns.GridColumn()
Me.colREGEX_CLIPBOARD = New DevExpress.XtraGrid.Columns.GridColumn()
Me.colSEQUENCE = New DevExpress.XtraGrid.Columns.GridColumn()
Me.GridControl3 = New DevExpress.XtraGrid.GridControl()
Me.GridViewProcessProfile = New DevExpress.XtraGrid.Views.Grid.GridView()
Me.colGUID2 = New DevExpress.XtraGrid.Columns.GridColumn()
Me.colPROC_NAME = New DevExpress.XtraGrid.Columns.GridColumn()
Me.ToolStrip1 = New System.Windows.Forms.ToolStrip()
Me.ToolStripButton5 = New System.Windows.Forms.ToolStripButton()
Me.ToolStripButton6 = New System.Windows.Forms.ToolStripButton()
Me.CtrlApplicationAssignment1 = New DD_Clipboard_Watcher.ctrlApplicationAssignment()
Me.RibbonControl1 = New DevExpress.XtraBars.Ribbon.RibbonControl()
Me.BarButtonProcessAssign = New DevExpress.XtraBars.BarButtonItem()
Me.BarButtonProcessDelete = New DevExpress.XtraBars.BarButtonItem()
Me.BarButtonWindowAssign = New DevExpress.XtraBars.BarButtonItem()
Me.BarButtonWindowDelete = New DevExpress.XtraBars.BarButtonItem()
Me.BarButtonWindowSave = New DevExpress.XtraBars.BarButtonItem()
Me.RibbonPage1 = New DevExpress.XtraBars.Ribbon.RibbonPage()
Me.RibbonPageGroup1 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
Me.RibbonPageGroup2 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
Me.TabPageUserAssignment = New DevExpress.XtraTab.XtraTabPage()
Me.SplitContainer1 = New System.Windows.Forms.SplitContainer()
Me.GridControlUserInProfile = New DevExpress.XtraGrid.GridControl()
@ -233,21 +217,6 @@ Partial Class frmAdministration
Me.TBCW_PROF_DATA_SEARCHTableAdapter = New DD_Clipboard_Watcher.MyDatasetTableAdapters.TBCW_PROF_DATA_SEARCHTableAdapter()
Me.TBCW_PROF_DOC_SEARCHTableAdapter = New DD_Clipboard_Watcher.MyDatasetTableAdapters.TBCW_PROF_DOC_SEARCHTableAdapter()
Me.VWCW_GROUP_PROFILETableAdapter = New DD_Clipboard_Watcher.MyDatasetTableAdapters.VWCW_GROUP_PROFILETableAdapter()
Me.TBCW_PROF_REL_WINDOWTableAdapter = New DD_Clipboard_Watcher.MyDatasetTableAdapters.TBCW_PROF_REL_WINDOWTableAdapter()
Me.GridControl2 = New DevExpress.XtraGrid.GridControl()
Me.GridView3 = New DevExpress.XtraGrid.Views.Grid.GridView()
Me.ToolStripButton4 = New System.Windows.Forms.ToolStripButton()
Me.ToolStripButton8 = New System.Windows.Forms.ToolStripButton()
Me.ToolStripSeparator1 = New System.Windows.Forms.ToolStripSeparator()
Me.SplitContainer3 = New System.Windows.Forms.SplitContainer()
Me.ToolStrip2 = New System.Windows.Forms.ToolStrip()
Me.ToolStripButton9 = New System.Windows.Forms.ToolStripButton()
Me.ToolStripButton10 = New System.Windows.Forms.ToolStripButton()
Me.ToolStripButton11 = New System.Windows.Forms.ToolStripButton()
Me.ToolStripButton12 = New System.Windows.Forms.ToolStripButton()
Me.ToolStripButton13 = New System.Windows.Forms.ToolStripButton()
Me.ToolStripButton14 = New System.Windows.Forms.ToolStripButton()
Me.ToolStripSeparator2 = New System.Windows.Forms.ToolStripSeparator()
GUIDLabel = New System.Windows.Forms.Label()
NAMELabel = New System.Windows.Forms.Label()
COMMENTLabel = New System.Windows.Forms.Label()
@ -280,6 +249,10 @@ Partial Class frmAdministration
CHANGED_WHENLabel2 = New System.Windows.Forms.Label()
Label7 = New System.Windows.Forms.Label()
Label8 = New System.Windows.Forms.Label()
Label12 = New System.Windows.Forms.Label()
Label11 = New System.Windows.Forms.Label()
Label4 = New System.Windows.Forms.Label()
Label3 = New System.Windows.Forms.Label()
CType(Me.TBCW_PROFILESBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.MyDataset, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.GridControlProfiles, System.ComponentModel.ISupportInitialize).BeginInit()
@ -289,7 +262,6 @@ Partial Class frmAdministration
CType(Me.TBWH_UserBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.VWUSER_PROFILEBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
Me.StatusStrip1.SuspendLayout()
CType(Me.TBCW_PROFILE_PROCESSBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
Me.GroupBox5.SuspendLayout()
CType(Me.XtraTabControl2, System.ComponentModel.ISupportInitialize).BeginInit()
Me.XtraTabControl2.SuspendLayout()
@ -299,14 +271,7 @@ Partial Class frmAdministration
Me.TabPageGeneralSettings.SuspendLayout()
CType(Me.TBWH_PROFILE_TYPEBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
Me.TabPageProcessAssignment.SuspendLayout()
CType(Me.BindingNavigator3, System.ComponentModel.ISupportInitialize).BeginInit()
Me.BindingNavigator3.SuspendLayout()
CType(Me.TBCW_PROF_REL_WINDOWBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.GridControl1, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.GridView2, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.GridControl3, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.GridViewProcessProfile, System.ComponentModel.ISupportInitialize).BeginInit()
Me.ToolStrip1.SuspendLayout()
CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).BeginInit()
Me.TabPageUserAssignment.SuspendLayout()
CType(Me.SplitContainer1, System.ComponentModel.ISupportInitialize).BeginInit()
Me.SplitContainer1.Panel1.SuspendLayout()
@ -336,13 +301,6 @@ Partial Class frmAdministration
Me.BindingNavigator2.SuspendLayout()
CType(Me.TBCW_PROF_DOC_SEARCHBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
Me.TabPageBasicSettings.SuspendLayout()
CType(Me.GridControl2, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.GridView3, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.SplitContainer3, System.ComponentModel.ISupportInitialize).BeginInit()
Me.SplitContainer3.Panel1.SuspendLayout()
Me.SplitContainer3.Panel2.SuspendLayout()
Me.SplitContainer3.SuspendLayout()
Me.ToolStrip2.SuspendLayout()
Me.SuspendLayout()
'
'GUIDLabel
@ -399,7 +357,7 @@ Partial Class frmAdministration
'
ADDED_WHOLabel.AutoSize = True
ADDED_WHOLabel.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
ADDED_WHOLabel.Location = New System.Drawing.Point(14, 448)
ADDED_WHOLabel.Location = New System.Drawing.Point(14, 212)
ADDED_WHOLabel.Name = "ADDED_WHOLabel"
ADDED_WHOLabel.Size = New System.Drawing.Size(65, 13)
ADDED_WHOLabel.TabIndex = 10
@ -409,7 +367,7 @@ Partial Class frmAdministration
'
ADDED_WHENLabel.AutoSize = True
ADDED_WHENLabel.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
ADDED_WHENLabel.Location = New System.Drawing.Point(167, 448)
ADDED_WHENLabel.Location = New System.Drawing.Point(167, 212)
ADDED_WHENLabel.Name = "ADDED_WHENLabel"
ADDED_WHENLabel.Size = New System.Drawing.Size(73, 13)
ADDED_WHENLabel.TabIndex = 12
@ -419,7 +377,7 @@ Partial Class frmAdministration
'
CHANGED_WHOLabel.AutoSize = True
CHANGED_WHOLabel.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
CHANGED_WHOLabel.Location = New System.Drawing.Point(14, 488)
CHANGED_WHOLabel.Location = New System.Drawing.Point(14, 252)
CHANGED_WHOLabel.Name = "CHANGED_WHOLabel"
CHANGED_WHOLabel.Size = New System.Drawing.Size(77, 13)
CHANGED_WHOLabel.TabIndex = 14
@ -429,7 +387,7 @@ Partial Class frmAdministration
'
CHANGED_WHENLabel.AutoSize = True
CHANGED_WHENLabel.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
CHANGED_WHENLabel.Location = New System.Drawing.Point(167, 488)
CHANGED_WHENLabel.Location = New System.Drawing.Point(167, 252)
CHANGED_WHENLabel.Name = "CHANGED_WHENLabel"
CHANGED_WHENLabel.Size = New System.Drawing.Size(85, 13)
CHANGED_WHENLabel.TabIndex = 16
@ -642,6 +600,62 @@ Partial Class frmAdministration
Label8.TabIndex = 23
Label8.Text = "SQL für Ergebnis Zählung:"
'
'Label12
'
Label12.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Label12.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Label12.Image = Global.DD_Clipboard_Watcher.My.Resources.Resources.StatusAnnotations_Information_16xMD_color
Label12.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
Label12.Location = New System.Drawing.Point(681, 41)
Label12.Name = "Label12"
Label12.Size = New System.Drawing.Size(362, 13)
Label12.TabIndex = 24
Label12.Text = "@CLIPBOARD wird mit dem aktuellen Inhalt der Zwischenablage ersetzt"
Label12.TextAlign = System.Drawing.ContentAlignment.TopRight
'
'Label11
'
Label11.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Label11.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Label11.Image = Global.DD_Clipboard_Watcher.My.Resources.Resources.StatusAnnotations_Information_16xMD_color
Label11.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
Label11.Location = New System.Drawing.Point(681, 313)
Label11.Name = "Label11"
Label11.Size = New System.Drawing.Size(362, 13)
Label11.TabIndex = 24
Label11.Text = "@CLIPBOARD wird mit dem aktuellen Inhalt der Zwischenablage ersetzt"
Label11.TextAlign = System.Drawing.ContentAlignment.TopRight
'
'Label4
'
Label4.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Label4.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Label4.Image = Global.DD_Clipboard_Watcher.My.Resources.Resources.StatusAnnotations_Information_16xMD_color
Label4.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
Label4.Location = New System.Drawing.Point(681, 41)
Label4.Name = "Label4"
Label4.Size = New System.Drawing.Size(362, 13)
Label4.TabIndex = 25
Label4.Text = "@CLIPBOARD wird mit dem aktuellen Inhalt der Zwischenablage ersetzt"
Label4.TextAlign = System.Drawing.ContentAlignment.TopRight
'
'Label3
'
Label3.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Label3.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Label3.Image = Global.DD_Clipboard_Watcher.My.Resources.Resources.StatusAnnotations_Information_16xMD_color
Label3.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
Label3.Location = New System.Drawing.Point(681, 313)
Label3.Name = "Label3"
Label3.Size = New System.Drawing.Size(362, 13)
Label3.TabIndex = 25
Label3.Text = "@CLIPBOARD wird mit dem aktuellen Inhalt der Zwischenablage ersetzt"
Label3.TextAlign = System.Drawing.ContentAlignment.TopRight
'
'btnaddSearch
'
Me.btnaddSearch.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
@ -656,7 +670,7 @@ Partial Class frmAdministration
'
Me.CHANGED_WHENTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBCW_PROFILESBindingSource, "CHANGED_WHEN", True))
Me.CHANGED_WHENTextBox.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.CHANGED_WHENTextBox.Location = New System.Drawing.Point(170, 504)
Me.CHANGED_WHENTextBox.Location = New System.Drawing.Point(170, 268)
Me.CHANGED_WHENTextBox.Name = "CHANGED_WHENTextBox"
Me.CHANGED_WHENTextBox.ReadOnly = True
Me.CHANGED_WHENTextBox.Size = New System.Drawing.Size(127, 21)
@ -676,7 +690,7 @@ Partial Class frmAdministration
'
Me.CHANGED_WHOTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBCW_PROFILESBindingSource, "CHANGED_WHO", True))
Me.CHANGED_WHOTextBox.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.CHANGED_WHOTextBox.Location = New System.Drawing.Point(17, 504)
Me.CHANGED_WHOTextBox.Location = New System.Drawing.Point(17, 268)
Me.CHANGED_WHOTextBox.Name = "CHANGED_WHOTextBox"
Me.CHANGED_WHOTextBox.ReadOnly = True
Me.CHANGED_WHOTextBox.Size = New System.Drawing.Size(147, 21)
@ -686,7 +700,7 @@ Partial Class frmAdministration
'
Me.ADDED_WHENTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBCW_PROFILESBindingSource, "ADDED_WHEN", True))
Me.ADDED_WHENTextBox.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.ADDED_WHENTextBox.Location = New System.Drawing.Point(170, 464)
Me.ADDED_WHENTextBox.Location = New System.Drawing.Point(170, 228)
Me.ADDED_WHENTextBox.Name = "ADDED_WHENTextBox"
Me.ADDED_WHENTextBox.ReadOnly = True
Me.ADDED_WHENTextBox.Size = New System.Drawing.Size(127, 21)
@ -696,7 +710,7 @@ Partial Class frmAdministration
'
Me.ADDED_WHOTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBCW_PROFILESBindingSource, "ADDED_WHO", True))
Me.ADDED_WHOTextBox.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.ADDED_WHOTextBox.Location = New System.Drawing.Point(17, 464)
Me.ADDED_WHOTextBox.Location = New System.Drawing.Point(17, 228)
Me.ADDED_WHOTextBox.Name = "ADDED_WHOTextBox"
Me.ADDED_WHOTextBox.ReadOnly = True
Me.ADDED_WHOTextBox.Size = New System.Drawing.Size(147, 21)
@ -980,15 +994,6 @@ Partial Class frmAdministration
'
Me.TimerTest.Interval = 1000
'
'TBCW_PROFILE_PROCESSBindingSource
'
Me.TBCW_PROFILE_PROCESSBindingSource.DataMember = "TBCW_PROFILE_PROCESS"
Me.TBCW_PROFILE_PROCESSBindingSource.DataSource = Me.MyDataset
'
'TBCW_PROFILE_PROCESSTableAdapter
'
Me.TBCW_PROFILE_PROCESSTableAdapter.ClearBeforeFill = True
'
'lblLicenseDate
'
Me.lblLicenseDate.AutoSize = True
@ -1122,249 +1127,95 @@ Partial Class frmAdministration
'
'TabPageProcessAssignment
'
Me.TabPageProcessAssignment.Controls.Add(Me.SplitContainer3)
Me.TabPageProcessAssignment.Controls.Add(Me.BindingNavigator3)
Me.TabPageProcessAssignment.Controls.Add(Me.GridControl3)
Me.TabPageProcessAssignment.Controls.Add(Me.ToolStrip1)
Me.TabPageProcessAssignment.Controls.Add(Me.CtrlApplicationAssignment1)
Me.TabPageProcessAssignment.Controls.Add(Me.RibbonControl1)
Me.TabPageProcessAssignment.Name = "TabPageProcessAssignment"
Me.TabPageProcessAssignment.Size = New System.Drawing.Size(1046, 535)
Me.TabPageProcessAssignment.Text = "Prozess Zuordnung"
Me.TabPageProcessAssignment.Text = "Anwendungs Zuordnung"
'
'BindingNavigator3
'CtrlApplicationAssignment1
'
Me.BindingNavigator3.AddNewItem = Me.BindingNavigatorAddNewItem3
Me.BindingNavigator3.BindingSource = Me.TBCW_PROF_REL_WINDOWBindingSource
Me.BindingNavigator3.CountItem = Me.BindingNavigatorCountItem3
Me.BindingNavigator3.DeleteItem = Me.BindingNavigatorDeleteItem3
Me.BindingNavigator3.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.BindingNavigatorMoveFirstItem3, Me.BindingNavigatorMovePreviousItem3, Me.BindingNavigatorSeparator9, Me.BindingNavigatorPositionItem3, Me.BindingNavigatorCountItem3, Me.BindingNavigatorSeparator10, Me.BindingNavigatorMoveNextItem3, Me.BindingNavigatorMoveLastItem3, Me.BindingNavigatorSeparator11, Me.BindingNavigatorAddNewItem3, Me.BindingNavigatorDeleteItem3, Me.ToolStripButton7, Me.ToolStripButton8, Me.ToolStripButton4})
Me.BindingNavigator3.Location = New System.Drawing.Point(192, 25)
Me.BindingNavigator3.MoveFirstItem = Me.BindingNavigatorMoveFirstItem3
Me.BindingNavigator3.MoveLastItem = Me.BindingNavigatorMoveLastItem3
Me.BindingNavigator3.MoveNextItem = Me.BindingNavigatorMoveNextItem3
Me.BindingNavigator3.MovePreviousItem = Me.BindingNavigatorMovePreviousItem3
Me.BindingNavigator3.Name = "BindingNavigator3"
Me.BindingNavigator3.PositionItem = Me.BindingNavigatorPositionItem3
Me.BindingNavigator3.Size = New System.Drawing.Size(854, 25)
Me.BindingNavigator3.TabIndex = 68
Me.BindingNavigator3.Text = "BindingNavigator3"
Me.CtrlApplicationAssignment1.Dock = System.Windows.Forms.DockStyle.Fill
Me.CtrlApplicationAssignment1.Location = New System.Drawing.Point(0, 95)
Me.CtrlApplicationAssignment1.Name = "CtrlApplicationAssignment1"
Me.CtrlApplicationAssignment1.Size = New System.Drawing.Size(1046, 440)
Me.CtrlApplicationAssignment1.TabIndex = 2
'
'BindingNavigatorAddNewItem3
'RibbonControl1
'
Me.BindingNavigatorAddNewItem3.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
Me.BindingNavigatorAddNewItem3.Image = CType(resources.GetObject("BindingNavigatorAddNewItem3.Image"), System.Drawing.Image)
Me.BindingNavigatorAddNewItem3.Name = "BindingNavigatorAddNewItem3"
Me.BindingNavigatorAddNewItem3.RightToLeftAutoMirrorImage = True
Me.BindingNavigatorAddNewItem3.Size = New System.Drawing.Size(23, 22)
Me.BindingNavigatorAddNewItem3.Text = "Neu hinzufügen"
Me.RibbonControl1.ExpandCollapseItem.Id = 0
Me.RibbonControl1.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.RibbonControl1.ExpandCollapseItem, Me.BarButtonProcessAssign, Me.BarButtonProcessDelete, Me.BarButtonWindowAssign, Me.BarButtonWindowDelete, Me.BarButtonWindowSave})
Me.RibbonControl1.Location = New System.Drawing.Point(0, 0)
Me.RibbonControl1.MaxItemId = 6
Me.RibbonControl1.Name = "RibbonControl1"
Me.RibbonControl1.Pages.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPage() {Me.RibbonPage1})
Me.RibbonControl1.ShowApplicationButton = DevExpress.Utils.DefaultBoolean.[False]
Me.RibbonControl1.ShowPageHeadersMode = DevExpress.XtraBars.Ribbon.ShowPageHeadersMode.Hide
Me.RibbonControl1.ShowToolbarCustomizeItem = False
Me.RibbonControl1.Size = New System.Drawing.Size(1046, 95)
Me.RibbonControl1.Toolbar.ShowCustomizeItem = False
Me.RibbonControl1.ToolbarLocation = DevExpress.XtraBars.Ribbon.RibbonQuickAccessToolbarLocation.Hidden
'
'TBCW_PROF_REL_WINDOWBindingSource
'BarButtonProcessAssign
'
Me.TBCW_PROF_REL_WINDOWBindingSource.AllowNew = True
Me.TBCW_PROF_REL_WINDOWBindingSource.DataMember = "TBCW_PROF_REL_WINDOW"
Me.TBCW_PROF_REL_WINDOWBindingSource.DataSource = Me.MyDataset
Me.BarButtonProcessAssign.Caption = "Zuordnen"
Me.BarButtonProcessAssign.Id = 1
Me.BarButtonProcessAssign.ImageOptions.Image = CType(resources.GetObject("BarButtonProcessAssign.ImageOptions.Image"), System.Drawing.Image)
Me.BarButtonProcessAssign.ImageOptions.LargeImage = CType(resources.GetObject("BarButtonProcessAssign.ImageOptions.LargeImage"), System.Drawing.Image)
Me.BarButtonProcessAssign.Name = "BarButtonProcessAssign"
'
'BindingNavigatorCountItem3
'BarButtonProcessDelete
'
Me.BindingNavigatorCountItem3.Name = "BindingNavigatorCountItem3"
Me.BindingNavigatorCountItem3.Size = New System.Drawing.Size(44, 22)
Me.BindingNavigatorCountItem3.Text = "von {0}"
Me.BindingNavigatorCountItem3.ToolTipText = "Die Gesamtanzahl der Elemente."
Me.BarButtonProcessDelete.Caption = "Zuordnung löschen"
Me.BarButtonProcessDelete.Id = 2
Me.BarButtonProcessDelete.ImageOptions.Image = CType(resources.GetObject("BarButtonProcessDelete.ImageOptions.Image"), System.Drawing.Image)
Me.BarButtonProcessDelete.ImageOptions.LargeImage = CType(resources.GetObject("BarButtonProcessDelete.ImageOptions.LargeImage"), System.Drawing.Image)
Me.BarButtonProcessDelete.Name = "BarButtonProcessDelete"
'
'BindingNavigatorDeleteItem3
'BarButtonWindowAssign
'
Me.BindingNavigatorDeleteItem3.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
Me.BindingNavigatorDeleteItem3.Image = CType(resources.GetObject("BindingNavigatorDeleteItem3.Image"), System.Drawing.Image)
Me.BindingNavigatorDeleteItem3.Name = "BindingNavigatorDeleteItem3"
Me.BindingNavigatorDeleteItem3.RightToLeftAutoMirrorImage = True
Me.BindingNavigatorDeleteItem3.Size = New System.Drawing.Size(23, 22)
Me.BindingNavigatorDeleteItem3.Text = "Löschen"
Me.BarButtonWindowAssign.Caption = "Zuordnen"
Me.BarButtonWindowAssign.Id = 3
Me.BarButtonWindowAssign.ImageOptions.Image = CType(resources.GetObject("BarButtonWindowAssign.ImageOptions.Image"), System.Drawing.Image)
Me.BarButtonWindowAssign.ImageOptions.LargeImage = CType(resources.GetObject("BarButtonWindowAssign.ImageOptions.LargeImage"), System.Drawing.Image)
Me.BarButtonWindowAssign.Name = "BarButtonWindowAssign"
'
'BindingNavigatorMoveFirstItem3
'BarButtonWindowDelete
'
Me.BindingNavigatorMoveFirstItem3.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
Me.BindingNavigatorMoveFirstItem3.Image = CType(resources.GetObject("BindingNavigatorMoveFirstItem3.Image"), System.Drawing.Image)
Me.BindingNavigatorMoveFirstItem3.Name = "BindingNavigatorMoveFirstItem3"
Me.BindingNavigatorMoveFirstItem3.RightToLeftAutoMirrorImage = True
Me.BindingNavigatorMoveFirstItem3.Size = New System.Drawing.Size(23, 22)
Me.BindingNavigatorMoveFirstItem3.Text = "Erste verschieben"
Me.BarButtonWindowDelete.Caption = "Zuordnung löschen"
Me.BarButtonWindowDelete.Id = 4
Me.BarButtonWindowDelete.ImageOptions.Image = CType(resources.GetObject("BarButtonWindowDelete.ImageOptions.Image"), System.Drawing.Image)
Me.BarButtonWindowDelete.ImageOptions.LargeImage = CType(resources.GetObject("BarButtonWindowDelete.ImageOptions.LargeImage"), System.Drawing.Image)
Me.BarButtonWindowDelete.Name = "BarButtonWindowDelete"
'
'BindingNavigatorMovePreviousItem3
'BarButtonWindowSave
'
Me.BindingNavigatorMovePreviousItem3.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
Me.BindingNavigatorMovePreviousItem3.Image = CType(resources.GetObject("BindingNavigatorMovePreviousItem3.Image"), System.Drawing.Image)
Me.BindingNavigatorMovePreviousItem3.Name = "BindingNavigatorMovePreviousItem3"
Me.BindingNavigatorMovePreviousItem3.RightToLeftAutoMirrorImage = True
Me.BindingNavigatorMovePreviousItem3.Size = New System.Drawing.Size(23, 22)
Me.BindingNavigatorMovePreviousItem3.Text = "Vorherige verschieben"
Me.BarButtonWindowSave.Caption = "Speichern"
Me.BarButtonWindowSave.Id = 5
Me.BarButtonWindowSave.ImageOptions.Image = CType(resources.GetObject("BarButtonWindowSave.ImageOptions.Image"), System.Drawing.Image)
Me.BarButtonWindowSave.ImageOptions.LargeImage = CType(resources.GetObject("BarButtonWindowSave.ImageOptions.LargeImage"), System.Drawing.Image)
Me.BarButtonWindowSave.Name = "BarButtonWindowSave"
'
'BindingNavigatorSeparator9
'RibbonPage1
'
Me.BindingNavigatorSeparator9.Name = "BindingNavigatorSeparator9"
Me.BindingNavigatorSeparator9.Size = New System.Drawing.Size(6, 25)
Me.RibbonPage1.Groups.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageGroup() {Me.RibbonPageGroup1, Me.RibbonPageGroup2})
Me.RibbonPage1.Name = "RibbonPage1"
Me.RibbonPage1.Text = "Anwendungszuordnung"
'
'BindingNavigatorPositionItem3
'RibbonPageGroup1
'
Me.BindingNavigatorPositionItem3.AccessibleName = "Position"
Me.BindingNavigatorPositionItem3.AutoSize = False
Me.BindingNavigatorPositionItem3.Name = "BindingNavigatorPositionItem3"
Me.BindingNavigatorPositionItem3.Size = New System.Drawing.Size(50, 23)
Me.BindingNavigatorPositionItem3.Text = "0"
Me.BindingNavigatorPositionItem3.ToolTipText = "Aktuelle Position"
Me.RibbonPageGroup1.ItemLinks.Add(Me.BarButtonProcessAssign)
Me.RibbonPageGroup1.ItemLinks.Add(Me.BarButtonProcessDelete)
Me.RibbonPageGroup1.Name = "RibbonPageGroup1"
Me.RibbonPageGroup1.Text = "Prozess Zuordnung"
'
'BindingNavigatorSeparator10
'RibbonPageGroup2
'
Me.BindingNavigatorSeparator10.Name = "BindingNavigatorSeparator10"
Me.BindingNavigatorSeparator10.Size = New System.Drawing.Size(6, 25)
'
'BindingNavigatorMoveNextItem3
'
Me.BindingNavigatorMoveNextItem3.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
Me.BindingNavigatorMoveNextItem3.Image = CType(resources.GetObject("BindingNavigatorMoveNextItem3.Image"), System.Drawing.Image)
Me.BindingNavigatorMoveNextItem3.Name = "BindingNavigatorMoveNextItem3"
Me.BindingNavigatorMoveNextItem3.RightToLeftAutoMirrorImage = True
Me.BindingNavigatorMoveNextItem3.Size = New System.Drawing.Size(23, 22)
Me.BindingNavigatorMoveNextItem3.Text = "Nächste verschieben"
'
'BindingNavigatorMoveLastItem3
'
Me.BindingNavigatorMoveLastItem3.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
Me.BindingNavigatorMoveLastItem3.Image = CType(resources.GetObject("BindingNavigatorMoveLastItem3.Image"), System.Drawing.Image)
Me.BindingNavigatorMoveLastItem3.Name = "BindingNavigatorMoveLastItem3"
Me.BindingNavigatorMoveLastItem3.RightToLeftAutoMirrorImage = True
Me.BindingNavigatorMoveLastItem3.Size = New System.Drawing.Size(23, 22)
Me.BindingNavigatorMoveLastItem3.Text = "Letzte verschieben"
'
'BindingNavigatorSeparator11
'
Me.BindingNavigatorSeparator11.Name = "BindingNavigatorSeparator11"
Me.BindingNavigatorSeparator11.Size = New System.Drawing.Size(6, 25)
'
'ToolStripButton7
'
Me.ToolStripButton7.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
Me.ToolStripButton7.Image = CType(resources.GetObject("ToolStripButton7.Image"), System.Drawing.Image)
Me.ToolStripButton7.Name = "ToolStripButton7"
Me.ToolStripButton7.Size = New System.Drawing.Size(23, 22)
Me.ToolStripButton7.Text = "Daten speichern"
'
'GridControl1
'
Me.GridControl1.DataSource = Me.TBCW_PROF_REL_WINDOWBindingSource
Me.GridControl1.Dock = System.Windows.Forms.DockStyle.Fill
Me.GridControl1.Location = New System.Drawing.Point(0, 0)
Me.GridControl1.MainView = Me.GridView2
Me.GridControl1.Name = "GridControl1"
Me.GridControl1.Size = New System.Drawing.Size(284, 485)
Me.GridControl1.TabIndex = 66
Me.GridControl1.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridView2})
'
'GridView2
'
Me.GridView2.Columns.AddRange(New DevExpress.XtraGrid.Columns.GridColumn() {Me.colPROCESS_NAME, Me.colSEQUENCE, Me.colDESCRIPTION, Me.colREGEX, Me.colREGEX_CLIPBOARD})
Me.GridView2.GridControl = Me.GridControl1
Me.GridView2.Name = "GridView2"
'
'colPROCESS_NAME
'
Me.colPROCESS_NAME.FieldName = "PROCESS_NAME"
Me.colPROCESS_NAME.Name = "colPROCESS_NAME"
'
'colDESCRIPTION
'
Me.colDESCRIPTION.FieldName = "DESCRIPTION"
Me.colDESCRIPTION.Name = "colDESCRIPTION"
Me.colDESCRIPTION.Visible = True
Me.colDESCRIPTION.VisibleIndex = 1
'
'colREGEX
'
Me.colREGEX.FieldName = "REGEX"
Me.colREGEX.Name = "colREGEX"
Me.colREGEX.Visible = True
Me.colREGEX.VisibleIndex = 2
'
'colREGEX_CLIPBOARD
'
Me.colREGEX_CLIPBOARD.FieldName = "REGEX_CLIPBOARD"
Me.colREGEX_CLIPBOARD.Name = "colREGEX_CLIPBOARD"
Me.colREGEX_CLIPBOARD.Visible = True
Me.colREGEX_CLIPBOARD.VisibleIndex = 3
'
'colSEQUENCE
'
Me.colSEQUENCE.FieldName = "SEQUENCE"
Me.colSEQUENCE.Name = "colSEQUENCE"
Me.colSEQUENCE.Visible = True
Me.colSEQUENCE.VisibleIndex = 0
'
'GridControl3
'
Me.GridControl3.DataSource = Me.TBCW_PROFILE_PROCESSBindingSource
Me.GridControl3.Dock = System.Windows.Forms.DockStyle.Left
Me.GridControl3.Location = New System.Drawing.Point(0, 25)
Me.GridControl3.MainView = Me.GridViewProcessProfile
Me.GridControl3.Name = "GridControl3"
Me.GridControl3.Size = New System.Drawing.Size(192, 510)
Me.GridControl3.TabIndex = 20
Me.GridControl3.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridViewProcessProfile})
'
'GridViewProcessProfile
'
Me.GridViewProcessProfile.Appearance.EvenRow.BackColor = System.Drawing.Color.Aqua
Me.GridViewProcessProfile.Appearance.EvenRow.Options.UseBackColor = True
Me.GridViewProcessProfile.Columns.AddRange(New DevExpress.XtraGrid.Columns.GridColumn() {Me.colGUID2, Me.colPROC_NAME})
Me.GridViewProcessProfile.GridControl = Me.GridControl3
Me.GridViewProcessProfile.Name = "GridViewProcessProfile"
Me.GridViewProcessProfile.OptionsBehavior.Editable = False
Me.GridViewProcessProfile.OptionsView.ColumnAutoWidth = False
Me.GridViewProcessProfile.OptionsView.EnableAppearanceEvenRow = True
Me.GridViewProcessProfile.OptionsView.ShowAutoFilterRow = True
Me.GridViewProcessProfile.OptionsView.ShowDetailButtons = False
Me.GridViewProcessProfile.OptionsView.ShowGroupPanel = False
Me.GridViewProcessProfile.OptionsView.ShowHorizontalLines = DevExpress.Utils.DefaultBoolean.[True]
Me.GridViewProcessProfile.OptionsView.ShowVerticalLines = DevExpress.Utils.DefaultBoolean.[True]
'
'colGUID2
'
Me.colGUID2.Caption = "ID"
Me.colGUID2.FieldName = "GUID"
Me.colGUID2.Name = "colGUID2"
Me.colGUID2.Width = 43
'
'colPROC_NAME
'
Me.colPROC_NAME.Caption = "Prozess"
Me.colPROC_NAME.FieldName = "PROC_NAME"
Me.colPROC_NAME.Name = "colPROC_NAME"
Me.colPROC_NAME.Visible = True
Me.colPROC_NAME.VisibleIndex = 0
Me.colPROC_NAME.Width = 104
'
'ToolStrip1
'
Me.ToolStrip1.GripStyle = System.Windows.Forms.ToolStripGripStyle.Hidden
Me.ToolStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ToolStripButton6, Me.ToolStripButton5, Me.ToolStripSeparator1, Me.ToolStripButton11, Me.ToolStripButton13, Me.ToolStripSeparator2, Me.ToolStripButton12, Me.ToolStripButton14})
Me.ToolStrip1.Location = New System.Drawing.Point(0, 0)
Me.ToolStrip1.Name = "ToolStrip1"
Me.ToolStrip1.Size = New System.Drawing.Size(1046, 25)
Me.ToolStrip1.TabIndex = 65
Me.ToolStrip1.Text = "ToolStrip1"
'
'ToolStripButton5
'
Me.ToolStripButton5.Image = Global.DD_Clipboard_Watcher.My.Resources.Resources.cancel
Me.ToolStripButton5.ImageTransparentColor = System.Drawing.Color.Magenta
Me.ToolStripButton5.Name = "ToolStripButton5"
Me.ToolStripButton5.Size = New System.Drawing.Size(171, 22)
Me.ToolStripButton5.Text = "Lösche Prozess-Zuordnung"
'
'ToolStripButton6
'
Me.ToolStripButton6.Image = Global.DD_Clipboard_Watcher.My.Resources.Resources.application_go
Me.ToolStripButton6.ImageTransparentColor = System.Drawing.Color.Magenta
Me.ToolStripButton6.Name = "ToolStripButton6"
Me.ToolStripButton6.Size = New System.Drawing.Size(153, 22)
Me.ToolStripButton6.Text = "Prozess Auswahl starten"
Me.RibbonPageGroup2.ItemLinks.Add(Me.BarButtonWindowAssign)
Me.RibbonPageGroup2.ItemLinks.Add(Me.BarButtonWindowDelete)
Me.RibbonPageGroup2.ItemLinks.Add(Me.BarButtonWindowSave)
Me.RibbonPageGroup2.Name = "RibbonPageGroup2"
Me.RibbonPageGroup2.Text = "Fenster Zuordnung"
'
'TabPageUserAssignment
'
@ -1661,6 +1512,8 @@ Partial Class frmAdministration
'
'GridViewGroupInProfile
'
Me.GridViewGroupInProfile.Appearance.EvenRow.BackColor = System.Drawing.Color.Aqua
Me.GridViewGroupInProfile.Appearance.EvenRow.Options.UseBackColor = True
Me.GridViewGroupInProfile.Columns.AddRange(New DevExpress.XtraGrid.Columns.GridColumn() {Me.colGUID3, Me.colNAME2})
Me.GridViewGroupInProfile.GridControl = Me.GridControlGroupInProfile
Me.GridViewGroupInProfile.Name = "GridViewGroupInProfile"
@ -1668,6 +1521,7 @@ Partial Class frmAdministration
Me.GridViewGroupInProfile.OptionsBehavior.ReadOnly = True
Me.GridViewGroupInProfile.OptionsSelection.MultiSelect = True
Me.GridViewGroupInProfile.OptionsSelection.MultiSelectMode = DevExpress.XtraGrid.Views.Grid.GridMultiSelectMode.CheckBoxRowSelect
Me.GridViewGroupInProfile.OptionsView.ShowGroupPanel = False
'
'colGUID3
'
@ -1725,6 +1579,7 @@ Partial Class frmAdministration
Me.GridViewGroupNotInProfile.OptionsBehavior.ReadOnly = True
Me.GridViewGroupNotInProfile.OptionsSelection.MultiSelect = True
Me.GridViewGroupNotInProfile.OptionsSelection.MultiSelectMode = DevExpress.XtraGrid.Views.Grid.GridMultiSelectMode.CheckBoxRowSelect
Me.GridViewGroupNotInProfile.OptionsView.ShowGroupPanel = False
'
'colID1
'
@ -1758,6 +1613,8 @@ Partial Class frmAdministration
'
'TabPageData
'
Me.TabPageData.Controls.Add(Label3)
Me.TabPageData.Controls.Add(Label4)
Me.TabPageData.Controls.Add(Me.BindingNavigator1)
Me.TabPageData.Controls.Add(GUIDLabel1)
Me.TabPageData.Controls.Add(Me.GUIDTextBox1)
@ -1942,7 +1799,7 @@ Partial Class frmAdministration
Me.TextBox1.Multiline = True
Me.TextBox1.Name = "TextBox1"
Me.TextBox1.ScrollBars = System.Windows.Forms.ScrollBars.Vertical
Me.TextBox1.Size = New System.Drawing.Size(724, 203)
Me.TextBox1.Size = New System.Drawing.Size(724, 124)
Me.TextBox1.TabIndex = 7
'
'SQL_COMMANDTextBox
@ -2022,6 +1879,8 @@ Partial Class frmAdministration
'
'TabPageDocuments
'
Me.TabPageDocuments.Controls.Add(Label11)
Me.TabPageDocuments.Controls.Add(Label12)
Me.TabPageDocuments.Controls.Add(Label8)
Me.TabPageDocuments.Controls.Add(Me.BindingNavigator2)
Me.TabPageDocuments.Controls.Add(GUIDLabel2)
@ -2203,7 +2062,7 @@ Partial Class frmAdministration
Me.TextBox2.Multiline = True
Me.TextBox2.Name = "TextBox2"
Me.TextBox2.ScrollBars = System.Windows.Forms.ScrollBars.Vertical
Me.TextBox2.Size = New System.Drawing.Size(724, 203)
Me.TextBox2.Size = New System.Drawing.Size(724, 124)
Me.TextBox2.TabIndex = 7
'
'SQL_COMMANDTextBox1
@ -2300,127 +2159,6 @@ Partial Class frmAdministration
'
Me.VWCW_GROUP_PROFILETableAdapter.ClearBeforeFill = True
'
'TBCW_PROF_REL_WINDOWTableAdapter
'
Me.TBCW_PROF_REL_WINDOWTableAdapter.ClearBeforeFill = True
'
'GridControl2
'
Me.GridControl2.Dock = System.Windows.Forms.DockStyle.Fill
Me.GridControl2.Location = New System.Drawing.Point(0, 25)
Me.GridControl2.MainView = Me.GridView3
Me.GridControl2.Name = "GridControl2"
Me.GridControl2.Size = New System.Drawing.Size(566, 460)
Me.GridControl2.TabIndex = 69
Me.GridControl2.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridView3})
'
'GridView3
'
Me.GridView3.GridControl = Me.GridControl2
Me.GridView3.Name = "GridView3"
'
'ToolStripButton4
'
Me.ToolStripButton4.Image = Global.DD_Clipboard_Watcher.My.Resources.Resources.cancel
Me.ToolStripButton4.ImageTransparentColor = System.Drawing.Color.Magenta
Me.ToolStripButton4.Name = "ToolStripButton4"
Me.ToolStripButton4.Size = New System.Drawing.Size(170, 22)
Me.ToolStripButton4.Text = "Lösche Fenster-Zuordnung"
'
'ToolStripButton8
'
Me.ToolStripButton8.Image = Global.DD_Clipboard_Watcher.My.Resources.Resources.application_go
Me.ToolStripButton8.ImageTransparentColor = System.Drawing.Color.Magenta
Me.ToolStripButton8.Name = "ToolStripButton8"
Me.ToolStripButton8.Size = New System.Drawing.Size(152, 22)
Me.ToolStripButton8.Text = "Fenster Auswahl starten"
'
'ToolStripSeparator1
'
Me.ToolStripSeparator1.Name = "ToolStripSeparator1"
Me.ToolStripSeparator1.Size = New System.Drawing.Size(6, 25)
'
'SplitContainer3
'
Me.SplitContainer3.Dock = System.Windows.Forms.DockStyle.Fill
Me.SplitContainer3.Location = New System.Drawing.Point(192, 50)
Me.SplitContainer3.Name = "SplitContainer3"
'
'SplitContainer3.Panel1
'
Me.SplitContainer3.Panel1.Controls.Add(Me.GridControl1)
'
'SplitContainer3.Panel2
'
Me.SplitContainer3.Panel2.Controls.Add(Me.GridControl2)
Me.SplitContainer3.Panel2.Controls.Add(Me.ToolStrip2)
Me.SplitContainer3.Size = New System.Drawing.Size(854, 485)
Me.SplitContainer3.SplitterDistance = 284
Me.SplitContainer3.TabIndex = 70
'
'ToolStrip2
'
Me.ToolStrip2.GripStyle = System.Windows.Forms.ToolStripGripStyle.Hidden
Me.ToolStrip2.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ToolStripButton9, Me.ToolStripButton10})
Me.ToolStrip2.Location = New System.Drawing.Point(0, 0)
Me.ToolStrip2.Name = "ToolStrip2"
Me.ToolStrip2.Size = New System.Drawing.Size(566, 25)
Me.ToolStrip2.TabIndex = 70
Me.ToolStrip2.Text = "ToolStrip2"
'
'ToolStripButton9
'
Me.ToolStripButton9.Image = Global.DD_Clipboard_Watcher.My.Resources.Resources.application_go
Me.ToolStripButton9.ImageTransparentColor = System.Drawing.Color.Magenta
Me.ToolStripButton9.Name = "ToolStripButton9"
Me.ToolStripButton9.Size = New System.Drawing.Size(152, 22)
Me.ToolStripButton9.Text = "Fenster Auswahl starten"
'
'ToolStripButton10
'
Me.ToolStripButton10.Image = Global.DD_Clipboard_Watcher.My.Resources.Resources.cancel
Me.ToolStripButton10.ImageTransparentColor = System.Drawing.Color.Magenta
Me.ToolStripButton10.Name = "ToolStripButton10"
Me.ToolStripButton10.Size = New System.Drawing.Size(170, 22)
Me.ToolStripButton10.Text = "Lösche Fenster-Zuordnung"
'
'ToolStripButton11
'
Me.ToolStripButton11.Image = Global.DD_Clipboard_Watcher.My.Resources.Resources.application_go
Me.ToolStripButton11.ImageTransparentColor = System.Drawing.Color.Magenta
Me.ToolStripButton11.Name = "ToolStripButton11"
Me.ToolStripButton11.Size = New System.Drawing.Size(153, 22)
Me.ToolStripButton11.Text = "Prozess Auswahl starten"
'
'ToolStripButton12
'
Me.ToolStripButton12.Image = Global.DD_Clipboard_Watcher.My.Resources.Resources.application_go
Me.ToolStripButton12.ImageTransparentColor = System.Drawing.Color.Magenta
Me.ToolStripButton12.Name = "ToolStripButton12"
Me.ToolStripButton12.Size = New System.Drawing.Size(153, 22)
Me.ToolStripButton12.Text = "Prozess Auswahl starten"
'
'ToolStripButton13
'
Me.ToolStripButton13.Image = Global.DD_Clipboard_Watcher.My.Resources.Resources.cancel
Me.ToolStripButton13.ImageTransparentColor = System.Drawing.Color.Magenta
Me.ToolStripButton13.Name = "ToolStripButton13"
Me.ToolStripButton13.Size = New System.Drawing.Size(171, 22)
Me.ToolStripButton13.Text = "Lösche Prozess-Zuordnung"
'
'ToolStripButton14
'
Me.ToolStripButton14.Image = Global.DD_Clipboard_Watcher.My.Resources.Resources.cancel
Me.ToolStripButton14.ImageTransparentColor = System.Drawing.Color.Magenta
Me.ToolStripButton14.Name = "ToolStripButton14"
Me.ToolStripButton14.Size = New System.Drawing.Size(171, 22)
Me.ToolStripButton14.Text = "Lösche Prozess-Zuordnung"
'
'ToolStripSeparator2
'
Me.ToolStripSeparator2.Name = "ToolStripSeparator2"
Me.ToolStripSeparator2.Size = New System.Drawing.Size(6, 25)
'
'frmAdministration
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
@ -2444,7 +2182,6 @@ Partial Class frmAdministration
CType(Me.VWUSER_PROFILEBindingSource, System.ComponentModel.ISupportInitialize).EndInit()
Me.StatusStrip1.ResumeLayout(False)
Me.StatusStrip1.PerformLayout()
CType(Me.TBCW_PROFILE_PROCESSBindingSource, System.ComponentModel.ISupportInitialize).EndInit()
Me.GroupBox5.ResumeLayout(False)
Me.GroupBox5.PerformLayout()
CType(Me.XtraTabControl2, System.ComponentModel.ISupportInitialize).EndInit()
@ -2457,16 +2194,7 @@ Partial Class frmAdministration
CType(Me.TBWH_PROFILE_TYPEBindingSource, System.ComponentModel.ISupportInitialize).EndInit()
Me.TabPageProcessAssignment.ResumeLayout(False)
Me.TabPageProcessAssignment.PerformLayout()
CType(Me.BindingNavigator3, System.ComponentModel.ISupportInitialize).EndInit()
Me.BindingNavigator3.ResumeLayout(False)
Me.BindingNavigator3.PerformLayout()
CType(Me.TBCW_PROF_REL_WINDOWBindingSource, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.GridControl1, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.GridView2, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.GridControl3, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.GridViewProcessProfile, System.ComponentModel.ISupportInitialize).EndInit()
Me.ToolStrip1.ResumeLayout(False)
Me.ToolStrip1.PerformLayout()
CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).EndInit()
Me.TabPageUserAssignment.ResumeLayout(False)
Me.SplitContainer1.Panel1.ResumeLayout(False)
Me.SplitContainer1.Panel2.ResumeLayout(False)
@ -2500,15 +2228,6 @@ Partial Class frmAdministration
Me.BindingNavigator2.PerformLayout()
CType(Me.TBCW_PROF_DOC_SEARCHBindingSource, System.ComponentModel.ISupportInitialize).EndInit()
Me.TabPageBasicSettings.ResumeLayout(False)
CType(Me.GridControl2, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.GridView3, System.ComponentModel.ISupportInitialize).EndInit()
Me.SplitContainer3.Panel1.ResumeLayout(False)
Me.SplitContainer3.Panel2.ResumeLayout(False)
Me.SplitContainer3.Panel2.PerformLayout()
CType(Me.SplitContainer3, System.ComponentModel.ISupportInitialize).EndInit()
Me.SplitContainer3.ResumeLayout(False)
Me.ToolStrip2.ResumeLayout(False)
Me.ToolStrip2.PerformLayout()
Me.ResumeLayout(False)
Me.PerformLayout()
@ -2551,8 +2270,6 @@ Partial Class frmAdministration
Friend WithEvents VWUSER_PROFILETableAdapter As DD_Clipboard_Watcher.MyDatasetTableAdapters.VWUSER_PROFILETableAdapter
Friend WithEvents TimerTest As System.Windows.Forms.Timer
Friend WithEvents TBWH_UserBindingSource As System.Windows.Forms.BindingSource
Friend WithEvents TBCW_PROFILE_PROCESSBindingSource As System.Windows.Forms.BindingSource
Friend WithEvents TBCW_PROFILE_PROCESSTableAdapter As DD_Clipboard_Watcher.MyDatasetTableAdapters.TBCW_PROFILE_PROCESSTableAdapter
Friend WithEvents BackgroundWorker1 As System.ComponentModel.BackgroundWorker
Friend WithEvents lblLicenseDate As Label
Friend WithEvents lbllicenseCount As Label
@ -2568,10 +2285,6 @@ Partial Class frmAdministration
Friend WithEvents XtraTabControl3 As DevExpress.XtraTab.XtraTabControl
Friend WithEvents TabPageGeneralSettings As DevExpress.XtraTab.XtraTabPage
Friend WithEvents TabPageProcessAssignment As DevExpress.XtraTab.XtraTabPage
Friend WithEvents GridControl3 As DevExpress.XtraGrid.GridControl
Friend WithEvents GridViewProcessProfile As DevExpress.XtraGrid.Views.Grid.GridView
Friend WithEvents colGUID2 As DevExpress.XtraGrid.Columns.GridColumn
Friend WithEvents colPROC_NAME As DevExpress.XtraGrid.Columns.GridColumn
Friend WithEvents TabPageUserAssignment As DevExpress.XtraTab.XtraTabPage
Friend WithEvents SplitContainer1 As SplitContainer
Friend WithEvents GridControlUserInProfile As DevExpress.XtraGrid.GridControl
@ -2666,43 +2379,14 @@ Partial Class frmAdministration
Friend WithEvents colID1 As DevExpress.XtraGrid.Columns.GridColumn
Friend WithEvents colNAME3 As DevExpress.XtraGrid.Columns.GridColumn
Friend WithEvents TBWH_PROFILE_TYPEBindingSource As BindingSource
Friend WithEvents ToolStrip1 As ToolStrip
Friend WithEvents ToolStripButton5 As ToolStripButton
Friend WithEvents ToolStripButton6 As ToolStripButton
Friend WithEvents GridControl1 As DevExpress.XtraGrid.GridControl
Friend WithEvents GridView2 As DevExpress.XtraGrid.Views.Grid.GridView
Friend WithEvents TBCW_PROF_REL_WINDOWBindingSource As BindingSource
Friend WithEvents TBCW_PROF_REL_WINDOWTableAdapter As MyDatasetTableAdapters.TBCW_PROF_REL_WINDOWTableAdapter
Friend WithEvents BindingNavigator3 As BindingNavigator
Friend WithEvents BindingNavigatorAddNewItem3 As ToolStripButton
Friend WithEvents BindingNavigatorCountItem3 As ToolStripLabel
Friend WithEvents BindingNavigatorDeleteItem3 As ToolStripButton
Friend WithEvents BindingNavigatorMoveFirstItem3 As ToolStripButton
Friend WithEvents BindingNavigatorMovePreviousItem3 As ToolStripButton
Friend WithEvents BindingNavigatorSeparator9 As ToolStripSeparator
Friend WithEvents BindingNavigatorPositionItem3 As ToolStripTextBox
Friend WithEvents BindingNavigatorSeparator10 As ToolStripSeparator
Friend WithEvents BindingNavigatorMoveNextItem3 As ToolStripButton
Friend WithEvents BindingNavigatorMoveLastItem3 As ToolStripButton
Friend WithEvents BindingNavigatorSeparator11 As ToolStripSeparator
Friend WithEvents colPROCESS_NAME As DevExpress.XtraGrid.Columns.GridColumn
Friend WithEvents colDESCRIPTION As DevExpress.XtraGrid.Columns.GridColumn
Friend WithEvents colREGEX As DevExpress.XtraGrid.Columns.GridColumn
Friend WithEvents colSEQUENCE As DevExpress.XtraGrid.Columns.GridColumn
Friend WithEvents colREGEX_CLIPBOARD As DevExpress.XtraGrid.Columns.GridColumn
Friend WithEvents ToolStripButton7 As ToolStripButton
Friend WithEvents GridControl2 As DevExpress.XtraGrid.GridControl
Friend WithEvents GridView3 As DevExpress.XtraGrid.Views.Grid.GridView
Friend WithEvents ToolStripButton8 As ToolStripButton
Friend WithEvents ToolStripButton4 As ToolStripButton
Friend WithEvents SplitContainer3 As SplitContainer
Friend WithEvents ToolStrip2 As ToolStrip
Friend WithEvents ToolStripButton9 As ToolStripButton
Friend WithEvents ToolStripButton10 As ToolStripButton
Friend WithEvents ToolStripSeparator1 As ToolStripSeparator
Friend WithEvents ToolStripButton11 As ToolStripButton
Friend WithEvents ToolStripButton13 As ToolStripButton
Friend WithEvents ToolStripSeparator2 As ToolStripSeparator
Friend WithEvents ToolStripButton12 As ToolStripButton
Friend WithEvents ToolStripButton14 As ToolStripButton
Friend WithEvents RibbonControl1 As DevExpress.XtraBars.Ribbon.RibbonControl
Friend WithEvents BarButtonProcessAssign As DevExpress.XtraBars.BarButtonItem
Friend WithEvents BarButtonProcessDelete As DevExpress.XtraBars.BarButtonItem
Friend WithEvents RibbonPage1 As DevExpress.XtraBars.Ribbon.RibbonPage
Friend WithEvents RibbonPageGroup1 As DevExpress.XtraBars.Ribbon.RibbonPageGroup
Friend WithEvents RibbonPageGroup2 As DevExpress.XtraBars.Ribbon.RibbonPageGroup
Friend WithEvents CtrlApplicationAssignment1 As ctrlApplicationAssignment
Friend WithEvents BarButtonWindowAssign As DevExpress.XtraBars.BarButtonItem
Friend WithEvents BarButtonWindowDelete As DevExpress.XtraBars.BarButtonItem
Friend WithEvents BarButtonWindowSave As DevExpress.XtraBars.BarButtonItem
End Class

View File

@ -213,6 +213,18 @@
<metadata name="Label8.GenerateMember" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</metadata>
<metadata name="Label12.GenerateMember" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</metadata>
<metadata name="Label11.GenerateMember" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</metadata>
<metadata name="Label4.GenerateMember" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</metadata>
<metadata name="Label3.GenerateMember" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</metadata>
<metadata name="TBCW_PROFILESBindingSource.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>355, 17</value>
</metadata>
@ -324,100 +336,17 @@
<metadata name="TimerTest.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>240, 56</value>
</metadata>
<metadata name="TBCW_PROFILE_PROCESSBindingSource.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>539, 56</value>
</metadata>
<metadata name="TBCW_PROFILE_PROCESSTableAdapter.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>808, 56</value>
</metadata>
<metadata name="BackgroundWorker1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>1071, 56</value>
</metadata>
<metadata name="ToolTip1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>1234, 56</value>
</metadata>
<metadata name="TBCW_PROF_REL_WINDOWBindingSource.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 173</value>
<metadata name="VWCW_GROUP_PROFILEBindingSource.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>227, 134</value>
</metadata>
<metadata name="ToolStrip2.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>711, 169</value>
</metadata>
<metadata name="BindingNavigator3.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>557, 169</value>
</metadata>
<data name="BindingNavigatorAddNewItem3.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
wwAADsMBx2+oZAAAAUpJREFUOE9jGLzg7gL2/7fmcf6/Oofr/8UZvP+hwsSD60CNfx41/v/zsOH/yckC
pBtwfjov3ICDPSKkG3B8kiBQc93/Pw+q/u9oFydswKWZPP/PTuX7fxKo8Ui/0P993SJAzeX//94r+r++
Qeb/qhq5/0srFf/PL1X+P6tIFdPAU0B//nlYD9RUC8SV///cKwHivP9/72b+/3sn+f/f23H//92MAOKQ
/5NyNDENONQrDHbu3/ulQI0FQI3ZQI2pQI0J///digZqDPv/70bQ/3/X/f53peliGrCzXeL/lmap/+vA
zpX/v6RC8f/fWzFAjeH/p+Zp/J+QpfW/O0P3f3uq/v/mREPCYTIb6E+Qc//dCPjfk6FDWAM6APnz3w1/
IPb735qsT7oB3em6YP+CcH2cEekGtCQZ/G+IN/xfE2v8vzLahHQD6AQYGAAkI9iedfyIaQAAAABJRU5E
rkJggg==
</value>
</data>
<data name="BindingNavigatorDeleteItem3.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
wwAADsMBx2+oZAAAAW9JREFUOE+1kE0ow2Ecx3dV3krt4oJaOSCTvIRkMqSxyITIzCQHDouEdnFwIOVC
DrhIDiQl5UTiNG/z2ppafy1S2gX/uDwfY6i1v7Hie3nqeb7fz+/7/FR/Ilwn0G0Exw4fV5GJlXlEZxXC
rIet9bAQvB5Ymgn2sLYAvSZEux7RUQFzE4qQt4bCXAYjPaHvnDoCkLpsRGMB2JqCTGLIijDlwqQ9bEMV
i9OIytR3EMNWcJ/BWH8A6j8/bOGFxwXNxYEvGbMQ9XnQ1/K78KfY3/VXzkMY0qFGG2H4RoLGQshJQNbG
86CNhdrsX9a/uQZTPhQl4rMY4OLofbl3aX7I8uwPC7y/g1YdjyVJuEvT8e1tfwUYteHUxCCfHChDeHmG
QQvokjlOU+PbWA0x3pZnILVVI3uvQyHsbiLnqnGmRCF1NYD8pDhpRxOH7HQoAKZGkFKjceszQbpSrumX
bO+G80MFwKUTxgfgcO/b8D9IpXoFiiMDHIQm0skAAAAASUVORK5CYII=
</value>
</data>
<data name="BindingNavigatorMoveFirstItem3.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
wwAADsMBx2+oZAAAASpJREFUOE9jGDygcNbz/00Lnv/PnPj4P1QIA4S3P8Apx5A789n/VUfe/8elKL77
wf/ghmu4DciY8vT/wn0fsCqK73n4f+n+///9qy/gNiCh58n/aVveYyiKaL8P1pw56/9/r9ITuA2I7Hr0
v3f1BxRFoa33wJpb1wFt7/z73yX/AG4DApsf/q+b/w6uKLjl7v9Fe///7wBqzpjz879d3c//9hnbcRvg
UXX/f/60NyiK7Ipv/0+f8/u/f9e3/zqF7/5bJKzHbYB96d3/2ZNfYyjSTzn/36ToxX+VrE//jSOX4TbA
Iu/O/9T+11gVGSSd+C+b9vW/bvA83AYYZt3+H9byEqci/dTL/zV8p+E2QCftxn+/6od4Fal4TMBtgFPu
lf8gBXgVDULAwAAA8HbAq6XlmnAAAAAASUVORK5CYII=
</value>
</data>
<data name="BindingNavigatorMovePreviousItem3.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
wwAADsMBx2+oZAAAALZJREFUOE9jGDogvP3BfyiTdBDf/eB/cMM18gyI73n4f+n+///9qy+QbkBE+32w
5sxZ//97lZ4gzYDQ1ntgza3rgLZ3/v3vkn+AeAOCW+7+X7T3//8OoOaMOT//29X9/G+fsZ00F9gV3/6f
Puf3f/+ub/91Ct/9t0hYT3oY6Kec/29S9OK/Stan/8aRy0g3AAQMkk78l037+l83eB55BoCAfurl/xq+
08g3AARUPCZQZsBgBQwMANAUYJgEulBVAAAAAElFTkSuQmCC
</value>
</data>
<data name="BindingNavigatorMoveNextItem3.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
wwAADsMBx2+oZAAAAKNJREFUOE9jGHygcNbz/1AmeSB35rP/Cd33yDckY8rT//P2//6f0HWHPEMSep78
n73v1//OrX//u5VeJt2QyK5H/6ds+/W/ZOnf/wnT//63yT1LmiGBzQ//t659D9ZsXPLlv3T0tf/GkcuI
N8Sj6v7/krnv4JoVXXpIc4F96d3/gS3PyNMMAhZ5d/7bFFwhTzMIGGbdJl8zCOik3SBf81AEDAwAoH5f
oAc0QjgAAAAASUVORK5CYII=
</value>
</data>
<data name="BindingNavigatorMoveLastItem3.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
wwAADsMBx2+oZAAAASxJREFUOE9jGFygcNbz/1AmBgDJNS14/j9z4mOcahhyZz77n9B9D6sCkNyqI+//
h7c/wG1AxpSn/+ft//0/oesOhiKQ3MJ9H/4HN1zDbUBCz5P/s/f9+t+59e9/t9LLKApBctO2vP/vX30B
twGRXY/+T9n263/J0r//E6b//W+TexauGCTXu/rDf6/SE7gNCGx++L917XuwZuOSL/+lo6/9N45cBtYA
kqub/+6/S/4B3AZ4VN3/XzL3HVyzoksPXDFILn/am//2GdtxG2Bfevd/YMszDM0gAJLLnvz6v0XCetwG
WOTd+W9TcAVDMwiA5FL7X8O9hBUYZt3GqhkEQHJhLS//6wbPw22ATtoNnJIgOb/qh/81fKfhNgAfcMq9
8l/FYwIYQ4UGBWBgAAC+0b+zuQxOnAAAAABJRU5ErkJggg==
</value>
</data>
<data name="ToolStripButton7.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
wwAADsMBx2+oZAAAAExJREFUOE9joAr49u3bf1IxVCsEgAWC58Dxh/cf4RhZDETHTNiHaQgpBoAwzBCo
dtINAGGiDUDGyGpoawAxeNSAQWkAORiqnRLAwAAA9EMMU8Daa3MAAAAASUVORK5CYII=
</value>
</data>
<metadata name="ToolStrip1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>997, 134</value>
<metadata name="TBWH_GROUPBindingSource.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 134</value>
</metadata>
<metadata name="BindingNavigator1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>579, 95</value>
@ -431,12 +360,111 @@
<metadata name="TBWH_PROFILE_TYPEBindingSource.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>751, 134</value>
</metadata>
<metadata name="VWCW_GROUP_PROFILEBindingSource.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>227, 134</value>
</metadata>
<metadata name="TBWH_GROUPBindingSource.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 134</value>
</metadata>
<data name="BarButtonProcessAssign.ImageOptions.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m
dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAAsdEVYdFRpdGxlAE5leHQ7RG91YmxlO0Fycm93O0Zh
c3Q7UmV3aW5kO0luY3JlYXNlyXdAHwAAAH9JREFUOE+1kMENgDAMA7tg12EAlmAE/rzYLjQWQiVcIR8e
50qWbUUtZlbqvFd/e8gjJC1ssUAeITnDtwJ5hKQLXwXyCEkIq9DYohfLzmhAhcZjZFqX9IDzecnXgPM6
8usFqY8cDaTKDg0oSB4hoSB5hISCmbIjoWCm7KCZx8oBe7GtjhwJHysAAAAASUVORK5CYII=
</value>
</data>
<data name="BarButtonProcessAssign.ImageOptions.LargeImage" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m
dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAAsdEVYdFRpdGxlAE5leHQ7RG91YmxlO0Fycm93O0Zh
c3Q7UmV3aW5kO0luY3JlYXNlyXdAHwAAAPpJREFUWEfFksENgzAQBGmQdlJAmkgJ+eeV7hwfCpJtBpbD
J/MYocyK3RPKlFK6FZQjQTk/vykzU2ao3APK/8DuiMo9oCwGcETlHlA2A5sRlXtACQPVCGRV7gEllK8s
I/n5aXyVe0AJxSVzJuwIlFDaEnYESigkQo5ACWV7dB+BEoqO6DoCJZQo5BGP9wu3UELBGS59iY0w4OWz
uI+ofqzAi2e49Qtc/iOihIIjLo8bKKFkj65xAyUUEd3jBkooawkZN1BCYUnYuIESSleW8vwMGTdQQnFV
DlmVe0CpylXuAaUqV7kHlKpc5R5QqvKocQPlSFCOBOU40vQDSH4BODHsxUAAAAAASUVORK5CYII=
</value>
</data>
<data name="BarButtonProcessDelete.ImageOptions.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m
dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAAjdEVYdFRpdGxlAENhbmNlbDtTdG9wO0V4aXQ7QmFy
cztSaWJib247TJaWsgAAAMJJREFUOE+Nk0sKAjEQRHM4YVZ6CS8gfhBGHK/pSRRXbRWkJOlOq4sHSf0Y
BlLMrNy3qzWYef4HZC/s8KzyCxi4+rAHmVvNsrOhcKqCSEfgqSz2Ms7OCCPQfPlIvQ2kIzgPy+QzUIN+
ZAFpmXQDBAE/0tKVSXcRCI5GQpkEgSDsP5sso2wQEByVRRjpLgj48gGEH9t2vpYbLx35WRbQhiM0+DBa
I5QFPD8yU5zAowppWSCjkSeYJHJk58MZyPIBTmZW3tJAnMwmSptiAAAAAElFTkSuQmCC
</value>
</data>
<data name="BarButtonProcessDelete.ImageOptions.LargeImage" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m
dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAAjdEVYdFRpdGxlAENhbmNlbDtTdG9wO0V4aXQ7QmFy
cztSaWJib247TJaWsgAAAW5JREFUWEfFlk1KBDEUhGfmAg56JTcuHEGP4FFFFMVZz1VcxaomD57pek1e
hLj4FilSP9Dd0LtSyr8ixZlIcSZSnIkUL8+3f6LJOvhzixRr0BV4AXf13I3LuQev4OjzPVKEgeUfoIBv
kBpRM1hOLzM+gRyxEnDxALiaRiM7wpcbzNy3fb8OBi4+gTagd4Qq5/lBda0EgsvksRrboK0RqXIiRRiM
zIh0OZEiTJ6eEUPlRIowtmyNGC4nUoRZEY0YLidSRECEGuFJlRMpImSLaMRSDmRmhBQZsoF65jZgeTFV
ZoQUGRIQlRvLCJUZIUWEKKK3XWndI6SIgN5yPvPwE1XZLVKEubfc7gyPkCKMmXJjaIQUYSJR+Qn4Yk96
hBRhGCk3UiNWAi7uwVs1+oCeckONeAfdPyTX4Ksas+WW4UecwU3bQ1YCwWXCEVydKicuhyOYIcuJFC0I
8P/Qn7tosvK/5TOR4kykOBMpzqPsfgBphQ1j4i+mWAAAAABJRU5ErkJggg==
</value>
</data>
<data name="BarButtonWindowAssign.ImageOptions.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m
dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAAsdEVYdFRpdGxlAE5leHQ7RG91YmxlO0Fycm93O0Zh
c3Q7UmV3aW5kO0luY3JlYXNlyXdAHwAAAH9JREFUOE+1kMENgDAMA7tg12EAlmAE/rzYLjQWQiVcIR8e
50qWbUUtZlbqvFd/e8gjJC1ssUAeITnDtwJ5hKQLXwXyCEkIq9DYohfLzmhAhcZjZFqX9IDzecnXgPM6
8usFqY8cDaTKDg0oSB4hoSB5hISCmbIjoWCm7KCZx8oBe7GtjhwJHysAAAAASUVORK5CYII=
</value>
</data>
<data name="BarButtonWindowAssign.ImageOptions.LargeImage" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m
dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAAsdEVYdFRpdGxlAE5leHQ7RG91YmxlO0Fycm93O0Zh
c3Q7UmV3aW5kO0luY3JlYXNlyXdAHwAAAPpJREFUWEfFksENgzAQBGmQdlJAmkgJ+eeV7hwfCpJtBpbD
J/MYocyK3RPKlFK6FZQjQTk/vykzU2ao3APK/8DuiMo9oCwGcETlHlA2A5sRlXtACQPVCGRV7gEllK8s
I/n5aXyVe0AJxSVzJuwIlFDaEnYESigkQo5ACWV7dB+BEoqO6DoCJZQo5BGP9wu3UELBGS59iY0w4OWz
uI+ofqzAi2e49Qtc/iOihIIjLo8bKKFkj65xAyUUEd3jBkooawkZN1BCYUnYuIESSleW8vwMGTdQQnFV
DlmVe0CpylXuAaUqV7kHlKpc5R5QqvKocQPlSFCOBOU40vQDSH4BODHsxUAAAAAASUVORK5CYII=
</value>
</data>
<data name="BarButtonWindowDelete.ImageOptions.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m
dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAAjdEVYdFRpdGxlAENhbmNlbDtTdG9wO0V4aXQ7QmFy
cztSaWJib247TJaWsgAAAMJJREFUOE+Nk0sKAjEQRHM4YVZ6CS8gfhBGHK/pSRRXbRWkJOlOq4sHSf0Y
BlLMrNy3qzWYef4HZC/s8KzyCxi4+rAHmVvNsrOhcKqCSEfgqSz2Ms7OCCPQfPlIvQ2kIzgPy+QzUIN+
ZAFpmXQDBAE/0tKVSXcRCI5GQpkEgSDsP5sso2wQEByVRRjpLgj48gGEH9t2vpYbLx35WRbQhiM0+DBa
I5QFPD8yU5zAowppWSCjkSeYJHJk58MZyPIBTmZW3tJAnMwmSptiAAAAAElFTkSuQmCC
</value>
</data>
<data name="BarButtonWindowDelete.ImageOptions.LargeImage" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m
dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAAjdEVYdFRpdGxlAENhbmNlbDtTdG9wO0V4aXQ7QmFy
cztSaWJib247TJaWsgAAAW5JREFUWEfFlk1KBDEUhGfmAg56JTcuHEGP4FFFFMVZz1VcxaomD57pek1e
hLj4FilSP9Dd0LtSyr8ixZlIcSZSnIkUL8+3f6LJOvhzixRr0BV4AXf13I3LuQev4OjzPVKEgeUfoIBv
kBpRM1hOLzM+gRyxEnDxALiaRiM7wpcbzNy3fb8OBi4+gTagd4Qq5/lBda0EgsvksRrboK0RqXIiRRiM
zIh0OZEiTJ6eEUPlRIowtmyNGC4nUoRZEY0YLidSRECEGuFJlRMpImSLaMRSDmRmhBQZsoF65jZgeTFV
ZoQUGRIQlRvLCJUZIUWEKKK3XWndI6SIgN5yPvPwE1XZLVKEubfc7gyPkCKMmXJjaIQUYSJR+Qn4Yk96
hBRhGCk3UiNWAi7uwVs1+oCeckONeAfdPyTX4Ksas+WW4UecwU3bQ1YCwWXCEVydKicuhyOYIcuJFC0I
8P/Qn7tosvK/5TOR4kykOBMpzqPsfgBphQ1j4i+mWAAAAABJRU5ErkJggg==
</value>
</data>
<data name="BarButtonWindowSave.ImageOptions.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m
dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAALdEVYdFRpdGxlAFNhdmU7+ej5CQAAAFhJREFUOE9j
+P//P0UYTEzOWr8XiP+DMJQPZqNjNLm9ID7MAFyKUMTQ5UB8+hgAw9jUYjUAH0ZXiyFICqa+ASA2MXjU
ADwGkIqRDdiOLkkE3g43gHz8nwEAvq7TCya3G6wAAAAASUVORK5CYII=
</value>
</data>
<data name="BarButtonWindowSave.ImageOptions.LargeImage" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m
dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAALdEVYdFRpdGxlAFNhdmU7+ej5CQAAAQ1JREFUWEft
l9EJwzAMRLNZoF+Zpet0kM7RPQIZw9WJ2JyF5CbQOATy8cCVjqcjfx1SSqfiDnviDntS/Xg936PwERKB
OcO7JquTZ3CPfNMWWCic4eNW2GR12vnCN20BGwZ8PMoA3bMncmKeKQ/ghQUVE14G6J49kRPzTHkALyyo
mPAyQPfsiZyYZ8oDeGFBxYSXAbpnT+TEPFMewAsLKia8DNA9eyIn5pnyAF5YUDHhZVwiZ74HLlmgCfsi
J+9/ho+Ab94FWgUeAma7YB954dpdoBJvhX2M7O4Cd4G7wPUKTEIl3wL7yAvX7gKHwTdtgdmGD2Dmm7YA
PpX33+BfwD3xzarAGbjDnrjDfqThC1oLalOREus2AAAAAElFTkSuQmCC
</value>
</data>
<metadata name="BindingNavigator1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>579, 95</value>
</metadata>
@ -600,9 +628,6 @@
<metadata name="VWCW_GROUP_PROFILETableAdapter.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>492, 134</value>
</metadata>
<metadata name="TBCW_PROF_REL_WINDOWTableAdapter.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>298, 173</value>
</metadata>
<metadata name="$this.TrayHeight" type="System.Int32, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>230</value>
</metadata>

View File

@ -13,8 +13,24 @@ Public Class frmAdministration
End Class
Dim PID As Integer
Private Sub frmAdministration_Load(sender As Object, e As EventArgs) Handles MyBase.Load
Load_Profiles()
Load_ProfileTypes()
Load_Logs()
lbllicenseCount.Text = LICENSE_COUNT
If LICENSE_DATE.ToString.Contains("2099") Then
lblLicenseDate.Text = "Unlimited"
Else
lblLicenseDate.Text = LICENSE_DATE
End If
End Sub
Private Sub TBCW_PROFILESBindingNavigatorSaveItem_Click(sender As Object, e As EventArgs) Handles TBCW_PROFILESBindingNavigatorSaveItem.Click
Save_Profile()
clsHotkey.Refresh_Profile_Links()
Me.TableAdapterManager.UpdateAll(Me.MyDataset)
@ -30,11 +46,12 @@ Public Class frmAdministration
Sub Load_ProfileTypes()
Dim oTypeNames As New Dictionary(Of Integer, String) From {
{0, "Dokumente und Daten"},
{1, "Nur Dokumente"},
{2, "Nur Daten"}
{ClassConstants.PROFILE_TYPE_DATA_DOCS, "Dokumente und Daten"},
{ClassConstants.PROFILE_TYPE_DOCS_ONLY, "Nur Dokumente"},
{ClassConstants.PROFILE_TYPE_DATA_ONLY, "Nur Daten"}
}
MyDataset.TBWH_PROFILE_TYPE.Rows.Clear()
For Each oTypeName As KeyValuePair(Of Integer, String) In oTypeNames
Dim oRow = MyDataset.TBWH_PROFILE_TYPE.NewTBWH_PROFILE_TYPERow()
oRow.TYPE_ID = oTypeName.Key
@ -43,6 +60,10 @@ Public Class frmAdministration
Next
End Sub
Sub Load_Logs()
End Sub
Sub Save_Profile()
Try
@ -59,18 +80,7 @@ Public Class frmAdministration
MsgBox("Unexpected Error in Save Profile: " & vbNewLine & ex.Message, MsgBoxStyle.Critical)
End Try
End Sub
Private Sub frmAdministration_Load(sender As Object, e As EventArgs) Handles MyBase.Load
Load_Profiles()
Load_ProfileTypes()
lbllicenseCount.Text = LICENSE_COUNT
If LICENSE_DATE.ToString.Contains("2099") Then
lblLicenseDate.Text = "Unlimited"
Else
lblLicenseDate.Text = LICENSE_DATE
End If
End Sub
Sub Status_Changed(text As String, col As System.Drawing.Color)
statuslabel.Text = text
statuslabel.BackColor = col
@ -79,6 +89,8 @@ Public Class frmAdministration
Private Sub TBCW_PROFILESBindingSource_AddingNew(sender As Object, e As System.ComponentModel.AddingNewEventArgs) Handles TBCW_PROFILESBindingSource.AddingNew
MyDataset.TBCW_PROFILES.ADDED_WHOColumn.DefaultValue = Environment.UserName
MyDataset.TBCW_PROFILES.PROFILE_TYPEColumn.DefaultValue = 0
XtraTabControl3.SelectedTabPage = TabPageGeneralSettings
End Sub
Private Sub btnaddSearch_Click(sender As Object, e As EventArgs) Handles btnaddSearch.Click
@ -219,16 +231,13 @@ Public Class frmAdministration
End Sub
Private Sub Load_Profile_Process()
Try
If IsNothing(GUIDTextBox.Text) Or GUIDTextBox.Text = "" Then
Exit Sub
End If
Me.TBCW_PROFILE_PROCESSTableAdapter.Connection.ConnectionString = MyConnectionString
Me.TBCW_PROFILE_PROCESSTableAdapter.Fill(Me.MyDataset.TBCW_PROFILE_PROCESS, GUIDTextBox.Text)
Catch ex As System.Exception
MsgBox("Unexpected Error in Load_Profile_Process: " & vbNewLine & ex.Message, MsgBoxStyle.Critical)
End Try
If IsNothing(GUIDTextBox.Text) Or GUIDTextBox.Text = "" Then
Exit Sub
End If
If CtrlApplicationAssignment1.Process_Load(GUIDTextBox.Text) = False Then
MsgBox("Unexpected Error while loading processes:", MsgBoxStyle.Critical)
End If
End Sub
Private Sub WD_SEARCHTextBox_MouseHover(sender As Object, e As EventArgs) Handles WD_SEARCHTextBox.MouseHover
@ -350,7 +359,7 @@ Public Class frmAdministration
End Try
End Sub
Private Sub ToolStripButton6_Click(sender As Object, e As EventArgs) Handles ToolStripButton6.Click
Private Sub ToolStripButton6_Click(sender As Object, e As EventArgs)
Dim oForm As New frmProcessCapture()
Dim oResult = oForm.ShowDialog()
@ -372,49 +381,57 @@ Public Class frmAdministration
End If
End Sub
Private Sub ToolStripButton5_Click(sender As Object, e As EventArgs) Handles ToolStripButton5.Click
Try
Dim oGuid = GridViewProcessProfile.GetFocusedRowCellValue(GridViewProcessProfile.Columns("GUID"))
Dim oSQL = String.Format("DELETE FROM TBCW_PROFILE_PROCESS WHERE GUID = {0}", oGuid)
If clsDatabase.Execute_non_Query(oSQL) Then
Load_Profile_Process()
End If
Catch ex As Exception
MsgBox("Unexpected Error in deleting ProfileProcess-Relation: " & vbNewLine & ex.Message, MsgBoxStyle.Critical)
End Try
End Sub
Private Sub GridViewProcessProfile_FocusedRowChanged(sender As Object, e As DevExpress.XtraGrid.Views.Base.FocusedRowChangedEventArgs) Handles GridViewProcessProfile.FocusedRowChanged
If e.FocusedRowHandle < 0 Then
Exit Sub
End If
Dim oSelectedRow As DataRow = GridViewProcessProfile.GetDataRow(e.FocusedRowHandle)
Dim oProcessName As String = oSelectedRow.Item("PROC_NAME")
SelectedProcessName = oProcessName
TBCW_PROF_REL_WINDOWTableAdapter.Connection.ConnectionString = MyConnectionString
TBCW_PROF_REL_WINDOWTableAdapter.Fill(MyDataset.TBCW_PROF_REL_WINDOW, SelectedProcessName, GUIDTextBox.Text)
End Sub
Private Sub ToolStripButton7_Click(sender As Object, e As EventArgs) Handles ToolStripButton7.Click
Try
TBCW_PROF_REL_WINDOWBindingSource.EndEdit()
If Not IsNothing(MyDataset.TBCW_PROF_REL_WINDOW.GetChanges) Then
CHANGED_WHOTextBox3.Text = Environment.UserName
TBCW_PROF_REL_WINDOWBindingSource.EndEdit()
TBCW_PROF_REL_WINDOWTableAdapter.Update(MyDataset.TBCW_PROF_REL_WINDOW)
End If
TBCW_PROF_REL_WINDOWTableAdapter.Fill(MyDataset.TBCW_PROF_REL_WINDOW, SelectedProcessName, GUIDTextBox.Text)
Catch ex As Exception
MsgBox("Unexpected Error in Save Profile: " & vbNewLine & ex.Message, MsgBoxStyle.Critical)
End Try
End Sub
Private Sub TBCW_PROF_REL_WINDOWBindingSource_AddingNew(sender As Object, e As System.ComponentModel.AddingNewEventArgs) Handles TBCW_PROF_REL_WINDOWBindingSource.AddingNew
Private Sub TBCW_PROF_REL_WINDOWBindingSource_AddingNew(sender As Object, e As System.ComponentModel.AddingNewEventArgs)
MyDataset.TBCW_PROF_REL_WINDOW.ADDED_WHOColumn.DefaultValue = Environment.UserName
MyDataset.TBCW_PROF_REL_WINDOW.PROFILE_IDColumn.DefaultValue = GUIDTextBox.Text
MyDataset.TBCW_PROF_REL_WINDOW.PROCESS_NAMEColumn.DefaultValue = SelectedProcessName
End Sub
Private Sub BarButtonProcessAssign_ItemClick_1(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonProcessAssign.ItemClick
If CtrlApplicationAssignment1.Process_CreateAssignment(GUIDTextBox.Text) = False Then
MsgBox("Error while assigning process!", MsgBoxStyle.Critical, "Clipboard Watcher")
End If
Status_Changed("Prozess gespeichert - " & Now.ToString, Color.Yellow)
End Sub
Private Sub BarButtonProcessDelete_ItemClick_1(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonProcessDelete.ItemClick
If MsgBox($"Wollen Sie den Prozess löschen?" & vbNewLine & "Dies wird alle Fenster löschen, die diesem Prozess zugeordnet sind!", MsgBoxStyle.Exclamation Or MsgBoxStyle.YesNo, "Prozess löschen") = MsgBoxResult.No Then
Exit Sub
End If
If CtrlApplicationAssignment1.Process_DeleteAssignment() = False Then
MsgBox("Error while deleting assignment of process!", MsgBoxStyle.Critical, "Clipboard Watcher")
End If
Status_Changed("Prozess gelöscht - " & Now.ToString, Color.Yellow)
End Sub
Private Sub BarButtonWindowAssign_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonWindowAssign.ItemClick
If CtrlApplicationAssignment1.Window_CreateAssignment(GUIDTextBox.Text) = False Then
MsgBox("Error while assigning window!", MsgBoxStyle.Critical, "Clipboard Watcher")
End If
Status_Changed("Fenster gespeichert - " & Now.ToString, Color.Yellow)
End Sub
Private Sub BarButtonWindowDelete_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonWindowDelete.ItemClick
If MsgBox($"Wollen Sie das Fenster löschen?" & vbNewLine & "Dies wird alle Controls löschen, die diesem Fenster zugeordnet sind!", MsgBoxStyle.Exclamation Or MsgBoxStyle.YesNo, "Prozess löschen") = MsgBoxResult.No Then
Exit Sub
End If
If CtrlApplicationAssignment1.Window_DeleteAssignment() = False Then
MsgBox("Error while deleting assignment of window!", MsgBoxStyle.Critical, "Clipboard Watcher")
End If
Status_Changed("Fenster gelöscht - " & Now.ToString, Color.Yellow)
End Sub
Private Sub BarButtonWindowSave_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonWindowSave.ItemClick
If CtrlApplicationAssignment1.Window_SaveAssignment() = False Then
MsgBox("Error while saving assignment of window!", MsgBoxStyle.Critical, "Clipboard Watcher")
End If
Status_Changed("Fenster gespeichert - " & Now.ToString, Color.Yellow)
End Sub
End Class

View File

@ -23,65 +23,17 @@ Partial Class frmDocView
<System.Diagnostics.DebuggerStepThrough()> _
Private Sub InitializeComponent()
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmDocView))
Me.tcLeftPanel = New System.Windows.Forms.TabControl()
Me.tpThumbnails = New System.Windows.Forms.TabPage()
Me.ToolStripContainer1 = New System.Windows.Forms.ToolStripContainer()
Me.thumbnailPanelToolstrip = New System.Windows.Forms.ToolStrip()
Me.btnThumbSize = New System.Windows.Forms.ToolStripDropDownButton()
Me.LargeThumbnailsToolStripMenuItem1 = New System.Windows.Forms.ToolStripMenuItem()
Me.MediumThumbnailsToolStripMenuItem1 = New System.Windows.Forms.ToolStripMenuItem()
Me.SmallThumbnailsToolStripMenuItem1 = New System.Windows.Forms.ToolStripMenuItem()
Me.ThumbnailEx1 = New GdPicture14.ThumbnailEx()
Me.tpBookmarks = New System.Windows.Forms.TabPage()
Me.Panel5 = New System.Windows.Forms.Panel()
Me.BookmarksTree1 = New GdPicture14.BookmarksTree()
Me.tpSearch = New System.Windows.Forms.TabPage()
Me.pSearch = New System.Windows.Forms.Panel()
Me.Panel4 = New System.Windows.Forms.Panel()
Me.lstSearchResults = New System.Windows.Forms.ListView()
Me.ColumnHeader1 = CType(New System.Windows.Forms.ColumnHeader(), System.Windows.Forms.ColumnHeader)
Me.ColumnHeader2 = CType(New System.Windows.Forms.ColumnHeader(), System.Windows.Forms.ColumnHeader)
Me.ColumnHeader3 = CType(New System.Windows.Forms.ColumnHeader(), System.Windows.Forms.ColumnHeader)
Me.Panel3 = New System.Windows.Forms.Panel()
Me.searchProgressBar = New System.Windows.Forms.ProgressBar()
Me.lblSearchResults = New System.Windows.Forms.Label()
Me.chkWholeWord = New System.Windows.Forms.CheckBox()
Me.chkCaseSensitive = New System.Windows.Forms.CheckBox()
Me.GroupBox2 = New System.Windows.Forms.GroupBox()
Me.rbCurrentPage = New System.Windows.Forms.RadioButton()
Me.rbAllPages = New System.Windows.Forms.RadioButton()
Me.btnFindPrevious = New System.Windows.Forms.Button()
Me.btnSearch = New System.Windows.Forms.Button()
Me.btnFindNext = New System.Windows.Forms.Button()
Me.Panel2 = New System.Windows.Forms.Panel()
Me.tbSearch = New System.Windows.Forms.TextBox()
Me.Panel1 = New System.Windows.Forms.Panel()
Me.PictureBox1 = New System.Windows.Forms.PictureBox()
Me.lblSearchFor = New System.Windows.Forms.Label()
Me.scMain = New System.Windows.Forms.SplitContainer()
Me.Panel6 = New System.Windows.Forms.Panel()
Me.Panel9 = New System.Windows.Forms.Panel()
Me.Panel7 = New System.Windows.Forms.Panel()
Me.lblSnapInPanel = New System.Windows.Forms.Label()
Me.pSnapInButtons = New System.Windows.Forms.Panel()
Me.btnSnapInThumbnails = New System.Windows.Forms.Button()
Me.btnSnapInBookmarks = New System.Windows.Forms.Button()
Me.btnSnapInSearch = New System.Windows.Forms.Button()
Me.pGamma = New System.Windows.Forms.Panel()
Me.lblGamma = New System.Windows.Forms.Label()
Me.tbGamma = New System.Windows.Forms.TrackBar()
Me.GdViewer1 = New GdPicture14.GdViewer()
Me.statusbar = New System.Windows.Forms.StatusStrip()
Me.ToolStripStatusLabel1 = New System.Windows.Forms.ToolStripStatusLabel()
Me.ToolStripStatusLabel2 = New System.Windows.Forms.ToolStripStatusLabel()
Me.mainToolStrip = New System.Windows.Forms.ToolStrip()
Me.btnOpen = New System.Windows.Forms.ToolStripButton()
Me.ToolStripSeparator9 = New System.Windows.Forms.ToolStripSeparator()
Me.btnClose = New System.Windows.Forms.ToolStripButton()
Me.btnPrint = New System.Windows.Forms.ToolStripButton()
Me.ToolStripSeparator3 = New System.Windows.Forms.ToolStripSeparator()
Me.btnSettings = New System.Windows.Forms.ToolStripButton()
Me.ToolStripSeparator8 = New System.Windows.Forms.ToolStripSeparator()
Me.btnFitWidth = New System.Windows.Forms.ToolStripButton()
Me.btnFitPage = New System.Windows.Forms.ToolStripButton()
Me.ToolStripSeparator2 = New System.Windows.Forms.ToolStripSeparator()
Me.btnMouseMode = New System.Windows.Forms.ToolStripDropDownButton()
Me.DefaultToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.PanToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
@ -99,568 +51,20 @@ Partial Class frmDocView
Me.btnZoomOut = New System.Windows.Forms.ToolStripButton()
Me.cbZoom = New System.Windows.Forms.ToolStripComboBox()
Me.btnZoomIn = New System.Windows.Forms.ToolStripButton()
Me.ToolStripSeparator2 = New System.Windows.Forms.ToolStripSeparator()
Me.btnFitWidth = New System.Windows.Forms.ToolStripButton()
Me.btnFitPage = New System.Windows.Forms.ToolStripButton()
Me.ToolStripSeparator5 = New System.Windows.Forms.ToolStripSeparator()
Me.btnAdjustGamma = New System.Windows.Forms.ToolStripButton()
Me.ToolStripSeparator10 = New System.Windows.Forms.ToolStripSeparator()
Me.btnRotateLeft = New System.Windows.Forms.ToolStripButton()
Me.btnRotateRight = New System.Windows.Forms.ToolStripButton()
Me.btnFlipX = New System.Windows.Forms.ToolStripButton()
Me.btnFlipY = New System.Windows.Forms.ToolStripButton()
Me.ToolStripSeparator4 = New System.Windows.Forms.ToolStripSeparator()
Me.btnSettings = New System.Windows.Forms.ToolStripButton()
Me.btnAbout = New System.Windows.Forms.ToolStripButton()
Me.pMain = New System.Windows.Forms.Panel()
Me.tcLeftPanel.SuspendLayout()
Me.tpThumbnails.SuspendLayout()
Me.ToolStripContainer1.BottomToolStripPanel.SuspendLayout()
Me.ToolStripContainer1.ContentPanel.SuspendLayout()
Me.ToolStripContainer1.SuspendLayout()
Me.thumbnailPanelToolstrip.SuspendLayout()
Me.tpBookmarks.SuspendLayout()
Me.Panel5.SuspendLayout()
Me.tpSearch.SuspendLayout()
Me.pSearch.SuspendLayout()
Me.Panel4.SuspendLayout()
Me.Panel3.SuspendLayout()
Me.GroupBox2.SuspendLayout()
Me.Panel2.SuspendLayout()
Me.Panel1.SuspendLayout()
CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.scMain, System.ComponentModel.ISupportInitialize).BeginInit()
Me.scMain.Panel1.SuspendLayout()
Me.scMain.Panel2.SuspendLayout()
Me.scMain.SuspendLayout()
Me.Panel6.SuspendLayout()
Me.Panel9.SuspendLayout()
Me.Panel7.SuspendLayout()
Me.pSnapInButtons.SuspendLayout()
Me.pGamma.SuspendLayout()
CType(Me.tbGamma, System.ComponentModel.ISupportInitialize).BeginInit()
Me.statusbar.SuspendLayout()
Me.mainToolStrip.SuspendLayout()
Me.pMain.SuspendLayout()
Me.SuspendLayout()
'
'tcLeftPanel
'
Me.tcLeftPanel.Controls.Add(Me.tpThumbnails)
Me.tcLeftPanel.Controls.Add(Me.tpBookmarks)
Me.tcLeftPanel.Controls.Add(Me.tpSearch)
Me.tcLeftPanel.Dock = System.Windows.Forms.DockStyle.Fill
Me.tcLeftPanel.Location = New System.Drawing.Point(0, 32)
Me.tcLeftPanel.Margin = New System.Windows.Forms.Padding(0)
Me.tcLeftPanel.Multiline = True
Me.tcLeftPanel.Name = "tcLeftPanel"
Me.tcLeftPanel.Padding = New System.Drawing.Point(0, 0)
Me.tcLeftPanel.SelectedIndex = 0
Me.tcLeftPanel.Size = New System.Drawing.Size(334, 642)
Me.tcLeftPanel.TabIndex = 1
'
'tpThumbnails
'
Me.tpThumbnails.BackColor = System.Drawing.SystemColors.Control
Me.tpThumbnails.Controls.Add(Me.ToolStripContainer1)
Me.tpThumbnails.Location = New System.Drawing.Point(4, 22)
Me.tpThumbnails.Name = "tpThumbnails"
Me.tpThumbnails.Size = New System.Drawing.Size(326, 616)
Me.tpThumbnails.TabIndex = 0
Me.tpThumbnails.Text = "Thumbnails"
'
'ToolStripContainer1
'
'
'ToolStripContainer1.BottomToolStripPanel
'
Me.ToolStripContainer1.BottomToolStripPanel.Controls.Add(Me.thumbnailPanelToolstrip)
'
'ToolStripContainer1.ContentPanel
'
Me.ToolStripContainer1.ContentPanel.Controls.Add(Me.ThumbnailEx1)
Me.ToolStripContainer1.ContentPanel.Margin = New System.Windows.Forms.Padding(0)
Me.ToolStripContainer1.ContentPanel.Size = New System.Drawing.Size(326, 566)
Me.ToolStripContainer1.Dock = System.Windows.Forms.DockStyle.Fill
Me.ToolStripContainer1.Location = New System.Drawing.Point(0, 0)
Me.ToolStripContainer1.Name = "ToolStripContainer1"
Me.ToolStripContainer1.Size = New System.Drawing.Size(326, 616)
Me.ToolStripContainer1.TabIndex = 1
Me.ToolStripContainer1.Text = "ToolStripContainer1"
'
'thumbnailPanelToolstrip
'
Me.thumbnailPanelToolstrip.BackgroundImageLayout = System.Windows.Forms.ImageLayout.None
Me.thumbnailPanelToolstrip.Dock = System.Windows.Forms.DockStyle.None
Me.thumbnailPanelToolstrip.GripStyle = System.Windows.Forms.ToolStripGripStyle.Hidden
Me.thumbnailPanelToolstrip.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.btnThumbSize})
Me.thumbnailPanelToolstrip.Location = New System.Drawing.Point(0, 0)
Me.thumbnailPanelToolstrip.Name = "thumbnailPanelToolstrip"
Me.thumbnailPanelToolstrip.Padding = New System.Windows.Forms.Padding(0)
Me.thumbnailPanelToolstrip.Size = New System.Drawing.Size(326, 25)
Me.thumbnailPanelToolstrip.Stretch = True
Me.thumbnailPanelToolstrip.TabIndex = 0
'
'btnThumbSize
'
Me.btnThumbSize.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
Me.btnThumbSize.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.LargeThumbnailsToolStripMenuItem1, Me.MediumThumbnailsToolStripMenuItem1, Me.SmallThumbnailsToolStripMenuItem1})
Me.btnThumbSize.Image = CType(resources.GetObject("btnThumbSize.Image"), System.Drawing.Image)
Me.btnThumbSize.ImageTransparentColor = System.Drawing.Color.Magenta
Me.btnThumbSize.Name = "btnThumbSize"
Me.btnThumbSize.Size = New System.Drawing.Size(29, 22)
Me.btnThumbSize.Text = "btnThumbnailSize"
Me.btnThumbSize.ToolTipText = "Thumbnail size"
'
'LargeThumbnailsToolStripMenuItem1
'
Me.LargeThumbnailsToolStripMenuItem1.Checked = True
Me.LargeThumbnailsToolStripMenuItem1.CheckState = System.Windows.Forms.CheckState.Checked
Me.LargeThumbnailsToolStripMenuItem1.Name = "LargeThumbnailsToolStripMenuItem1"
Me.LargeThumbnailsToolStripMenuItem1.Size = New System.Drawing.Size(182, 22)
Me.LargeThumbnailsToolStripMenuItem1.Text = "Large thumbnails"
'
'MediumThumbnailsToolStripMenuItem1
'
Me.MediumThumbnailsToolStripMenuItem1.Name = "MediumThumbnailsToolStripMenuItem1"
Me.MediumThumbnailsToolStripMenuItem1.Size = New System.Drawing.Size(182, 22)
Me.MediumThumbnailsToolStripMenuItem1.Text = "Medium thumbnails"
'
'SmallThumbnailsToolStripMenuItem1
'
Me.SmallThumbnailsToolStripMenuItem1.Name = "SmallThumbnailsToolStripMenuItem1"
Me.SmallThumbnailsToolStripMenuItem1.Size = New System.Drawing.Size(182, 22)
Me.SmallThumbnailsToolStripMenuItem1.Text = "Small thumbnails"
'
'ThumbnailEx1
'
Me.ThumbnailEx1.AllowDropFiles = False
Me.ThumbnailEx1.AllowMoveItems = False
Me.ThumbnailEx1.BackColor = System.Drawing.SystemColors.Control
Me.ThumbnailEx1.CheckBoxes = False
Me.ThumbnailEx1.CheckBoxesMarginLeft = 0
Me.ThumbnailEx1.CheckBoxesMarginTop = 0
Me.ThumbnailEx1.DefaultItemTextPrefixe = "Page "
Me.ThumbnailEx1.DisplayAnnotations = True
Me.ThumbnailEx1.Dock = System.Windows.Forms.DockStyle.Fill
Me.ThumbnailEx1.EnableDropShadow = True
Me.ThumbnailEx1.HorizontalTextAlignment = GdPicture14.TextAlignment.TextAlignmentCenter
Me.ThumbnailEx1.HotTracking = False
Me.ThumbnailEx1.Location = New System.Drawing.Point(0, 0)
Me.ThumbnailEx1.LockGdViewerEvents = False
Me.ThumbnailEx1.MultiSelect = False
Me.ThumbnailEx1.Name = "ThumbnailEx1"
Me.ThumbnailEx1.OwnDrop = False
Me.ThumbnailEx1.PauseThumbsLoading = False
Me.ThumbnailEx1.PdfIncreaseTextContrast = False
Me.ThumbnailEx1.PdfRasterizerEngine = GdPicture14.PdfRasterizerEngine.PdfRasterizerEngineHybrid
Me.ThumbnailEx1.PreloadAllItems = True
Me.ThumbnailEx1.RotateExif = True
Me.ThumbnailEx1.SelectedThumbnailBackColor = System.Drawing.Color.FromArgb(CType(CType(51, Byte), Integer), CType(CType(153, Byte), Integer), CType(CType(255, Byte), Integer))
Me.ThumbnailEx1.ShowText = True
Me.ThumbnailEx1.Size = New System.Drawing.Size(326, 566)
Me.ThumbnailEx1.TabIndex = 0
Me.ThumbnailEx1.TextMarginLeft = 0
Me.ThumbnailEx1.TextMarginTop = 0
Me.ThumbnailEx1.ThumbnailAlignment = GdPicture14.ThumbnailAlignment.ThumbnailAlignmentVertical
Me.ThumbnailEx1.ThumbnailBackColor = System.Drawing.Color.Transparent
Me.ThumbnailEx1.ThumbnailBorder = False
Me.ThumbnailEx1.ThumbnailForeColor = System.Drawing.Color.Black
Me.ThumbnailEx1.ThumbnailSize = New System.Drawing.Size(256, 256)
Me.ThumbnailEx1.ThumbnailSpacing = New System.Drawing.Size(0, 0)
Me.ThumbnailEx1.VerticalTextAlignment = GdPicture14.TextAlignment.TextAlignmentCenter
'
'tpBookmarks
'
Me.tpBookmarks.BackColor = System.Drawing.SystemColors.Control
Me.tpBookmarks.Controls.Add(Me.Panel5)
Me.tpBookmarks.Location = New System.Drawing.Point(4, 22)
Me.tpBookmarks.Name = "tpBookmarks"
Me.tpBookmarks.Size = New System.Drawing.Size(326, 616)
Me.tpBookmarks.TabIndex = 1
Me.tpBookmarks.Text = "Bookmarks"
'
'Panel5
'
Me.Panel5.Controls.Add(Me.BookmarksTree1)
Me.Panel5.Dock = System.Windows.Forms.DockStyle.Fill
Me.Panel5.Location = New System.Drawing.Point(0, 0)
Me.Panel5.Name = "Panel5"
Me.Panel5.Size = New System.Drawing.Size(326, 616)
Me.Panel5.TabIndex = 1
'
'BookmarksTree1
'
Me.BookmarksTree1.BackColor = System.Drawing.SystemColors.Control
Me.BookmarksTree1.DisableZoomDestination = False
Me.BookmarksTree1.Dock = System.Windows.Forms.DockStyle.Fill
Me.BookmarksTree1.FontName = "Helvetica"
Me.BookmarksTree1.FontSize = 10.0!
Me.BookmarksTree1.GdViewer = Nothing
Me.BookmarksTree1.ItemHeight = 20
Me.BookmarksTree1.Location = New System.Drawing.Point(0, 0)
Me.BookmarksTree1.Name = "BookmarksTree1"
Me.BookmarksTree1.Padding = New System.Windows.Forms.Padding(10)
Me.BookmarksTree1.Size = New System.Drawing.Size(326, 616)
Me.BookmarksTree1.TabIndex = 0
'
'tpSearch
'
Me.tpSearch.BackColor = System.Drawing.SystemColors.Control
Me.tpSearch.Controls.Add(Me.pSearch)
Me.tpSearch.Location = New System.Drawing.Point(4, 22)
Me.tpSearch.Name = "tpSearch"
Me.tpSearch.Size = New System.Drawing.Size(326, 616)
Me.tpSearch.TabIndex = 2
Me.tpSearch.Text = "Search"
'
'pSearch
'
Me.pSearch.BackColor = System.Drawing.SystemColors.Control
Me.pSearch.Controls.Add(Me.Panel4)
Me.pSearch.Controls.Add(Me.Panel3)
Me.pSearch.Controls.Add(Me.Panel2)
Me.pSearch.Controls.Add(Me.Panel1)
Me.pSearch.Dock = System.Windows.Forms.DockStyle.Fill
Me.pSearch.Location = New System.Drawing.Point(0, 0)
Me.pSearch.Name = "pSearch"
Me.pSearch.Padding = New System.Windows.Forms.Padding(10)
Me.pSearch.Size = New System.Drawing.Size(326, 616)
Me.pSearch.TabIndex = 0
'
'Panel4
'
Me.Panel4.Controls.Add(Me.lstSearchResults)
Me.Panel4.Dock = System.Windows.Forms.DockStyle.Fill
Me.Panel4.Location = New System.Drawing.Point(10, 283)
Me.Panel4.Name = "Panel4"
Me.Panel4.Size = New System.Drawing.Size(306, 323)
Me.Panel4.TabIndex = 17
'
'lstSearchResults
'
Me.lstSearchResults.Columns.AddRange(New System.Windows.Forms.ColumnHeader() {Me.ColumnHeader1, Me.ColumnHeader2, Me.ColumnHeader3})
Me.lstSearchResults.Dock = System.Windows.Forms.DockStyle.Fill
Me.lstSearchResults.FullRowSelect = True
Me.lstSearchResults.HeaderStyle = System.Windows.Forms.ColumnHeaderStyle.None
Me.lstSearchResults.Location = New System.Drawing.Point(0, 0)
Me.lstSearchResults.MultiSelect = False
Me.lstSearchResults.Name = "lstSearchResults"
Me.lstSearchResults.Size = New System.Drawing.Size(306, 323)
Me.lstSearchResults.TabIndex = 10
Me.lstSearchResults.UseCompatibleStateImageBehavior = False
Me.lstSearchResults.View = System.Windows.Forms.View.Tile
'
'Panel3
'
Me.Panel3.Controls.Add(Me.searchProgressBar)
Me.Panel3.Controls.Add(Me.lblSearchResults)
Me.Panel3.Controls.Add(Me.chkWholeWord)
Me.Panel3.Controls.Add(Me.chkCaseSensitive)
Me.Panel3.Controls.Add(Me.GroupBox2)
Me.Panel3.Controls.Add(Me.btnFindPrevious)
Me.Panel3.Controls.Add(Me.btnSearch)
Me.Panel3.Controls.Add(Me.btnFindNext)
Me.Panel3.Dock = System.Windows.Forms.DockStyle.Top
Me.Panel3.Location = New System.Drawing.Point(10, 63)
Me.Panel3.Name = "Panel3"
Me.Panel3.Size = New System.Drawing.Size(306, 220)
Me.Panel3.TabIndex = 16
'
'searchProgressBar
'
Me.searchProgressBar.Dock = System.Windows.Forms.DockStyle.Bottom
Me.searchProgressBar.Location = New System.Drawing.Point(0, 210)
Me.searchProgressBar.Minimum = 1
Me.searchProgressBar.Name = "searchProgressBar"
Me.searchProgressBar.Size = New System.Drawing.Size(306, 10)
Me.searchProgressBar.TabIndex = 15
Me.searchProgressBar.Value = 1
Me.searchProgressBar.Visible = False
'
'lblSearchResults
'
Me.lblSearchResults.AutoSize = True
Me.lblSearchResults.Location = New System.Drawing.Point(6, 191)
Me.lblSearchResults.Name = "lblSearchResults"
Me.lblSearchResults.Size = New System.Drawing.Size(82, 13)
Me.lblSearchResults.TabIndex = 14
Me.lblSearchResults.Text = "Find result from"
'
'chkWholeWord
'
Me.chkWholeWord.AutoSize = True
Me.chkWholeWord.Location = New System.Drawing.Point(3, 3)
Me.chkWholeWord.Name = "chkWholeWord"
Me.chkWholeWord.Size = New System.Drawing.Size(113, 17)
Me.chkWholeWord.TabIndex = 1
Me.chkWholeWord.Text = "Match whole word"
Me.chkWholeWord.UseVisualStyleBackColor = True
'
'chkCaseSensitive
'
Me.chkCaseSensitive.AutoSize = True
Me.chkCaseSensitive.Location = New System.Drawing.Point(3, 26)
Me.chkCaseSensitive.Name = "chkCaseSensitive"
Me.chkCaseSensitive.Size = New System.Drawing.Size(80, 17)
Me.chkCaseSensitive.TabIndex = 2
Me.chkCaseSensitive.Text = "Match case"
Me.chkCaseSensitive.UseVisualStyleBackColor = True
'
'GroupBox2
'
Me.GroupBox2.Controls.Add(Me.rbCurrentPage)
Me.GroupBox2.Controls.Add(Me.rbAllPages)
Me.GroupBox2.Location = New System.Drawing.Point(3, 49)
Me.GroupBox2.Name = "GroupBox2"
Me.GroupBox2.Size = New System.Drawing.Size(188, 70)
Me.GroupBox2.TabIndex = 7
Me.GroupBox2.TabStop = False
Me.GroupBox2.Text = "Search in"
'
'rbCurrentPage
'
Me.rbCurrentPage.AutoSize = True
Me.rbCurrentPage.Location = New System.Drawing.Point(6, 19)
Me.rbCurrentPage.Name = "rbCurrentPage"
Me.rbCurrentPage.Size = New System.Drawing.Size(87, 17)
Me.rbCurrentPage.TabIndex = 3
Me.rbCurrentPage.TabStop = True
Me.rbCurrentPage.Text = "current page"
Me.rbCurrentPage.UseVisualStyleBackColor = True
'
'rbAllPages
'
Me.rbAllPages.AutoSize = True
Me.rbAllPages.Location = New System.Drawing.Point(6, 42)
Me.rbAllPages.Name = "rbAllPages"
Me.rbAllPages.Size = New System.Drawing.Size(67, 17)
Me.rbAllPages.TabIndex = 4
Me.rbAllPages.TabStop = True
Me.rbAllPages.Text = "all pages"
Me.rbAllPages.UseVisualStyleBackColor = True
'
'btnFindPrevious
'
Me.btnFindPrevious.Location = New System.Drawing.Point(3, 125)
Me.btnFindPrevious.Name = "btnFindPrevious"
Me.btnFindPrevious.Size = New System.Drawing.Size(91, 23)
Me.btnFindPrevious.TabIndex = 13
Me.btnFindPrevious.Text = "Find previous"
Me.btnFindPrevious.UseVisualStyleBackColor = True
'
'btnSearch
'
Me.btnSearch.Location = New System.Drawing.Point(3, 154)
Me.btnSearch.Name = "btnSearch"
Me.btnSearch.Size = New System.Drawing.Size(75, 23)
Me.btnSearch.TabIndex = 5
Me.btnSearch.Text = "Search All"
Me.btnSearch.UseVisualStyleBackColor = True
'
'btnFindNext
'
Me.btnFindNext.Location = New System.Drawing.Point(100, 125)
Me.btnFindNext.Name = "btnFindNext"
Me.btnFindNext.Size = New System.Drawing.Size(91, 23)
Me.btnFindNext.TabIndex = 12
Me.btnFindNext.Text = "Find next"
Me.btnFindNext.UseVisualStyleBackColor = True
'
'Panel2
'
Me.Panel2.Controls.Add(Me.tbSearch)
Me.Panel2.Dock = System.Windows.Forms.DockStyle.Top
Me.Panel2.Location = New System.Drawing.Point(10, 36)
Me.Panel2.Name = "Panel2"
Me.Panel2.Size = New System.Drawing.Size(306, 27)
Me.Panel2.TabIndex = 15
'
'tbSearch
'
Me.tbSearch.Dock = System.Windows.Forms.DockStyle.Fill
Me.tbSearch.Location = New System.Drawing.Point(0, 0)
Me.tbSearch.Name = "tbSearch"
Me.tbSearch.Size = New System.Drawing.Size(306, 21)
Me.tbSearch.TabIndex = 0
'
'Panel1
'
Me.Panel1.Controls.Add(Me.PictureBox1)
Me.Panel1.Controls.Add(Me.lblSearchFor)
Me.Panel1.Dock = System.Windows.Forms.DockStyle.Top
Me.Panel1.Location = New System.Drawing.Point(10, 10)
Me.Panel1.Name = "Panel1"
Me.Panel1.Size = New System.Drawing.Size(306, 26)
Me.Panel1.TabIndex = 14
'
'PictureBox1
'
Me.PictureBox1.Image = CType(resources.GetObject("PictureBox1.Image"), System.Drawing.Image)
Me.PictureBox1.Location = New System.Drawing.Point(3, 3)
Me.PictureBox1.Name = "PictureBox1"
Me.PictureBox1.Size = New System.Drawing.Size(20, 20)
Me.PictureBox1.TabIndex = 11
Me.PictureBox1.TabStop = False
'
'lblSearchFor
'
Me.lblSearchFor.AutoSize = True
Me.lblSearchFor.Location = New System.Drawing.Point(29, 7)
Me.lblSearchFor.Name = "lblSearchFor"
Me.lblSearchFor.Size = New System.Drawing.Size(57, 13)
Me.lblSearchFor.TabIndex = 8
Me.lblSearchFor.Text = "Search for"
'
'scMain
'
Me.scMain.BackColor = System.Drawing.SystemColors.Control
Me.scMain.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
Me.scMain.Dock = System.Windows.Forms.DockStyle.Fill
Me.scMain.FixedPanel = System.Windows.Forms.FixedPanel.Panel1
Me.scMain.Location = New System.Drawing.Point(0, 0)
Me.scMain.Name = "scMain"
'
'scMain.Panel1
'
Me.scMain.Panel1.BackColor = System.Drawing.SystemColors.Window
Me.scMain.Panel1.Controls.Add(Me.Panel6)
Me.scMain.Panel1MinSize = 256
'
'scMain.Panel2
'
Me.scMain.Panel2.Controls.Add(Me.pGamma)
Me.scMain.Panel2.Controls.Add(Me.GdViewer1)
Me.scMain.Panel2MinSize = 200
Me.scMain.Size = New System.Drawing.Size(1264, 676)
Me.scMain.SplitterDistance = 368
Me.scMain.TabIndex = 2
'
'Panel6
'
Me.Panel6.Controls.Add(Me.Panel9)
Me.Panel6.Controls.Add(Me.pSnapInButtons)
Me.Panel6.Dock = System.Windows.Forms.DockStyle.Fill
Me.Panel6.Location = New System.Drawing.Point(0, 0)
Me.Panel6.Margin = New System.Windows.Forms.Padding(0)
Me.Panel6.Name = "Panel6"
Me.Panel6.Size = New System.Drawing.Size(366, 674)
Me.Panel6.TabIndex = 2
'
'Panel9
'
Me.Panel9.BackColor = System.Drawing.SystemColors.Control
Me.Panel9.Controls.Add(Me.tcLeftPanel)
Me.Panel9.Controls.Add(Me.Panel7)
Me.Panel9.Dock = System.Windows.Forms.DockStyle.Fill
Me.Panel9.Location = New System.Drawing.Point(32, 0)
Me.Panel9.Name = "Panel9"
Me.Panel9.Size = New System.Drawing.Size(334, 674)
Me.Panel9.TabIndex = 5
'
'Panel7
'
Me.Panel7.BackColor = System.Drawing.SystemColors.Control
Me.Panel7.Controls.Add(Me.lblSnapInPanel)
Me.Panel7.Dock = System.Windows.Forms.DockStyle.Top
Me.Panel7.Location = New System.Drawing.Point(0, 0)
Me.Panel7.Name = "Panel7"
Me.Panel7.Size = New System.Drawing.Size(334, 32)
Me.Panel7.TabIndex = 6
'
'lblSnapInPanel
'
Me.lblSnapInPanel.AutoSize = True
Me.lblSnapInPanel.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.lblSnapInPanel.Location = New System.Drawing.Point(6, 8)
Me.lblSnapInPanel.Name = "lblSnapInPanel"
Me.lblSnapInPanel.Size = New System.Drawing.Size(82, 15)
Me.lblSnapInPanel.TabIndex = 0
Me.lblSnapInPanel.Text = "Thumbnails"
'
'pSnapInButtons
'
Me.pSnapInButtons.AutoSize = True
Me.pSnapInButtons.BackColor = System.Drawing.SystemColors.AppWorkspace
Me.pSnapInButtons.Controls.Add(Me.btnSnapInThumbnails)
Me.pSnapInButtons.Controls.Add(Me.btnSnapInBookmarks)
Me.pSnapInButtons.Controls.Add(Me.btnSnapInSearch)
Me.pSnapInButtons.Dock = System.Windows.Forms.DockStyle.Left
Me.pSnapInButtons.Location = New System.Drawing.Point(0, 0)
Me.pSnapInButtons.Name = "pSnapInButtons"
Me.pSnapInButtons.Size = New System.Drawing.Size(32, 674)
Me.pSnapInButtons.TabIndex = 4
'
'btnSnapInThumbnails
'
Me.btnSnapInThumbnails.BackColor = System.Drawing.SystemColors.AppWorkspace
Me.btnSnapInThumbnails.FlatAppearance.BorderColor = System.Drawing.SystemColors.Control
Me.btnSnapInThumbnails.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.btnSnapInThumbnails.Image = CType(resources.GetObject("btnSnapInThumbnails.Image"), System.Drawing.Image)
Me.btnSnapInThumbnails.Location = New System.Drawing.Point(0, 0)
Me.btnSnapInThumbnails.Margin = New System.Windows.Forms.Padding(0)
Me.btnSnapInThumbnails.Name = "btnSnapInThumbnails"
Me.btnSnapInThumbnails.Size = New System.Drawing.Size(32, 32)
Me.btnSnapInThumbnails.TabIndex = 0
Me.btnSnapInThumbnails.UseVisualStyleBackColor = False
'
'btnSnapInBookmarks
'
Me.btnSnapInBookmarks.BackColor = System.Drawing.SystemColors.AppWorkspace
Me.btnSnapInBookmarks.FlatAppearance.BorderColor = System.Drawing.SystemColors.Window
Me.btnSnapInBookmarks.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.btnSnapInBookmarks.Image = CType(resources.GetObject("btnSnapInBookmarks.Image"), System.Drawing.Image)
Me.btnSnapInBookmarks.Location = New System.Drawing.Point(0, 31)
Me.btnSnapInBookmarks.Margin = New System.Windows.Forms.Padding(0)
Me.btnSnapInBookmarks.Name = "btnSnapInBookmarks"
Me.btnSnapInBookmarks.Size = New System.Drawing.Size(32, 32)
Me.btnSnapInBookmarks.TabIndex = 1
Me.btnSnapInBookmarks.UseVisualStyleBackColor = False
'
'btnSnapInSearch
'
Me.btnSnapInSearch.BackColor = System.Drawing.SystemColors.AppWorkspace
Me.btnSnapInSearch.FlatAppearance.BorderColor = System.Drawing.SystemColors.Window
Me.btnSnapInSearch.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.btnSnapInSearch.Image = CType(resources.GetObject("btnSnapInSearch.Image"), System.Drawing.Image)
Me.btnSnapInSearch.Location = New System.Drawing.Point(0, 62)
Me.btnSnapInSearch.Margin = New System.Windows.Forms.Padding(0)
Me.btnSnapInSearch.Name = "btnSnapInSearch"
Me.btnSnapInSearch.Size = New System.Drawing.Size(32, 32)
Me.btnSnapInSearch.TabIndex = 2
Me.btnSnapInSearch.UseVisualStyleBackColor = False
'
'pGamma
'
Me.pGamma.AutoSize = True
Me.pGamma.BackColor = System.Drawing.SystemColors.Control
Me.pGamma.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
Me.pGamma.Controls.Add(Me.lblGamma)
Me.pGamma.Controls.Add(Me.tbGamma)
Me.pGamma.Location = New System.Drawing.Point(3, 3)
Me.pGamma.Name = "pGamma"
Me.pGamma.Size = New System.Drawing.Size(317, 62)
Me.pGamma.TabIndex = 1
'
'lblGamma
'
Me.lblGamma.AutoSize = True
Me.lblGamma.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.lblGamma.Location = New System.Drawing.Point(3, 42)
Me.lblGamma.Name = "lblGamma"
Me.lblGamma.Size = New System.Drawing.Size(80, 13)
Me.lblGamma.TabIndex = 1
Me.lblGamma.Text = "Current value: "
'
'tbGamma
'
Me.tbGamma.Location = New System.Drawing.Point(3, 0)
Me.tbGamma.Maximum = 50
Me.tbGamma.Minimum = 1
Me.tbGamma.Name = "tbGamma"
Me.tbGamma.Size = New System.Drawing.Size(309, 45)
Me.tbGamma.TabIndex = 0
Me.tbGamma.Value = 1
'
'GdViewer1
'
Me.GdViewer1.AllowDropFile = False
@ -725,7 +129,7 @@ Partial Class frmDocView
Me.GdViewer1.ScrollLargeChange = CType(50, Short)
Me.GdViewer1.ScrollSmallChange = CType(1, Short)
Me.GdViewer1.SilentMode = True
Me.GdViewer1.Size = New System.Drawing.Size(890, 674)
Me.GdViewer1.Size = New System.Drawing.Size(1264, 676)
Me.GdViewer1.TabIndex = 0
Me.GdViewer1.ViewRotation = System.Drawing.RotateFlipType.RotateNoneFlipNone
Me.GdViewer1.Zoom = 0R
@ -757,7 +161,7 @@ Partial Class frmDocView
Me.mainToolStrip.Font = New System.Drawing.Font("Tahoma", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.mainToolStrip.GripStyle = System.Windows.Forms.ToolStripGripStyle.Hidden
Me.mainToolStrip.ImageScalingSize = New System.Drawing.Size(24, 24)
Me.mainToolStrip.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.btnOpen, Me.ToolStripSeparator9, Me.btnClose, Me.btnPrint, Me.ToolStripSeparator3, Me.btnSettings, Me.ToolStripSeparator8, Me.btnMouseMode, Me.ToolStripSeparator6, Me.btnFirstPage, Me.btnPreviousPage, Me.tbCurrentPage, Me.lblPageCount, Me.btnNextPage, Me.btnLastPage, Me.ToolStripSeparator1, Me.btnZoomOut, Me.cbZoom, Me.btnZoomIn, Me.ToolStripSeparator2, Me.btnFitWidth, Me.btnFitPage, Me.ToolStripSeparator5, Me.btnAdjustGamma, Me.ToolStripSeparator10, Me.btnRotateLeft, Me.btnRotateRight, Me.btnFlipX, Me.btnFlipY, Me.ToolStripSeparator4, Me.btnAbout})
Me.mainToolStrip.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.btnOpen, Me.btnPrint, Me.ToolStripSeparator3, Me.btnFitWidth, Me.btnFitPage, Me.ToolStripSeparator2, Me.btnMouseMode, Me.ToolStripSeparator6, Me.btnFirstPage, Me.btnPreviousPage, Me.tbCurrentPage, Me.lblPageCount, Me.btnNextPage, Me.btnLastPage, Me.ToolStripSeparator1, Me.btnZoomOut, Me.cbZoom, Me.btnZoomIn, Me.ToolStripSeparator5, Me.btnRotateLeft, Me.btnRotateRight, Me.btnFlipX, Me.btnFlipY, Me.ToolStripSeparator4, Me.btnSettings, Me.btnAbout})
Me.mainToolStrip.Location = New System.Drawing.Point(0, 0)
Me.mainToolStrip.Name = "mainToolStrip"
Me.mainToolStrip.Size = New System.Drawing.Size(1264, 31)
@ -766,31 +170,16 @@ Partial Class frmDocView
'
'btnOpen
'
Me.btnOpen.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
Me.btnOpen.Font = New System.Drawing.Font("Tahoma", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.btnOpen.Image = CType(resources.GetObject("btnOpen.Image"), System.Drawing.Image)
Me.btnOpen.ImageScaling = System.Windows.Forms.ToolStripItemImageScaling.None
Me.btnOpen.ImageTransparentColor = System.Drawing.Color.Magenta
Me.btnOpen.Margin = New System.Windows.Forms.Padding(10, 1, 0, 2)
Me.btnOpen.Name = "btnOpen"
Me.btnOpen.Size = New System.Drawing.Size(126, 28)
Me.btnOpen.Size = New System.Drawing.Size(28, 28)
Me.btnOpen.Text = "Open document"
'
'ToolStripSeparator9
'
Me.ToolStripSeparator9.Margin = New System.Windows.Forms.Padding(5, 0, 10, 0)
Me.ToolStripSeparator9.Name = "ToolStripSeparator9"
Me.ToolStripSeparator9.Size = New System.Drawing.Size(6, 31)
'
'btnClose
'
Me.btnClose.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
Me.btnClose.Image = CType(resources.GetObject("btnClose.Image"), System.Drawing.Image)
Me.btnClose.ImageScaling = System.Windows.Forms.ToolStripItemImageScaling.None
Me.btnClose.ImageTransparentColor = System.Drawing.Color.Magenta
Me.btnClose.Name = "btnClose"
Me.btnClose.Size = New System.Drawing.Size(28, 28)
Me.btnClose.Text = "Close document"
'
'btnPrint
'
Me.btnPrint.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
@ -807,21 +196,31 @@ Partial Class frmDocView
Me.ToolStripSeparator3.Name = "ToolStripSeparator3"
Me.ToolStripSeparator3.Size = New System.Drawing.Size(6, 31)
'
'btnSettings
'btnFitWidth
'
Me.btnSettings.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
Me.btnSettings.Image = CType(resources.GetObject("btnSettings.Image"), System.Drawing.Image)
Me.btnSettings.ImageScaling = System.Windows.Forms.ToolStripItemImageScaling.None
Me.btnSettings.ImageTransparentColor = System.Drawing.Color.Magenta
Me.btnSettings.Name = "btnSettings"
Me.btnSettings.Size = New System.Drawing.Size(28, 28)
Me.btnSettings.Text = "Viewer settings"
Me.btnFitWidth.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
Me.btnFitWidth.Image = CType(resources.GetObject("btnFitWidth.Image"), System.Drawing.Image)
Me.btnFitWidth.ImageScaling = System.Windows.Forms.ToolStripItemImageScaling.None
Me.btnFitWidth.ImageTransparentColor = System.Drawing.Color.Magenta
Me.btnFitWidth.Name = "btnFitWidth"
Me.btnFitWidth.Size = New System.Drawing.Size(28, 28)
Me.btnFitWidth.Text = "Adjust to page width"
'
'ToolStripSeparator8
'btnFitPage
'
Me.ToolStripSeparator8.Margin = New System.Windows.Forms.Padding(10, 0, 10, 0)
Me.ToolStripSeparator8.Name = "ToolStripSeparator8"
Me.ToolStripSeparator8.Size = New System.Drawing.Size(6, 31)
Me.btnFitPage.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
Me.btnFitPage.Image = CType(resources.GetObject("btnFitPage.Image"), System.Drawing.Image)
Me.btnFitPage.ImageScaling = System.Windows.Forms.ToolStripItemImageScaling.None
Me.btnFitPage.ImageTransparentColor = System.Drawing.Color.Magenta
Me.btnFitPage.Name = "btnFitPage"
Me.btnFitPage.Size = New System.Drawing.Size(28, 28)
Me.btnFitPage.Text = "Adjust to whole page"
'
'ToolStripSeparator2
'
Me.ToolStripSeparator2.Margin = New System.Windows.Forms.Padding(10, 0, 10, 0)
Me.ToolStripSeparator2.Name = "ToolStripSeparator2"
Me.ToolStripSeparator2.Size = New System.Drawing.Size(6, 31)
'
'btnMouseMode
'
@ -962,54 +361,12 @@ Partial Class frmDocView
Me.btnZoomIn.Size = New System.Drawing.Size(28, 28)
Me.btnZoomIn.Text = "Zoom In"
'
'ToolStripSeparator2
'
Me.ToolStripSeparator2.Margin = New System.Windows.Forms.Padding(10, 0, 10, 0)
Me.ToolStripSeparator2.Name = "ToolStripSeparator2"
Me.ToolStripSeparator2.Size = New System.Drawing.Size(6, 31)
'
'btnFitWidth
'
Me.btnFitWidth.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
Me.btnFitWidth.Image = CType(resources.GetObject("btnFitWidth.Image"), System.Drawing.Image)
Me.btnFitWidth.ImageScaling = System.Windows.Forms.ToolStripItemImageScaling.None
Me.btnFitWidth.ImageTransparentColor = System.Drawing.Color.Magenta
Me.btnFitWidth.Name = "btnFitWidth"
Me.btnFitWidth.Size = New System.Drawing.Size(28, 28)
Me.btnFitWidth.Text = "Adjust to page width"
'
'btnFitPage
'
Me.btnFitPage.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
Me.btnFitPage.Image = CType(resources.GetObject("btnFitPage.Image"), System.Drawing.Image)
Me.btnFitPage.ImageScaling = System.Windows.Forms.ToolStripItemImageScaling.None
Me.btnFitPage.ImageTransparentColor = System.Drawing.Color.Magenta
Me.btnFitPage.Name = "btnFitPage"
Me.btnFitPage.Size = New System.Drawing.Size(28, 28)
Me.btnFitPage.Text = "Adjust to whole page"
'
'ToolStripSeparator5
'
Me.ToolStripSeparator5.Margin = New System.Windows.Forms.Padding(10, 0, 10, 0)
Me.ToolStripSeparator5.Name = "ToolStripSeparator5"
Me.ToolStripSeparator5.Size = New System.Drawing.Size(6, 31)
'
'btnAdjustGamma
'
Me.btnAdjustGamma.CheckOnClick = True
Me.btnAdjustGamma.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
Me.btnAdjustGamma.Image = CType(resources.GetObject("btnAdjustGamma.Image"), System.Drawing.Image)
Me.btnAdjustGamma.ImageTransparentColor = System.Drawing.Color.Magenta
Me.btnAdjustGamma.Name = "btnAdjustGamma"
Me.btnAdjustGamma.Size = New System.Drawing.Size(28, 28)
Me.btnAdjustGamma.Text = "Adjust gamma"
'
'ToolStripSeparator10
'
Me.ToolStripSeparator10.Margin = New System.Windows.Forms.Padding(10, 0, 10, 0)
Me.ToolStripSeparator10.Name = "ToolStripSeparator10"
Me.ToolStripSeparator10.Size = New System.Drawing.Size(6, 31)
'
'btnRotateLeft
'
Me.btnRotateLeft.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
@ -1056,6 +413,16 @@ Partial Class frmDocView
Me.ToolStripSeparator4.Name = "ToolStripSeparator4"
Me.ToolStripSeparator4.Size = New System.Drawing.Size(6, 31)
'
'btnSettings
'
Me.btnSettings.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
Me.btnSettings.Image = CType(resources.GetObject("btnSettings.Image"), System.Drawing.Image)
Me.btnSettings.ImageScaling = System.Windows.Forms.ToolStripItemImageScaling.None
Me.btnSettings.ImageTransparentColor = System.Drawing.Color.Magenta
Me.btnSettings.Name = "btnSettings"
Me.btnSettings.Size = New System.Drawing.Size(28, 28)
Me.btnSettings.Text = "Viewer settings"
'
'btnAbout
'
Me.btnAbout.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
@ -1068,7 +435,7 @@ Partial Class frmDocView
'
'pMain
'
Me.pMain.Controls.Add(Me.scMain)
Me.pMain.Controls.Add(Me.GdViewer1)
Me.pMain.Dock = System.Windows.Forms.DockStyle.Fill
Me.pMain.Location = New System.Drawing.Point(0, 31)
Me.pMain.Name = "pMain"
@ -1086,44 +453,7 @@ Partial Class frmDocView
Me.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
Me.Name = "frmDocView"
Me.Text = "GdPicture .NET"
Me.tcLeftPanel.ResumeLayout(False)
Me.tpThumbnails.ResumeLayout(False)
Me.ToolStripContainer1.BottomToolStripPanel.ResumeLayout(False)
Me.ToolStripContainer1.BottomToolStripPanel.PerformLayout()
Me.ToolStripContainer1.ContentPanel.ResumeLayout(False)
Me.ToolStripContainer1.ResumeLayout(False)
Me.ToolStripContainer1.PerformLayout()
Me.thumbnailPanelToolstrip.ResumeLayout(False)
Me.thumbnailPanelToolstrip.PerformLayout()
Me.tpBookmarks.ResumeLayout(False)
Me.Panel5.ResumeLayout(False)
Me.tpSearch.ResumeLayout(False)
Me.pSearch.ResumeLayout(False)
Me.Panel4.ResumeLayout(False)
Me.Panel3.ResumeLayout(False)
Me.Panel3.PerformLayout()
Me.GroupBox2.ResumeLayout(False)
Me.GroupBox2.PerformLayout()
Me.Panel2.ResumeLayout(False)
Me.Panel2.PerformLayout()
Me.Panel1.ResumeLayout(False)
Me.Panel1.PerformLayout()
CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).EndInit()
Me.scMain.Panel1.ResumeLayout(False)
Me.scMain.Panel2.ResumeLayout(False)
Me.scMain.Panel2.PerformLayout()
CType(Me.scMain, System.ComponentModel.ISupportInitialize).EndInit()
Me.scMain.ResumeLayout(False)
Me.Panel6.ResumeLayout(False)
Me.Panel6.PerformLayout()
Me.Panel9.ResumeLayout(False)
Me.Panel7.ResumeLayout(False)
Me.Panel7.PerformLayout()
Me.pSnapInButtons.ResumeLayout(False)
Me.pGamma.ResumeLayout(False)
Me.pGamma.PerformLayout()
CType(Me.tbGamma, System.ComponentModel.ISupportInitialize).EndInit()
Me.Text = "Document Viewer"
Me.statusbar.ResumeLayout(False)
Me.statusbar.PerformLayout()
Me.mainToolStrip.ResumeLayout(False)
@ -1133,32 +463,15 @@ Partial Class frmDocView
Me.PerformLayout()
End Sub
Friend WithEvents ThumbnailEx1 As GdPicture14.ThumbnailEx
Friend WithEvents tcLeftPanel As System.Windows.Forms.TabControl
Friend WithEvents tpThumbnails As System.Windows.Forms.TabPage
Friend WithEvents tpBookmarks As System.Windows.Forms.TabPage
Friend WithEvents scMain As System.Windows.Forms.SplitContainer
Friend WithEvents GdViewer1 As GdPicture14.GdViewer
Friend WithEvents statusbar As System.Windows.Forms.StatusStrip
Friend WithEvents mainToolStrip As System.Windows.Forms.ToolStrip
Friend WithEvents pMain As System.Windows.Forms.Panel
Friend WithEvents BookmarksTree1 As GdPicture14.BookmarksTree
Friend WithEvents btnOpen As System.Windows.Forms.ToolStripButton
Friend WithEvents btnClose As System.Windows.Forms.ToolStripButton
Friend WithEvents btnPrint As System.Windows.Forms.ToolStripButton
Friend WithEvents btnAbout As System.Windows.Forms.ToolStripButton
Friend WithEvents ToolStripStatusLabel1 As System.Windows.Forms.ToolStripStatusLabel
Friend WithEvents ToolStripSeparator3 As System.Windows.Forms.ToolStripSeparator
Friend WithEvents tpSearch As System.Windows.Forms.TabPage
Friend WithEvents pSearch As System.Windows.Forms.Panel
Friend WithEvents rbAllPages As System.Windows.Forms.RadioButton
Friend WithEvents rbCurrentPage As System.Windows.Forms.RadioButton
Friend WithEvents chkCaseSensitive As System.Windows.Forms.CheckBox
Friend WithEvents chkWholeWord As System.Windows.Forms.CheckBox
Friend WithEvents tbSearch As System.Windows.Forms.TextBox
Friend WithEvents btnSearch As System.Windows.Forms.Button
Friend WithEvents lblSearchFor As System.Windows.Forms.Label
Friend WithEvents GroupBox2 As System.Windows.Forms.GroupBox
Friend WithEvents ToolStripSeparator4 As System.Windows.Forms.ToolStripSeparator
Friend WithEvents btnFirstPage As System.Windows.Forms.ToolStripButton
Friend WithEvents btnPreviousPage As System.Windows.Forms.ToolStripButton
@ -1175,39 +488,9 @@ Partial Class frmDocView
Friend WithEvents btnRotateRight As System.Windows.Forms.ToolStripButton
Friend WithEvents btnFlipX As System.Windows.Forms.ToolStripButton
Friend WithEvents btnFlipY As System.Windows.Forms.ToolStripButton
Friend WithEvents lstSearchResults As System.Windows.Forms.ListView
Friend WithEvents ColumnHeader1 As System.Windows.Forms.ColumnHeader
Friend WithEvents ColumnHeader2 As System.Windows.Forms.ColumnHeader
Friend WithEvents ColumnHeader3 As System.Windows.Forms.ColumnHeader
Friend WithEvents PictureBox1 As System.Windows.Forms.PictureBox
Friend WithEvents btnFindPrevious As System.Windows.Forms.Button
Friend WithEvents btnFindNext As System.Windows.Forms.Button
Friend WithEvents Panel3 As System.Windows.Forms.Panel
Friend WithEvents Panel2 As System.Windows.Forms.Panel
Friend WithEvents Panel1 As System.Windows.Forms.Panel
Friend WithEvents Panel4 As System.Windows.Forms.Panel
Friend WithEvents Panel5 As System.Windows.Forms.Panel
Friend WithEvents btnSettings As System.Windows.Forms.ToolStripButton
Friend WithEvents ToolStripSeparator8 As System.Windows.Forms.ToolStripSeparator
Friend WithEvents lblSearchResults As System.Windows.Forms.Label
Friend WithEvents searchProgressBar As System.Windows.Forms.ProgressBar
Friend WithEvents ToolStripSeparator9 As System.Windows.Forms.ToolStripSeparator
Friend WithEvents btnFitWidth As System.Windows.Forms.ToolStripButton
Friend WithEvents btnFitPage As System.Windows.Forms.ToolStripButton
Friend WithEvents ToolStripSeparator10 As System.Windows.Forms.ToolStripSeparator
Friend WithEvents ToolStripContainer1 As System.Windows.Forms.ToolStripContainer
Friend WithEvents thumbnailPanelToolstrip As System.Windows.Forms.ToolStrip
Friend WithEvents pGamma As System.Windows.Forms.Panel
Friend WithEvents tbGamma As System.Windows.Forms.TrackBar
Friend WithEvents lblGamma As System.Windows.Forms.Label
Friend WithEvents Panel6 As System.Windows.Forms.Panel
Friend WithEvents btnSnapInThumbnails As System.Windows.Forms.Button
Friend WithEvents btnSnapInSearch As System.Windows.Forms.Button
Friend WithEvents btnSnapInBookmarks As System.Windows.Forms.Button
Friend WithEvents Panel9 As System.Windows.Forms.Panel
Friend WithEvents pSnapInButtons As System.Windows.Forms.Panel
Friend WithEvents Panel7 As System.Windows.Forms.Panel
Friend WithEvents lblSnapInPanel As System.Windows.Forms.Label
Friend WithEvents btnMouseMode As System.Windows.Forms.ToolStripDropDownButton
Friend WithEvents ToolStripSeparator6 As System.Windows.Forms.ToolStripSeparator
Friend WithEvents DefaultToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem
@ -1215,11 +498,6 @@ Partial Class frmDocView
Friend WithEvents PanToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem
Friend WithEvents AreaZoomingToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem
Friend WithEvents MagnifierToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem
Friend WithEvents btnThumbSize As System.Windows.Forms.ToolStripDropDownButton
Friend WithEvents LargeThumbnailsToolStripMenuItem1 As System.Windows.Forms.ToolStripMenuItem
Friend WithEvents MediumThumbnailsToolStripMenuItem1 As System.Windows.Forms.ToolStripMenuItem
Friend WithEvents SmallThumbnailsToolStripMenuItem1 As System.Windows.Forms.ToolStripMenuItem
Friend WithEvents ToolStripSeparator5 As System.Windows.Forms.ToolStripSeparator
Friend WithEvents btnAdjustGamma As System.Windows.Forms.ToolStripButton
Friend WithEvents ToolStripStatusLabel2 As ToolStripStatusLabel
End Class

View File

@ -117,232 +117,41 @@
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<metadata name="thumbnailPanelToolstrip.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>800, 17</value>
</metadata>
<assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
<data name="btnThumbSize.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAABZSURBVDhPY5gzZ86hhQsX/kfH8+bNO8EABXjVgBjYwJIl
S/7v3LmTG2QAPjWjBgANAIbkSRADHS9YsOAqSDMIEFSzf/9+HnQMlkACxKghD4wmpKGfkBZcBQAieM3N
5Ssp2AAAAABJRU5ErkJggg==
</value>
</data>
<data name="PictureBox1.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABQAAAAUCAYAAACNiR0NAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
xAAADsQBlSsOGwAAANtJREFUOE+llM0RgyAQhSkkqcwDFWgnHG0lFygjt6QQL0p4jDuz4i5gfDOfP7j7
zbskJsZoxnF8DcMQe0izyzRNT+xJ5AsG13XN1IK5EAKk3yR9pKP7wm3bqtK/hEz6KaUnoXPuBIULEe89
pO/0qAtrmec5S0tSdGGtIUINAeabwlYuC6WGEgiktxvydAmlNoAv1ciXzobGWhsJ6R2chLV2++JByN9B
b8NDGw3MNRviO2BLkojuXQ272hGXhch+F8+zMP3A1T9YfJcWtfMsbCEtaueioIQvEvK5jT89CqwvRD9H
oQAAAABJRU5ErkJggg==
</value>
</data>
<data name="btnSnapInThumbnails.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABgAAAAYCAYAAADgdz34AAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
xAAADsQBlSsOGwAAAkNJREFUSEu1Vt9LFFEU9t9IyF/5o7TI3V7DXnwr6KHHoMyh1kzX2QfR8iGEehFf
Bd8C03XdHXYJhRKyFylxRZQIyhIR9kld0Vpkif3xdc6dOzDu3BlN3A8+du7OOee795wzZ6ZC13VD0zSU
g6FQyKjgi3KBY7NAXq6VSP/Oyqv/B8d2FUj+3EXLsxhqtWk0d8ewkTqQd04PT4HazjB8wThu6Am00q8v
aOAHiQTHP+Pl5Aoy2Zy0dIdSYOn7Dm4Pv8f1XkMEt+jri6OxawZXe2K40h2l00XJumg6ucAhkMvnUUU7
Lw2uYkNgBh/XUtJTDYdA+k8WFx5MipT4FUEt8mkqH04htZeRnmo4BBjxL1toG5wVNah7HHGQi36tx0CC
7E6CUuAsGImtKbvsXATmktuoehRGK9WtWCzIf014CvzN5bF36P2Qfd3aR03nNPxUE07bneEP8o4JT4F7
r+dx6/msXDmxe3iEhicREdwq/uWnUQy8WZYWHgIvJpJo6oqKfu+lB6sUhUKRAhui2+zdxbxEjRBZ3BR2
SoG3n34JI8uhnnY5sbAh75poH5oTKbEHtsgnutgxJewcAis0f6qpPf19docE5TmM1c20sLk/uoBmmlH2
oKXkVmYcE9g5OEJ94HhO7WyiMfFtex+j8XUxMlQ2FutUAtwNJ40ITh2LBMYWxaRV2TBdBXgEqBwsinRp
YSFy99W8ssjMMwswOYVsd7P/nWs6PVPE7wA7eZfm++D05FhKgfOkXUAsygGOXdbPFl3XjX8XfMz78CT+
9AAAAABJRU5ErkJggg==
</value>
</data>
<data name="btnSnapInBookmarks.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABgAAAAYCAYAAADgdz34AAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
xAAADsQBlSsOGwAAAONJREFUSEvtlUEKgkAYhYPOEQUdoWVXyIXeQI+piBcIWraJLhEEoc7fe1E0M6hj
OtXGBx8zv6PzOY7oTES+ilHsdxuxmAdBUAFpIooiieP4kiTJVp9HxyiaBDhegcZQkOc5JdImMYpPBVxF
XddSFEWrxCiGCpgsyyhRtsSbgEnT9LESxJ/AhvuC+BEopQzKsvyJQGHIj8AO94OPCfmjQO97FzxZghX7
3gUYXKA9gTOgZA16p4/givaVG9BrZ/gmuQRoxmUSODMJnOkUhGGIZlw6P9f4Gx14Au9iCLwWcxzfc8rs
DuvrR+7pZhl2AAAAAElFTkSuQmCC
</value>
</data>
<data name="btnSnapInSearch.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABgAAAAYCAYAAADgdz34AAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
xAAADsQBlSsOGwAAAQtJREFUSEvVkbEOwjAMRNk7MvfPmkr9/6kSlWBogi+KI8dxIICqiuGJxL7zOeUS
QmgyTZMHzjm6lj3UuK97ErPIHBJAxoG4YYBGaKoeAc/AGqa4ANpoIHLAuq7Bex+3FRpsHuvoQwcP8TqA
hFcSjcT2RcBGjJghZ+YDoOY9Eb87mOc5LMsSz8QjgYGxjn7qwRP9cqYOiJsmolH85tBWnzVy5tsA+Ylw
F5pc0xo5swrQsFnXEcBnrZEzq4C03XEvSOY/CmDTURRb6/MntGY0XyCebfZbaJ/5Akto0ePrDpB/HOj1
dX8iK8DinBf0CH8KsOgJsDjnBVqYyCJgBSQ9U83AGcK9ByPA1JW4/Qmi9JEwOcOc3gAAAABJRU5ErkJg
gg==
</value>
</data>
<metadata name="statusbar.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 17</value>
</metadata>
<metadata name="mainToolStrip.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>249, 17</value>
</metadata>
<assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
<data name="btnOpen.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABgAAAAYCAYAAADgdz34AAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAALYSURBVEhLzVTfSxRRFN7Syh6EqP6C/oDoLYTIiH6sO2tK
pNZDhLUz1T6Umutuad1iZraENeil8CF8CAl3Z3bT9A5F5EvQW4EILVrZr8WdDYQCTdfdne65zkzjxRVj
DTrwcc85d+73nXPuzLj+a0MIbaxRxYNeRWzjFPlKjSofbohGy8zt0swbD1dxqpwkMJYhJr/3KOJ+8zGX
KxQK9QeDwYIJg8SGFYNvot98nBqQH1HRXF3ijlEbD9vkJ5/eXfIfoXkuJh6gDzsJiwmYeSoCYyEkSSAH
slff3hl18du2iI2YOFU9isqpwBoBghGYORAcI6RADvYm/cGoNwUXcou2iEeVuGUdFPGtDgARuEyLgBWB
XKFQ+COgyF1rEbB9EPAoUsAiADhFcvk8Xb32vnT9b0YEwJwiHYXDDYMRWwQwt7hAycGsi/cqcj3TQeB+
dyBQ2dPTunVgBfQhVCH09m6CC7SIZ7PzRjafs7FIAJdeE5NSbnxvi1PgJ3lDysej/j0TuDGf0QRj4jFf
AFg+rGns6+YU8RCnoqwlwmKfinJwwfoIf9MxouBzeA0/DfGXgKgYJrWmvK4Jx2FUUCVL7o6htFeRajP4
vOer5vthd3At1HELBFIjwoCzarYDmsN8jlQn1sfDOwjpCXLxMoD8Mpogl8ECSg01ZqeHfc/sDlBnuzsa
bSjTcfNnq9pSoWMhRAX8fv9CBLXtHFMu7mKrdvrOHBuv5E8P83vNDoLjhuHa8DFx4fRqB5w5Nmb9NG6e
mRo9U2EKdDyk8x/mH8Dm+oDMHwwEbnR28ODr+NxYsYrYHBuzflrzdVkCBRm1737bd3nbpCbkih1gc2zM
+hnMV1OBlpaWGfKBbU6qgpturAtOzX5/craSCpBv4AWsXwYFCTaLVcTm2JjxX1NysM6rQQnW1Ijv5SoH
qO/MsbHT1zHfQ8nBEGrdDquOlwRKRkL4ldaEKkr+783l+g1xweFfKtch/wAAAABJRU5ErkJggg==
</value>
</data>
<data name="btnClose.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABgAAAAYCAYAAADgdz34AAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAADZSURBVEhLYyAX2FVM+2dXsfk/CEOFqAfoZjhWXLbJE6qU
PACxgC6WQAyDCoGBTdnGCXS1BCxQUVHRBcR/gPg/DtwFVkgCgFkC5gAN+IZmIDZ8PDQ0lBmsgUgAsgTM
iI+P/43FQEowqo9pYAH18wZecGZm6r+X21L/v9qeBsYgNgiDxGFiIAzjI4vD1KLrhxoNAciKKMEwC0AO
gBoNATAfUAvTzAKa+2DoWwDDGBZgU0QOhvkAxIYaDQHoCinFNPfB0A0inBY825Tciq6YVIxsOMg8qNFA
wMAAAAm1IPYi8wi5AAAAAElFTkSuQmCC
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAALWSURBVEhLzVTdSxRRFN/Syh6EqP6C/oDoLewhI/pYd9aU
2KV6iLB2ptqHUnPdLa1bzMyWsAa9FD6ED+GDuzNrmt6hiHwJeisQoRUq7WNxZwOhQHM/p3uuM9N4ccXQ
oAM/7jnnzv39zjl3Zlz/tSGENjeo4mGvIrZzinytQZWP+uPxKnN7feZNRus4VU4RGMuQkD94FPGg+ZjL
FYlEBsLhcNmEQWLDisE3MWA+Tg3Ij6looWnontGYjNrkp5/dX/KfoEUuIR6iDzsJKwmYeSoCYyEkKSAH
stff3htNybu2iI2EOF0/jqqpwBoBgjGYORCcIKRADvY289FoNgVzxYIt4lElblkHFXyrA0AMLtMiYEUg
Vy6X/wgocvdaBGwfBDyKFLIIAE6RYqlEV6+9L938mxEBMKdIx+GwfzhmiwAWCjlKDmZdvFeRm5kOQg97
QqHa3t627YMroB+hGqGvbwtcoEU8n1808qWijQIBXHpDQkq78YNtToGf5A2pnowH96Wwr5TVBCM1wJcB
lg9rBgd6OEU8wqkob4mwOKCiIlywPsbfdowo/AJew5kR/goQVcKU5i/pmnASRgVVsuTuBMp4Fakxiy96
vmqBH3YHNyKdd0AgPSYMOqtmO6A5zBdJdWJzMrqLkPrIxcsA8ss4BbksFlB6xJefHQ08tztAXR3ueNxf
peOWz1a164WOhQgVCAaDuRhq3z2hXN7DVu30nTk2XsmfHeX3mx2EJw3DtenT0KWzqx1w5tiY9TO4ZW56
/FyNKdD5mM5/lH8EmxsDMn8wELjV1cmDr+MLE5UqYnNszPoZLdBtCZRl1LH3Xf/VHVOaUKx0gM2xMetn
MV9PBVpbW+fIB7Y1pQpuurEhODP//en5WipAvoGXsH4ZFiTYrFQRm2Njxn9DycG6roclWNNjgVerHKC+
M8fGTl/HfC8lB0OobSesOl4SWDeGhF8ZTaij5P/eXK7f+QvgC3kCWOcAAAAASUVORK5CYII=
</value>
</data>
<data name="btnPrint.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABgAAAAYCAYAAADgdz34AAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAFeSURBVEhLvVVBboMwEKSteumf2l/wBcQZCcGl8jfSS3qo
+AA5VlXf0ScgDkhRKw6hdnccb2NMkZ2kZKSRZ1e7O94ERDSHoigkUeEsy3J0MhEzTVsYhBDXNECF4miD
JElulzUQ4m7hDZ70BlJKPcA+mRwDRxk8lBt1Ds2YA8j9LU3TbzwVwzCo+6ImvkgU47S1nXNjaLDrOv10
0cxdnucVDH4fvf80MDMHbcCEAReeSv5PmEtvIEcGfd8rsX6nhloX780O2s65MTR627adN6jrWjVNI3EL
rIrT1nbOjaHRW1XV1GBJjjbwaTvnxnP6MhtoYQA9dyM758ZzGgN1wiYXhcIdyhpvMz4sG0pMTMBQ/NVL
HIgr88NMgSLG8+uHWjtEjoHb4iNlWsNgG/hwtoFvA9TGcXxjWsPgbuC+uRwDp26wNf1eZFn2RS1X+85A
0K3Io9xiEw8/iY+mzUEU/QA62uN7tDI4aAAAAABJRU5ErkJggg==
</value>
</data>
<data name="btnSettings.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABgAAAAYCAYAAADgdz34AAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAALBSURBVEhLpVY9iBNBFA6ihY0WilqJ1SlR7iebYHOYRrGx
ELTxB+0SJcnuzGxQCyFooZUIniBidXiHnGSzmxNtxcZrLLzTwuLgGrGxUeFOOGPW903exDG5xJD74DHv
ffPe997MbCAJg5RXPcmuRkaGfjI/84v4q0wND8etzjgiiB0VzSEel8FYRkUxuKQIGjppM5goPPsBwY0s
LaMnnDY8jrr1vZgWglhTpeBj2xfBFKdtDqbBeGkuqePrz3eCa/FhKVt5vVUnDgPHnd8P8SMqWmNKg97k
PXhjaREd563B4cgw/3fSKE65tVPgM6J+uMWHcVrV6arCeMKPjmHPd92MECJWSsW03gLXEzTlit0Aa1LM
rrb8MM54wcusejo9KWbvZNXj3aiRnpe3GrzQQr3gqPoJfXxVm6Zv/yH8VkzvoaIl5FxTxYaU8o0uIJBw
BHFYsVj8yjT4c+Aod4ypbuA3gFOgQUZUXylRXFVKxlJPLBtYMX0+n/8NMfh8mgXLjz3PO8iS3cCPCw0c
L1y4Im5c9qmBLUgTNk2Mlbim5aPBZ5baGKOqNjLqB3s4TJDgopnMiJgYq9W8ibhQKOzi0sGAK4JAh02R
2D1a1zv4mMv6Q0r3IgncJ1tEkTXleqVS2cJpGq7rfjM5OAH5b+kNBPGTnNINFPSwru+euEJHTts4pRvY
xDQ8kX2CMqe0QdNeMjlWnjZO6QY97BkqvEvHXLIb0AN+4ZQ2SOiTyYEoroxsnupvckpv4L5RbBuJLPu+
f5b80zTIh8592mt/gQOBJvmJyVBspjQx1o5r+c5lg4EK6kbYrMbs2PhoQqe6zeX9USqVdqDQsrWOuKdR
k+0s0x+UPIICuqZHiMvl8j6achmTgqd1hfYOYI/8d8z/8wfiv8jlctvY1SAR/AB1AxJ/wLQGcYfYHR50
/PMQZ7vA9AZIJP4Ap6NoKkQX6Q4AAAAASUVORK5CYII=
</value>
</data>
<data name="btnMouseMode.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABgAAAAYCAYAAADgdz34AAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAHBSURBVEhLnZM9LwRRGIU38VVp/AG9RqFBZkao/AA6CZVE
RISwM6JQEBqJiB9AsQVLgrkb8VHQkBBZCrUEJR0hIVz3jHeTiXvWzHqSJzdz33vO7M7uZMrR25uvcvxC
nxuo0Muq++ah3IcXKD2fv9JYo2uzjznO4bxEk2kd229wsuoMRb/dOr219iDOIycVf2M+1R4r6Vk40nMb
xWhlc+SkojzelHJZGD6/vWuAlc0jTV6qOJ4frtCgMQ6bR5q8VHGcSXVBg8Y4bA6RlyqOM66eWBDGYXOI
vFRxvCH1yYIwDptHmrxU2XTMHFfTkLFruqCvb5/0i/mBseKanYNSZ9MyeFnDAnGzq+d0v2SHUepsSjc4
KD78y8LFXXQTqbNh3wCPon/pRPtr53p2vagXNq+iFdfYZ49K6mzSPKI0Sp1N00y+lgUqVepsukf26lig
UqXO5udvmvtiofTmvqSO89ebnMbEN9kJ1CELphV5qeK4fjjMgmlFXqo47ZM79W2BemThJJFDXqrK4/q7
A6wgSeSkIhnXV8uspJw4L9H0uEE40Ty6/cYKS2KOcxKpnM7pQqMThIum7Mb4GvMG+5jLUUIm8w2RObjw
JX2JXAAAAABJRU5ErkJggg==
</value>
</data>
<data name="btnFirstPage.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABgAAAAYCAYAAADgdz34AAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAGjSURBVEhLxVQ7S8RAEF7Uq0VRLO1tr1BINgHxD6gERRG7
q31ddg+RIIhoob2VvShedg8RLPwDoqCo/0Hw2frM5Ca67OXO5LjoB0Mm8/i+nSFZkgWGS34fuq0FEFMm
Nql78IwhQiwuP1Xrn919xVRi2Auih3KxYXDxFPFgihDKtj7AIAjPNAJm6ajXZGI96H3RebCkOQEgpkyu
DTLxqPaqPpamW5HJK11AbM3tP+h9umFLsgmG5o+7qeuvGqy6Y7W+no+tjQXCE3O5Qpl/r9clFoCAapGA
xcWytVi+0/NJLSQH1JxiTLzDjmvi2rsaj/ORPkagga++/1aP9H8gAIEsDOn/YYIBLt+CO+VSj6c1pI//
D0bYSafB5KhRFOcW3/4+vVoXPev5SB8vgCniOHvtwfU7HvxoF3pdYgEIqBZ3VdjeaYfNK06a1WFr4wlq
4Hltwb0/YSyB0M/qol7Vx46UAgiYyHTlpOmWr9Re1cfSZCuqh3zhLGe5Ysrg/o3OgyXNTaAj/BiKcpq6
4jpaHaZai3xhJ2dzMWMWD28xlA1gdVWPkC8ZoDJ5AYCZmAAAAABJRU5ErkJggg==
</value>
</data>
<data name="btnPreviousPage.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABgAAAAYCAYAAADgdz34AAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAHLSURBVEhLY6AZqK9ngrKoC4zTzrDalG0OsS3bdAIqRB1g
X7+fw7Z8U4pdxeYbQPwfhKFSlAH7/PUCduWbyy1KNz2zLe/9BzIYRIMwVAl5wKlqszTQxZ02RZveIBtK
sQU2FVvV7Mo2T7esWPsFFhS4MFQLMeA/o1XpBhOb8k0rtSo2/0F3KS42VDMeAExq9hVbXGzLN+yxDdr0
F9kAiiwIDV3FbFuxKdymdPMpu+DNf0GayMFQ4xDAtXgnNzD9ptuVbryJzUXIfGRxXGyosQwMFoU7hIAp
ohSIn+LTgMzHpQaZDTbctnxjg23BmnfEaEDmE6MebIFdxZY064rN9+0q+sCS1MRgC0DAI3cbu33Fplib
sg2X8bkImY9LDTIbajwCAMsTFpvKTQHAjHQEpJBSDDUWO7Ar3eBoXb5xh3z8/N8wFyG7EEbjY0ONwg/s
yjcY2pRtXGGbteknsgFUswAGgEWFum355qn6+eu/gwwhBkO1kgZsq7ZLgkpRu4qNb7G5GpkN1UIesKnY
ImhbtrESVA/QxAIYABUvoLxkV7LhLshwZAxVQh0ASuK2pZujgbXbWar6AAMAi3ig672sSzcdhIrQCvxn
ZGBgYAAA+IeNtEQs0ocAAAAASUVORK5CYII=
</value>
</data>
<data name="btnNextPage.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABgAAAAYCAYAAADgdz34AAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAHCSURBVEhLYwCD+nomCINGwLZs0wmbss0hxmlnWKFC1AV2
FZv/Q/EN2/JNKfb1+zmgUtQBtuW9/0AYZAmItijd9MyufHO5ff56AagSygC6BTC2TdGmN0AfdTpVbZaG
KiUPQIMHJ7asWPvFrmzzdJuKrWpQLaQBXD5AZ2tVbP5jU75ppVXpBhMGhv+MUO2EAT5DkdlwsaBNf23L
N+yxr9jiQlQSB2kkCwdv/mtTuvmUbcWm8NDQVcxQ4zABuktxsZHF0Pl2pRtvAvNTumvxTm6osQiAVQOp
FsDZm54CcalF4Q4hqPHUtgDKLljzzrZ8YwPYApAAdXHfP+uKzfftKrakgS3A6Qo0NrIYOh/GtinbcNm+
YlOsR+42drDhIACSpBiXbT5iU7kpAFiOsUCNRQB8LkJmI4uBsHz8/N/W5Rt32JVucIQahR3ANBBtQdam
nzZlG1fYlW8whBqBH4A0EoP189d/ty3fPBVYVKhDtRIH0F2Kyd74FlSq2lZtl4RqIQ1gN3Tzf1C9YFu2
sdKmYosgVCl5AGQYCi7ZcBeUhrFme3IA3NXlm8/alm6OxprUKAHWpZsOAl3uRcPWBQmVB0mAgQEAOL+N
tDkCuiEAAAAASUVORK5CYII=
</value>
</data>
<data name="btnLastPage.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABgAAAAYCAYAAADgdz34AAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAFxSURBVEhLY4ABp8qN4lAmbYBt2dqPtuWbOmlmkV3F5v8g
bF2x6YNtxaYO+6JNIlApooF8/PzfMHNgGCoF9EF57z+QAIiGsj/ZlG9qs6ncJgpVQhCALEA3ByqF1QIw
27x803vb8s0txFiE1wKQIF5csOYd2KKKLYJQLRiA1CDCYINo63JgHJVtbLQo3CEE1QoHZAURMhtZzLZ8
41vbis21yD6iLIhw4eINr+wqNlWDzKBKEMHE0PngOAra9BddHGo8FSzAwYYaTwcLQIK0wFDjh4APgGXY
Ja2KzX/QxaHGk+uDvn/WpZvOWZdvDnQp381P7Yx2Hli8B4eGrmKGGkGdjAYKCvuKLaH29ftZoFrhgIKM
BgyKkk2XgPVEOEN9PRNUCwYgK4hsyjZctinbHIHNxeiApCCyrth4za5sU5Rx2hlWqBKCgIgg6vtnW7bp
qm3p5mjkyCMW4PWBTen66/YVm2KN02YS7WKSAClBQTxgYAAAoRcyeTnPBtoAAAAASUVORK5CYII=
</value>
</data>
<data name="btnZoomOut.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABgAAAAYCAYAAADgdz34AAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAMHSURBVEhLtVXfS5NRGA6KLuqiKCSCqIsi6Da69qL+Bm/S
EHXqnNrEOdBy+ywhMCxMSizUSiuDuugHoURZEgSCGYUpzDValtPP2dSklq3v9Lz73vN5PqeoSQ+8e8+P
5zzPec92zjYsB5fLta+goMCbn5//BHmksLBQR/sj4in61Q6H4yBT14acnJw0CFzLzMyMQ9SgcDqdQs0c
84jbMNrDS1cGhI9AJExCq43c3NwJ5KMssTxQ+mHsZkbukBZzntO0c58uXG4aratrGKP+Yg5Vi80dY6lU
5OXl7QAxJBdQlJSURF/29o6PT0wYQkE0OmUMfhgSZWVlP1U+QofJXpa0A8QGIsvwer1fwuFwggRjsZjN
QPZ1XTeam5v/qOsQd1lyAaWlpWlwT5ZNpOLi4ulQKJQgoZVicnLS0DTNOq7s7OzfRUVFh1jaBCYcXGKS
9KCrW6fFye0Capsg+zIHRoJWBaSBY9JY2gQG2iUB7r9mv8/ZRFcyMPBZc+asZQK95yxtAoOvZQXl5VVR
Wphe+UikVz5GUFbb6pjZJ37bzVtWBYhRljYBx3fSAOcZpV2lii1vQOi8/1A1iLG0CUy8kgZVp07P/ksF
rTfaLQPcp88sbQITLTRJgfcnMT0zazt3tU2QfZkNfAk+v5Zcz/GMpU1g4LisgAhd3d1rMhgaHrbESQNH
Xs3SJjCwDZNTkoQbmggEAqsyiMfjora21jJAzOMUDrD0AuDslxVQ9vl8RjAYXPJyyYhEIkZjY6O1c84d
LGkHqthCvyZJpvB4PKKn54X4OhaxVaDj9va/GRB+v98Slwb4gvvwEuxkWTswuR8kei3VksVJt1vUna8X
V662iPqLl4SnooIupI2jBjbaT48ny9pBJlSJ3JG6OxlybCmObENngP64WNaOrKysrSDVgPBt8WJVBLv8
gdwEsXuL57j9FpxdLJsKt9u9HcQTILYh03MyiNyHCjvRdkF4N/EyMjI2Y/wOiS4R75Ni6wVMNsK0A5Fy
XExZP/CObUJ11/+bAYFNWheOyCn+AiN8Lour/FuLAAAAAElFTkSuQmCC
</value>
</data>
<data name="btnZoomIn.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABgAAAAYCAYAAADgdz34AAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAMLSURBVEhLtZXfS5NhFMeDoou6KAqJIOqiCLqNrkvKf2E3
acjm1LmxJmK62GpdJVg0L5xS2A+yMqibikhC10VkCGYUppAVVBA0cb/U/Xjn9vQ9e87T++7d1i/pC4fn
eZ/nnM855/3xvOuqyel07mlpaTnV3Nz8GON8a2trBPOPsKe49tvt9v3s+neyWq01AFypr6/PAFogczgc
wjiyabDbSLSLQ38vgA8B8plAf2o2m+07xqOMqC60fhDVJFSFFEzjSY9H6+npiQ3duCXO9/UvejyetNmH
ukVxxxhVrqampm1w/KQCyDo6OlIvJl6KTDYrjFpdzYuZd7Oiu7s7ZvSHRZBkNyNLBcc+clYWCAS0eDzO
SCEOex/9NCVN00QoFEoZ42B3GanL7XbXIPsyVUFO7e3tmWg0yhgpCX8ojpzWE5ByuZzwer2LKraxsTHX
1tZ2gNFS2LBzi0WnsfEwh+uqloD0fv6DqK2tzVMsMXCbAoyWwsJN2iRzuVyryaVlDtVV6RYpFQpCdHV1
JRQDvHFGS2FxQnWAB7tCQVStqrp0blyT16SBwcEIwZnzldFSyPhGJbhw8VIxoBz26wQj9x8Uq2dOjNFS
2HiuEvj8Z1L/kqDf0AG+py+MlsLGEG2S1dXV5eOJZDHIKAmWZlYBD6Gzs3NJMWBjjJbCwnHVATk8GR3l
UF2q8kpv0ezcnPkt8jNaCgtbsLlIDmQ4RbORSITDpap1kMlkhM/ni6tYmIb4fYzWhcxnVQc00gezsLDA
mModpNNpEQwGzefSMCNLhS420dukEpBRJ+HwM7GSSjNSSsPXO/Vqms6ipNGf5njAk/iWtjO2VNjcC6dv
5Gg06gZnUzJ0eQhnVG/cg6ME60VgJUOhU3R4MrZUlIQ6URUZqzOvma+Nc3Cm6cfF2FI1NDRshtM5OETN
wUYIqkxhHADsnnmP56/hs4Ox5cKPZSscT8DxGkY6TmYwTqLDEcydAO8kP4vFshHrdwhawd4WYWsVkqxH
0mFY2e1il7ULL8IGdHf9vyUgcZKr+i1yiB9QVhBlbWU40wAAAABJRU5ErkJggg==
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAFdSURBVEhLvVVBTsMwEAwgLvyJ/iJfyAMiRfEF+RsgIRCK
+EB6RH0IL4hyyKUC5VBjs+N6qeMQxW0JI408u/LueBNHSaZQlqUmGqxCiMHKRMx0ZXGQUl5SAxOLow2y
LLte1kDKm4UneLATaK1tA39lcgwcZbASa3MOXZsDyH1Dz/wLt0IpZW7LmviisRmrr/1cGEODXdfZ20U9
d0VRvMLg5+r9pYHrqawBEwa88VTyO2EuPYEeGPR9b+Tjhgpqu3lvdtB+LoyhUdu27bRBXdemaRqNU2BU
rL72c2EMjdqqqsYGS3IwwZz2c2E8pf9nAiscoKdO5OfCeEqjoU345E2xCJuyxteMH8uaEiMTMBa/1RIV
8d49mDGwifH89m6eAiLHwGnxk3KlcfAN5nC2wdwE2Jum6ZUrjUM4QfjlcgycOsHW1c8iz/NPKrnYV0aC
TkUeYotJZvhBvHNlAZLkG3J84rP7mcAYAAAAAElFTkSuQmCC
</value>
</data>
<data name="btnFitWidth.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
@ -363,18 +172,109 @@
bbNl4x8AxmOG+ql7uj8AAAAASUVORK5CYII=
</value>
</data>
<data name="btnAdjustGamma.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<data name="btnMouseMode.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABgAAAAYCAYAAADgdz34AAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAHSSURBVEhLtZW9q8FhFMfvv2C32+12q+yURSwWi0EWy48y
SkzeBpGXEgsGL4NQFiUiksKAGJCX7+2c7k9Xt1vU7zl1+j0vp/N5+j7POb8vSZIg0hlwuVyw3W6xWCww
HA7R6/XYaU5eKpUQDAbh9/vh8XjgdDphs9lgtVr5azabYTAYoNVqodFooFaroVKp/gcMBgPc73fIdrvd
kEql/gCazeZPBJBOp98HbDYbXptOpzgej5xgPp+/AOx2O/b7Pe9dr1cYjcb3AZSUJCqXyygUCtjtdpwo
HA4/AV6vl9fISEKdTvc+gL71ep0BmUwGjUaDE1Wr1Scgm83yGklpsVg+A/T7/RdAMpnkeyDJZADFkVGc
Xq//DEDy/AZEo1Esl0ucTicGuFwu1v3xeMDhcCgDaLfbfOJAIIBIJMLjbrfLl6sIIJfLcdJYLMZ7ZG63
WzmAfOpisYjVasW1YjKZlANQJdO7pwdARjWhOGA8HuN8PmMymXAlKw5otVp8eio4IYB8Ps8xci9SHFCr
1dDpdMQAQqEQ96jRaCQGQGOy9XotBkAviFoDdVYhAOpDlUpFDCCRSLA81KJns5nygHg8zn3/cDjwv0GI
RDSne/D5fJ8DxLmEb5O9KJA8vBLfAAAAAElFTkSuQmCC
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAHMSURBVEhLnZMxSxthHMYDte3k4hfoXigOXarcXWinfgCz
Ce3UDKWIYnJXMmSwNEtBxA+gZGqjoL03hKqDLgoRiR0yB1pHs7UYUJq373P+A4fvk9zFH/x4uff/Ps8l
l1xmGLlc7YHj1+fdQIVeUf1+lq/eeIHSn2vnGmt0bfYxxzmcl2gyLxZ/TDlFdYKiu24fd6w9iPPIScVo
zKdqsJK5yoH+9K0VrWyOnFQMx/uoXBaGf3rXGmBl80iTlyqO54frNGiMw+aRJi9VHKegTmnQGIfNIfJS
xXGWVJcFYRw2h8hLFcfLq38sCOOweaTJS5VNtnw4QUPGV6W6/tnp6r/mB8aKa3YOSp3N83dnD1kgbnGj
SfcHZo1SZzO4wV7r4l7WT39FN5E6G/YN8CjerB5pf7OpV762dGXrPFpxjX32qKTOJs0jSqPU2Twt1x6x
wLhKnc3rD43HLDCuUmdz+zet9lkovdW+1HFGvclpTHyTnUDts2BakZcqjuuH71kwrchLFWe2sDs5E6hL
Fk4SOeSlajiu//0tK0gSOalIxvXVGisZJs5LND1uEC5PL+z0WOFAzHFOIuPzslR/4gThF1PWNl7FbGMf
czlKyGT+AwCduNwvJFIOAAAAAElFTkSuQmCC
</value>
</data>
<data name="btnFirstPage.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABgAAAAYCAYAAADgdz34AAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAGkSURBVEhLxVTLSsNAFB3UrkVRXLp324VCMgmIH6BIUBRx
17WvZqaIBEFE0R9w5V4Um5kiggt/QBQU9R8En1ufuemNDtO0JqXRA5fc3Mc5cy/JkCwwXPL70G0tgJgy
sUndg2cMEWJx+ala/+zuK6YSw14QPZSLDYOLp4gHU4RQtvUBBkF4phEwS0e9JhPrQe+LzoMlzQkAMWVy
bZCJR7VX9bE03YpMXukCYmtu/0Hv0w1bkk0wNH/cTV1/1WDVHav19XxsbSwQnpjLFcr8e70usQAEVIsE
LC6WrcXynZ5PaiE5oOYUo+IddlwT197VeJyP9DECDXz1/bd6pP8DAQhkYUj/DxMMcPkW3CmXejytIX38
fzDCTjoNJseMoji3+Pb36dW66FnPR/p4AUwRx9lrD67f8eBHu9DrEgtAQLW4q8L2TjtsXnHSrA5bG09Q
A89rC+79CWMJhH5WF/WqPnakFEDARKYrJ023fKX2qj6WJltRPeQLZznLFVMG9290HixpbgId4cdQlNPU
FdfR6jDVWuQLOzmbixmzeHiLoWwAq6t6hHwBNFExZZSK/OwAAAAASUVORK5CYII=
</value>
</data>
<data name="btnPreviousPage.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABgAAAAYCAYAAADgdz34AAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAHLSURBVEhLY6AZqK9ngrKoC4zTzrDalG0OsS3bdAIqRB1g
X7+fw7Z8U4pdxeYbQPwfhKFSlAH7/PUCduWbyy1KNz2zLe/+BzIYRIMwVAl5wKlqszTQxZ02RZveIBtK
sQU2FVvV7Mo2T7esWPsFFhS4MFQLMeA/o1XpBhOb8k0rtSo2/0F3KS42VDMeAExq9hVbXGzLN+yxDdj0
F9kAiiwIDV3FbFuxKdymdPMpu8DNf0GayMFQ4xDAtXgnNzD9ptuVbryJzUXIfGRxXGyosQwMFoU7hIAp
ohSIn+LTgMzHpQaZDTbctnxjg23BmnfEaEDmE6MebIFdxZY064rN9+0qesCS1MRgC0DAI3cbu33Fplib
sg2X8bkImY9LDTIbajwCAMsTFpvKTQHAjHQEpJBSDDUWO7Ar3eBoXb5xh3z8/N8wFyG7EEbjY0ONwg/s
yjcY2pRtXGGbteknsgFUswAGgEWFum355qn6+eu/gwwhBkO1kgZsq7ZLgkpRu4qNb7G5GpkN1UIesKnY
ImhbtrESVA/QxAIYABUvoLxkV7LhLshwZAxVQh0ASuK2pZujgbXbWar6AAMAi3ig672sSzcdhIrQCvxn
ZGBgYAAALF6M3mV0ZSsAAAAASUVORK5CYII=
</value>
</data>
<data name="btnNextPage.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABgAAAAYCAYAAADgdz34AAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAHCSURBVEhLYwCD+nomCINGwLZs0wmbss0hxmlnWKFC1AV2
FZv/Q/EN2/JNKfb1+zmgUtQBtuXd/0AYZAmItijd9MyufHO5ff56AagSygC6BTC2TdGmN0AfdTpVbZaG
KiUPQIMHJ7asWPvFrmzzdJuKrWpQLaQBXD5AZ2tVbP5jU75ppVXpBhMGhv+MUO2EAT5DkdlwsYBNf23L
N+yxr9jiQlQSB2kkCwdu/mtTuvmUbcWm8NDQVcxQ4zABuktxsZHF0Pl2pRtvAvNTumvxTm6osQiAVQOp
FsDZm54CcalF4Q4hqPHUtgDKLljzzrZ8YwPYApAAdXHPP+uKzfftKrakgS3A6Qo0NrIYOh/GtinbcNm+
YlOsR+42drDhIACSpBiXbT5iU7kpAFiOsUCNRQB8LkJmI4uBsHz8/N/W5Rt32JVucIQahR3ANBBtQdam
nzZlG1fYlW8whBqBH4A0EoP189d/ty3fPBVYVKhDtRIH0F2Kyd74FlSq2lZtl4RqIQ1gN3Tzf1C9YFu2
sdKmYosgVCl5AGQYCi7ZcBeUhrFme3IA3NXlm8/alm6OxprUKAHWpZsOAl3uRcPWBQmVB0mAgQEAU7+M
3iu1h80AAAAASUVORK5CYII=
</value>
</data>
<data name="btnLastPage.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABgAAAAYCAYAAADgdz34AAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAFxSURBVEhLY4ABp8qN4lAmbYBt2dqPtuWbOmlmkV3F5v8g
bF2x6YNtxaYO+6JNIlApooF8/PzfMHNgGCoF9EF59z+QAIiGsj/ZlG9qs6ncJgpVQhCALEA3ByqF1QIw
27x803vb8s0txFiE1wKQIF5csOYd2KKKLYJQLRiA1CDCYINo63JgHJVtbLQo3CEE1QoHZAURMhtZzLZ8
41vbis21yD6iLIhw4eINr+wqNlWDzKBKEMHE0PngOArY9BddHGo8FSzAwYYaTwcLQIK0wFDjh4APgGXY
Ja2KzX/QxaHGk+uDnn/WpZvOWZdvDnQp381P7Yx2Hli8B4eGrmKGGkGdjAYKCvuKLaH29ftZoFrhgIKM
BgyKkk2XgPVEOEN9PRNUCwYgK4hsyjZctinbHIHNxeiApCCyrth4za5sU5Rx2hlWqBKCgIgg6vlnW7bp
qm3p5mjkyCMW4PWBTen66/YVm2KN02YS7WKSAClBQTxgYAAAwhgxZcrp3I8AAAAASUVORK5CYII=
</value>
</data>
<data name="btnZoomOut.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABgAAAAYCAYAAADgdz34AAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAMHSURBVEhLtVXfS5NRGA6KLuqiKCSCqIsi6Da69qL+Bm/S
EHXOObWJc6Dl9llCYFiYlKxQK60M6qIfhBJlSRAIZhSmMldWOt2WKzWpZes7Pe++93yezylq0gOv7/nx
nOd536Pfcd1ScDqde+x2uyc/P/8R8nBBQUEU4/eIx5hX2Wy2/UxdHXJyctIgcCUzMzMOUZ3C4XAINXPM
IW7CaBcfXR4QPgSRTyS00sjNzY0gH2aJpYHWD6KaaVkhHeY8q2lnPp672DhaW1s/TvOFHOoWxR1hqVTk
5eVtA/GDPEBRXFw8+by7Ozw+MaELBdHoF73/3YBwuVw/VT4iCpPdLGkFiPVEluHxeMZGRkYSJBiLxSwG
ch4Oh3W/3/9HPYe4zZLzKCkpSYN7sm0iFRUVTQWDwQQJLReRSETXNM28ruzs7N+FhYUHWNoANmzcYpJ0
r6MzSoeT5QLqmCDnMgeGg2YHpIFr0ljaABZaJQHuv2a+z1pElzPQ8bP61GnTBHpPWdoAFl/KDsrKKifp
YHrFA5Fe8RBBWR2ra8ac+C3Xb5gdIEZZ2gAc30gD3OckVZUqtrQBof3ufdXgG0sbwMYLaVB54uTMv3TQ
fK3VNMD39JmlDWCjiTYp8P4kpqZnLPeujglyLrOOX4LXpyXPczxhaQNYOCo7IEJHZ+eqDAYGB01x0sCV
V7G0ASxswWZMkkpLSxNDQ0MrMojH46KmpsY0QMzhFvax9Dzg7JMdUPZ6vXogEFj045IRCoX0hoYGs3LO
bSxpBbrYRH9NkkzhdrtFV9czMToWsnQQxtfb+6pP+Hw+U1wa4Bfcg5dgO8tagc29INFrqbYsjrtcovZs
nbh0uUnUnb8g3OXl9EFaOGqg0F56PFnWCjKhTmRFanUy5NpiHDmGTh/942JZK7KysjaDVA3C14WHVRFU
+QO5EWJ3Fu7x+DU4O1g2FXjvt4J4DMQWZHpO+pF70GE7xk4I7yReRkbGRqzfItFF4m1SbK2AyXqYtiFS
rospawfesQ3o7up/MyCwSfP8FTnEX8HbLVDTQvxxAAAAAElFTkSuQmCC
</value>
</data>
<data name="btnZoomIn.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABgAAAAYCAYAAADgdz34AAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAMLSURBVEhLtZXfS5NhFMeDoou6KAqJIOqiCLqNrhusv2E3
uRB1m3NiEzG3mLWuEjKaF04p1g+yMqibikhC10VkCGYUppAVVBA0cZtT9+Pd3NP37DlP77t3W7+kLxye
532ecz7nnPfH826oJY/Hs8/lcp1yOp2PMc63tLTEMP8Ie4rrHofDcZBd/06NjY11AFypr6/PAlokc7vd
wjiyabDbSLSHQ38vgI8A8plAf2pNTU3fMVoZUVto/TCqWVIVUjCNJ71erbe3NxG5cUuc7x9Y9Hq9GbMP
dYvijjGqUs3NzTvg+EkFkHV2dqZfTLwU2VxOGFUorImZd7PC5/MljP6wGJLsZWS54NhPzsqCwaCWTCYZ
KcRR/6OfpqRpmgiHw2ljHOwuI3W1t7fXIfsKVUFOHR0d2Xg8zhgpCX8oLKf1BKR8Pi/8fv+iim1oaMi3
trYeYrQUNhzcYslpbDzK4bpqJSC9n/8gLBbLGsUSA7cpyGgpLNykTbK2trZCanmFQ3VVu0VKxaIQ3d3d
S4oB3jijpbA4oTrAg12lIKpWVV0+N67Ja9Lg0FCM4Mz5ymgpZHyjEvRdvFQKqIT9OsHI/Qel6pmTYLQU
Np6rBIGeM+l/STBg6ADf0xdGS2EjQptkVqt1LbmUKgUZJcHSzCriIXR1dS0rBmyM0VJYOK46IIcno6Mc
qktVXu0tmp2bM79FPYyWwsI2bC6SAxlO0VwsFuNwqVodZLNZEQgEkioWpiH+AKN1IfNZ1QGN9MEsLCww
pnoHmUxGhEIh87k0zMhyoYst9DapBGTUSTT6TKymM4yU0vD1Tr2aprMoZfSnOR7wJL6lnYwtFzb3w+kb
ORqNusHZlApfjuCMupD04ijBeglYzVDoFB2ejC0XJaFOVEXG6sxr5mvjHJxp+nExtlx2u30rnM7BIW4O
NkJQZRrjIGD3zHs8fw2fXYytFH4s2+F4Ao7XMNJxMoNxEh2OYO4BeDf52Wy2zVi/Q9Aq9rYEW6+QZCOS
DsMqbhe7rF94ETahu+v/LQGJk1zVb5Fb/AAXMhBZRHSFhgAAAABJRU5ErkJggg==
</value>
</data>
<data name="btnRotateLeft.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
@ -423,23 +323,41 @@
rXwH3zxl5qh/zlRap3O2yr8D31k3Z7baUeMyLRRg5q5qwWCvA4paWoAR7qbNu+pAwahWFmB8W3UAcNSB
el8WYARb2T5bnij4vbUFGLijHvXXGRNguJMMHkXGBRjhql/O/s5vE2Bkf9vKHj8Ry7oBzv0EE7Wccj4A
AAAASUVORK5CYII=
</value>
</data>
<data name="btnSettings.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABgAAAAYCAYAAADgdz34AAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAALCSURBVEhLpVY9aBRBFD5ECxstFLUSq3ickJ/bLDbBNIqN
haCNP2h1iXK3uzOzh1oIhxZaiWAEEauoESLZ272ItmJjGgsTLSwCacTGRoVEiDHr++benONd7jwuHzzm
vW/e+96bmT24jEE+mDnOroYr4zBbePyL+MtM9Q7Hn3nqiCh1VDKNeFBGA65KUnA5Ea3ppM1gqPjsBwQ3
smGZPOK03nHYr+3FtBDEmveijw1fRBOctjmYBoPedE7HV5/vBFfnY2+08nqrTuwFjj+7H+I5lawwpUFv
8h68sWGRHOWt7uHIePzvpEma96snwLuidqjOx+mwqtFVxelQmBzBXuj7rhAiVUqltN4A1xY05ZLdAGtW
TC3X/Th1g+jlqHoyOSKmbo2qh7tRI4Ng3GrwQgu1g6Nqx/TxVXWSvv378OsxvYdKFpBzRZXWpJRvdAGB
hBOIw0ql0lemwZ8BR7kDTLUCvwGcAg1cMfNKidKyUjKVemK5hhXTFwqF3xCDz6eZs/w0CIKDLNkK/LjQ
wAniuUvi2sWQGtiCNOG6ibESt275aPCZpTZGv6r29YfRHg4zJDhvJjMiJsZqNV9HXCwWd3Fpd8AVQaDJ
JkjsDq2rTXzKZZ0hpX+eBO6SzaPImnK1Uqls4TQN3/e/mRycgPy39AaC+BFOaQUK2ljLd09csSmnYZzS
CmxiGp7IPkGZUxqgaS+YHCtPG6e0gh72FBXepmMu2A3oAb9wSgMk9MnkQBRXRjZL9dc5pT1w3yi2jUQW
wzA8Tf5JGuRD8z7tNb7ArkCT/MRkKDZTmhhr07V857LuQAU1I2xWY3ZsfDShU93k8s7wPG8HCi1baYrb
GjXZzjKdQcl9KKBreoC4XC7voykXMSl4Wpdo7wD2yH/H/D9/IP6LsbGxbexqkAh+gLoBid9jWoO4LLu9
g45/FuJs55jeAJnMH5QMZ5XpMrFAAAAAAElFTkSuQmCC
</value>
</data>
<data name="btnAbout.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABgAAAAYCAYAAADgdz34AAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAKeSURBVEhLtVZbaxNBGN1nRe2TIuhfsGBpoMnOLmrVB0Gp
gghKHwVFqCbZnU1V1hdrRUpfqta31nitxt2ZiREFb8TLY6BKWn3whloVNWrxhsmuM5tJ2Ma9tAEPHPLt
7PnO981kZ2eFIID9xnIR4n2ShrMAmi8kjXwDauZrB8TP6DgCGtkDejNLuXz2kNXcMgnikQhM/wIwbVFj
2/1bY/Ua/xAhGl6dQkt4ejAkSLrEOPnIkhvZeeCqvYbS615UM6aAhtdxG2/IKtm1AuJyY7c1E3cBLw3Y
jX8DhWzndjMhKebGVo045l7JA8a4Xa5U7D/lit03VvAuwGJaREplV3HbKtj6SQnzAxP58f7EO5vBsiz7
RuG1p6ZOlbySdaOF2wuCqKKTvh3xePTm03qBoexj/xnUYhX3O+YdicxiED/7PSxBpuwevG3vGLjldBmm
B3svf+6EY4sEScvuZAP/g6JKtgl0vS74duGK+88/tNgSlUolSx/Nh+qdWMWnhJiGxwNFPD7qKnDo9L1Q
vRMnzTx9PPHbQBGPmykgKsYE/Q/IGzYQxuFrRebvYBA98tQ0MqahogAgKgR1UYubWiJo3qEzwGk2EMZm
ZkA5xF5u3cFdVOPmZoA2CWxLxyD+4i+qxnMtEIXGVJuO5zm7mc7iGBsM4pyXCJJex5xB7jFaQPzKS3bD
r6Mj5x7UZ6CPhG60yXr3NYgKliPaGecE80iwu/RL1olc0e6jhTboF30LtCfxtKhl27jtTNDjb0trj/GT
iZthe5JMA5Ws53beEFMoFkvg5yyhsTv3WOM1jSeBgldym2BE9NxCer4epo/ZJ7eRdwH8Hqjo4D9rPhtE
FXOBpKKt7K1IP1HykoKesE7p5rwLIDlOj8bNaxPX53O5BwThL/s9k4krRj1IAAAAAElFTkSuQmCC
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAKcSURBVEhLtVZNaxNBGN6zovakCPoPFMHSQLM7u6hVD4JS
BRGUHgVFqCbZnU1V9mKrIKWXqvWiLbWoxbg7MzGi4EetPQeqpNWDX6hVMaIWvzDZdWYzidu4H23ABx7y
7uzzPu87k52dFcIAjpqrJYiPyDrOAmi9kHXyFWiZL60QP6PjCOjkEOjKrOTy+UPRcqtkiAdjcPgngEM2
NXa8v1VWrvF3CaKBjWm0gqeHQ4akXUqQjyy5nm3HbjibKP3uxXVzBuh4C7fxh6KRA2sgLtV3WzXxFvDT
gIP4F1DJXm43F7JqbV+rE9fcL7nXnHRK5bLzu1R2ekbz/gVYTIvI6ewGblsBWz85aX1goiBOTL1zGGzb
dm7nX/tqatTIK8Uwm7i9IEgaOhfYEY+H7jytFejPPg6eQTXW8CnXvDWZWQ4SI9+iEhTKjr57zr7eu26X
UXpw+NqnNji6TJD17H428D8oaWSPQNfrSmAXnrhnZMJmS1QsFm3j4lik3o01fF4QdTwZKuLxSW+BwQeR
ejdOWeP08cRvQ0U8bqSApJpT9D8gb9hAFAduFpi/iz70yFdTT1FHBQFAlA/roho3tETQuk9ngIfZQBQb
mQFlP3u5dYR3UYkbmwHaIbAtLUL8OVhUiRdaIA7NmWYDL3J3M53FaTYYxgUvESRdrjmD0mk2gcT1l+xG
UEfdlx7+ncGFyI02Xeu+CknFSkyvnGA+CU67cdU+mys4J2ihbcblwAItKTwr6dlmbjsX9Pjbta7T/MHE
jbAlRWaBRrZyO39IaSSKSfycJdR35x2rv6bxNFDxem4TjpiRW0rP1276mBW9Rv4F8HugoeP/rPl8EFet
JbKGdrO3Iv1EGZdV9IR1SjfnGIDkDD0ad25O3lrM5T4QhD8nwZHvVsY1jQAAAABJRU5ErkJggg==
</value>
</data>
<data name="$this.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">

View File

@ -23,15 +23,13 @@ Public Class frmDocView
Private _toggleGamma As Boolean = True
Private Sub frmMain_Load(ByVal sender As System.Object, ByVal e As EventArgs) Handles MyBase.Load
If GDPICTURE_LICENSE = String.Empty Then
MsgBox($"Lizenz für den Dokumenten Viewer wurde nicht konfiguriert.{vbNewLine}Bitte wenden Sie sich an Digital Data!", MsgBoxStyle.Exclamation, "Clipboard Watcher")
Exit Sub
End If
Dim oLicenceManager As New GdPicture14.LicenseManager()
oLicenceManager.RegisterKEY("0466385611744606151491532") 'Please, replace XXXX by a valid demo or commercial license key.
BookmarksTree1.GdViewer = GdViewer1
tcLeftPanel.Appearance = TabAppearance.FlatButtons
tcLeftPanel.ItemSize = New Size(0, 1)
tcLeftPanel.SizeMode = TabSizeMode.Fixed
SelectSnapIn(0, "Thumbnails")
oLicenceManager.RegisterKEY(GDPICTURE_LICENSE) 'Please, replace XXXX by a valid demo or commercial license key.
Dim zoomModes As New Dictionary(Of ZoomMode, String) From {
{ZoomMode.Zoom50, "50%"},
@ -47,18 +45,10 @@ Public Class frmDocView
cbZoom.Items.Add(item.Value)
Next
rbAllPages.Checked = True
Dim imageListSearchResults As New ImageList
imageListSearchResults.ImageSize = New Size(20, 20)
imageListSearchResults.Images.Add(CType(My.Resources.ResourceManager.GetObject("search"), Image))
lstSearchResults.LargeImageList = imageListSearchResults
lstSearchResults.Groups.Add(New ListViewGroup("SearchResult", "Search result"))
pGamma.Visible = False
tbGamma.Value = CInt(GdViewer1.Gamma * 10)
lblGamma.Text = "Current gamma: " & CStr(GdViewer1.Gamma) & " (default: 1)"
ResetSearch()
UpdateMainUi()
If Not ConfigManager.Config.ViewerWindowLocation.IsEmpty Then
@ -79,15 +69,13 @@ Public Class frmDocView
GdViewer1.DisplayFromFile(filepath)
GdViewer1.Focus()
ThumbnailEx1.LoadFromGdViewer(GdViewer1)
UpdateMainUi()
End Sub
Private Sub UpdateMainUi()
Me.Text = "GdPicture.NET " & GetType(GdPictureImaging).Assembly.GetName().Version.ToString() & " - Document Viewer Demo"
If GdViewer1.PageCount = 0 Then
btnClose.Enabled = False
btnOpen.Enabled = True
btnPrint.Enabled = False
btnFirstPage.Enabled = False
btnPreviousPage.Enabled = False
@ -100,7 +88,6 @@ Public Class frmDocView
btnZoomIn.Enabled = False
btnFitPage.Enabled = False
btnFitWidth.Enabled = False
btnAdjustGamma.Enabled = False
btnRotateLeft.Enabled = False
btnRotateRight.Enabled = False
btnFlipX.Enabled = False
@ -108,10 +95,8 @@ Public Class frmDocView
tbCurrentPage.Text = "0"
lblPageCount.Text = "/ 0"
cbZoom.SelectedIndex = -1
tbSearch.Text = ""
pSearch.Enabled = False
Else
btnClose.Enabled = True
btnOpen.Enabled = False
btnPrint.Enabled = True
btnFirstPage.Enabled = True
btnPreviousPage.Enabled = True
@ -124,15 +109,12 @@ Public Class frmDocView
btnZoomIn.Enabled = True
btnFitPage.Enabled = True
btnFitWidth.Enabled = True
btnAdjustGamma.Enabled = True
btnRotateLeft.Enabled = True
btnRotateRight.Enabled = True
btnFlipX.Enabled = True
btnFlipY.Enabled = True
UpdateaNavigationToolbar()
pSearch.Enabled = True
End If
ResetSearch()
End Sub
Private Sub UpdateaNavigationToolbar()
@ -166,11 +148,11 @@ Public Class frmDocView
heightInches = GdViewer1.PageHeight / GdViewer1.VerticalResolution
End If
Me.ToolStripStatusLabel1.Text = "Type: " + GetDocumentTypeLabel() + " - " +
"Page Size (inches): " + Trim(Str(Math.Round(widthInches, 2))) + " × " + Trim(Str(Math.Round(heightInches, 2))) + " - " +
"Page Size (pixels): " + Trim(Str(GdViewer1.PageWidth)) + " × " + Trim(Str(GdViewer1.PageHeight)) + " - " +
"Horizontal resolution: " + Trim(Str(Math.Round(GdViewer1.HorizontalResolution, 2))) + " DPI - " +
"Vertical resolution: " + Trim(Str(Math.Round(GdViewer1.VerticalResolution, 2))) + " DPI"
Me.ToolStripStatusLabel1.Text = "Typ: " + GetDocumentTypeLabel() + " - " +
"Seitengröße (zoll): " + Trim(Str(Math.Round(widthInches, 2))) + " × " + Trim(Str(Math.Round(heightInches, 2))) + " - " +
"Seitengröße (pixel): " + Trim(Str(GdViewer1.PageWidth)) + " × " + Trim(Str(GdViewer1.PageHeight)) + " - " +
"Horizontale Auflösung: " + Trim(Str(Math.Round(GdViewer1.HorizontalResolution, 2))) + " DPI - " +
"Vertikale Auflösung: " + Trim(Str(Math.Round(GdViewer1.VerticalResolution, 2))) + " DPI"
End Sub
@ -178,7 +160,7 @@ Public Class frmDocView
Dim result As String = ""
Select Case GdViewer1.GetDocumentType()
Case DocumentType.DocumentTypeBitmap
result = "Image"
result = "Bilddatei"
Case DocumentType.DocumentTypeMetaFile
result = "Metafile"
Case DocumentType.DocumentTypePDF
@ -186,16 +168,15 @@ Public Class frmDocView
Case DocumentType.DocumentTypeSVG
result = "SVG"
Case DocumentType.DocumentTypeTXT
result = "Text file"
result = "Textdatei"
Case DocumentType.DocumentTypeUnknown
result = "Unknown"
result = "Unbekannt"
End Select
Return result
End Function
Private Sub CloseDocument()
GdViewer1.CloseDocument()
ThumbnailEx1.ClearAllItems()
UpdateMainUi()
End Sub
@ -205,11 +186,10 @@ Public Class frmDocView
GdViewer1.ZoomMode = ViewerZoomMode.ZoomModeWidthViewer
GdViewer1.DocumentAlignment = ViewerDocumentAlignment.DocumentAlignmentTopCenter
Using frmOpen As New frmGdPictureOpen(GdViewer1)
Using frmOpen As New frmDocViewOpen(GdViewer1)
frmOpen.ShowDialog(Me)
End Using
GdViewer1.Focus()
ThumbnailEx1.LoadFromGdViewer(GdViewer1)
UpdateMainUi()
End Sub
@ -300,7 +280,7 @@ Public Class frmDocView
End Sub
Private Sub btnAbout_Click(ByVal sender As System.Object, ByVal e As EventArgs) Handles btnAbout.Click
Using frmAbout As New frmAbout()
Using frmAbout As New frmDocViewAbout()
frmAbout.ShowDialog(Me)
End Using
End Sub
@ -346,13 +326,6 @@ Public Class frmDocView
GdViewer1.PrintSetFromToPage(GdViewer1.CurrentPage, GdViewer1.CurrentPage)
GdViewer1.Print(printSettings.PrintSize)
Exit Select
Case frmPrint.PagesToPrint.Selection
Dim range As String = GetSelectedItemAsRange()
If Not String.IsNullOrWhiteSpace(range) Then
GdViewer1.PrintSetPageSelection(range)
GdViewer1.Print(printSettings.PrintSize)
End If
Exit Select
Case frmPrint.PagesToPrint.Range
If printSettings.PageRange IsNot Nothing And printSettings.PageRange <> String.Empty Then
If printSettings.PageRange.Contains("-") Then
@ -390,38 +363,6 @@ Public Class frmDocView
End Using
End Sub
Private Function GetSelectedItemAsRange() As String
Dim count As Integer = 0
For i As Integer = 0 To ThumbnailEx1.ItemCount - 1
If ThumbnailEx1.GetItemCheckState(i) = True Then
count += 1
End If
Next
If count = 0 Then
If MessageBox.Show("No page has been selected, do you want to save all pages?", "Question", MessageBoxButtons.YesNo, MessageBoxIcon.Question) = DialogResult.Yes Then
For i As Integer = 0 To ThumbnailEx1.ItemCount - 1
ThumbnailEx1.SetItemCheckState(i, True)
Next
count = ThumbnailEx1.ItemCount
End If
End If
If count > 0 Then
Dim sb As New StringBuilder
For i As Integer = 0 To ThumbnailEx1.ItemCount
If ThumbnailEx1.GetItemCheckState(i) = True Then
If sb.Length <> 0 Then
sb.Append(";")
End If
sb.Append(i + 1)
End If
Next
Return sb.ToString()
Else
Return ""
End If
End Function
Private Sub btnRotateLeft_Click(ByVal sender As System.Object, ByVal e As EventArgs) Handles btnRotateLeft.Click
GdViewer1.Rotate(RotateFlipType.Rotate270FlipNone)
End Sub
@ -440,135 +381,13 @@ Public Class frmDocView
Private Sub GdViewer1_TransferEnded(ByVal status As GdPictureStatus, ByVal download As System.Boolean) Handles GdViewer1.TransferEnded
GdViewer1.Focus()
ThumbnailEx1.LoadFromGdViewer(GdViewer1)
UpdateMainUi()
End Sub
Private Sub btnSearch_Click(ByVal sender As System.Object, ByVal e As EventArgs) Handles btnSearch.Click
If (GdViewer1.GetDocumentType() <> DocumentType.DocumentTypePDF And GdViewer1.GetDocumentType() <> DocumentType.DocumentTypeTXT) Or String.IsNullOrWhiteSpace(tbSearch.Text) Then
Return
End If
ResetSearch()
Dim page As Integer
Dim found As Boolean = False
If rbAllPages.Checked Then
page = 1
Else
page = GdViewer1.CurrentPage
End If
Dim finish As Boolean = False
Dim countResults As Integer = 0
Me.Cursor = Cursors.WaitCursor
searchProgressBar.Value = 1
searchProgressBar.Maximum = GdViewer1.PageCount
searchProgressBar.Visible = True
Dim items As New List(Of ListViewItem)
While Not finish
lblSearchResults.Text = "Find results for page " + page.ToString() + " of " + GdViewer1.PageCount.ToString()
searchProgressBar.Increment(1)
lblSearchResults.Invalidate()
lblSearchResults.Update()
lblSearchResults.Refresh()
searchProgressBar.Invalidate()
searchProgressBar.Update()
searchProgressBar.Refresh()
Dim count As Integer = GetSearchResultCount(page, tbSearch.Text)
If count > 0 Then
found = True
Dim item As New ListViewItem(New String() {"Page " + page.ToString(), count.ToString() + " occurence(s) found"}, 0)
item.Name = "Page" + page.ToString()
item.Tag = page
item.Group = lstSearchResults.Groups(0)
items.Add(item)
End If
countResults += count
page = page + 1
finish = rbCurrentPage.Checked Or page > GdViewer1.PageCount
End While
lstSearchResults.Items.AddRange(items.ToArray())
lstSearchResults.Groups(0).Header = "Search results (" + countResults.ToString() + ")"
Me.Cursor = Cursors.Default
lblSearchResults.Text = ""
searchProgressBar.Visible = False
If Not found Then
MessageBox.Show("No match found", "Information", MessageBoxButtons.OK, MessageBoxIcon.Information)
End If
End Sub
Private Function GetSearchResultCount(ByVal page As Integer, ByVal searchedTerm As String) As Integer
Return GdViewer1.GetTextOccurrenceCount(page, searchedTerm, chkCaseSensitive.Checked, chkWholeWord.Checked)
End Function
Private Sub ResetSearch()
btnFindPrevious.Enabled = Not String.IsNullOrWhiteSpace(tbSearch.Text)
btnFindNext.Enabled = Not String.IsNullOrWhiteSpace(tbSearch.Text)
btnSearch.Enabled = Not String.IsNullOrWhiteSpace(tbSearch.Text)
lstSearchResults.Items.Clear()
GdViewer1.RemoveAllRegions()
_currentSearchOccurence = 0
lblSearchResults.Text = ""
End Sub
Private Sub chkWholeWord_CheckedChanged(ByVal sender As System.Object, ByVal e As EventArgs) Handles chkWholeWord.CheckedChanged
ResetSearch()
End Sub
Private Sub chkCaseSensitive_CheckedChanged(ByVal sender As System.Object, ByVal e As EventArgs) Handles chkCaseSensitive.CheckedChanged
ResetSearch()
End Sub
Private Sub rbCurrentPage_CheckedChanged(ByVal sender As System.Object, ByVal e As EventArgs) Handles rbCurrentPage.CheckedChanged
ResetSearch()
End Sub
Private Sub rbAllPages_CheckedChanged(ByVal sender As System.Object, ByVal e As EventArgs) Handles rbAllPages.CheckedChanged
ResetSearch()
End Sub
Private Sub tbSearch_TextChanged(ByVal sender As System.Object, ByVal e As EventArgs) Handles tbSearch.TextChanged
ResetSearch()
End Sub
Private Sub cbZoom_Validating(ByVal sender As System.Object, ByVal e As System.ComponentModel.CancelEventArgs) Handles cbZoom.Validating
Private Sub cbZoom_Validating(ByVal sender As System.Object, ByVal e As CancelEventArgs) Handles cbZoom.Validating
ChangeZoomValue()
End Sub
Private Sub lstSearchResults_SelectedIndexChanged(ByVal sender As Object, ByVal e As EventArgs) Handles lstSearchResults.SelectedIndexChanged
If lstSearchResults.SelectedItems.Count <> 0 Then
GdViewer1.RemoveAllRegions()
Dim item As ListViewItem = lstSearchResults.SelectedItems(0)
Dim page As Integer = CType(item.Tag, Integer)
If GdViewer1.CurrentPage <> page Then
GdViewer1.DisplayPage(page)
End If
Dim occurence As Integer = 1
Dim occurenceLeft As Single
Dim occurenceTop As Single
Dim occurenceWidth As Single
Dim occurenceHeight As Single
While GdViewer1.SearchText(page, tbSearch.Text, occurence, chkCaseSensitive.Checked, chkWholeWord.Checked, occurenceLeft, occurenceTop, occurenceWidth, occurenceHeight)
AddSearchRegion(occurence, occurenceLeft, occurenceTop, occurenceWidth, occurenceHeight, occurence = 1)
occurence = occurence + 1
End While
End If
End Sub
Private Sub btnFindNext_Click(ByVal sender As Object, ByVal e As EventArgs) Handles btnFindNext.Click
Search(True)
End Sub
Private Sub btnFindPrevious_Click(ByVal sender As Object, ByVal e As EventArgs) Handles btnFindPrevious.Click
Search(False)
End Sub
Private Sub AddSearchRegion(ByVal occurence As Integer, ByVal leftCoordinate As Single, ByVal topCoordinate As Single, ByVal regionWidth As Single, ByVal regionheight As Single, ByVal ensureVisibility As Boolean)
Dim searchRegion As Integer = GdViewer1.AddRegionInches("SearchResult" & occurence, leftCoordinate, topCoordinate, regionWidth, regionheight, ForegroundMixMode.ForegroundMixModeMASKPEN, Color.Yellow)
GdViewer1.SetRegionEditable(searchRegion, False)
@ -577,64 +396,10 @@ Public Class frmDocView
End If
End Sub
Private Function Search(ByVal ascending As Boolean) As Boolean
Dim go As Boolean = True
Dim page As Integer = GdViewer1.CurrentPage
Dim found As Boolean = False
Dim newOccurence As Integer
Dim occurenceLeft As Single
Dim occurenceTop As Single
Dim occurenceWidth As Single
Dim occurenceHeight As Single
If ascending Then
newOccurence = _currentSearchOccurence + 1
Else
newOccurence = _currentSearchOccurence - 1
End If
While go
If GdViewer1.SearchText(page, tbSearch.Text, newOccurence, chkCaseSensitive.Checked, chkWholeWord.Checked, occurenceLeft, occurenceTop, occurenceWidth, occurenceHeight) Then
If page <> GdViewer1.CurrentPage Then
GdViewer1.DisplayPage(page)
End If
GdViewer1.RemoveAllRegions()
AddSearchRegion(newOccurence, occurenceLeft, occurenceTop, occurenceWidth, occurenceHeight, True)
_currentSearchOccurence = newOccurence
found = True
go = False
Else
If rbAllPages.Checked Then
If ascending Then
page = page + 1
newOccurence = 1
Else
page = page - 1
newOccurence = GetSearchResultCount(page, tbSearch.Text)
End If
If page = 0 Or page > GdViewer1.PageCount Then
go = False
End If
Else
go = False
End If
End If
End While
If Not found Then
MessageBox.Show(Me, "No match found !", "Information", MessageBoxButtons.OK, MessageBoxIcon.Information)
End If
Return found
End Function
Private Sub btnClose_Click(ByVal sender As Object, ByVal e As EventArgs) Handles btnClose.Click
CloseDocument()
UpdateMainUi()
End Sub
Private Sub btnSettings_Click(ByVal sender As Object, ByVal e As EventArgs) Handles btnSettings.Click
Using frmSettings As New frmSettings(GdViewer1)
frmSettings.ShowDialog(Me)
End Using
ThumbnailEx1.PdfRasterizerEngine = GdViewer1.PdfRasterizerEngine
ThumbnailEx1.PdfIncreaseTextContrast = GdViewer1.PdfIncreaseTextContrast
UpdateaNavigationToolbar()
End Sub
@ -646,37 +411,6 @@ Public Class frmDocView
GdViewer1.ZoomMode = ViewerZoomMode.ZoomModeFitToViewer
End Sub
Private Sub tbGamma_Scroll(ByVal sender As Object, ByVal e As EventArgs) Handles tbGamma.Scroll
GdViewer1.Gamma = CSng(tbGamma.Value / 10)
lblGamma.Text = "Current gamma: " & CStr(GdViewer1.Gamma) & " (default: 1)"
End Sub
Private Sub SelectSnapIn(ByVal num As Integer, ByVal title As String)
tcLeftPanel.SelectedIndex = num
lblSnapInPanel.Text = title
For i As Integer = 0 To pSnapInButtons.Controls.Count - 1
If i = num Then
pSnapInButtons.Controls(i).BackColor = SystemColors.Control
CType(pSnapInButtons.Controls(i), Button).FlatAppearance.BorderColor = SystemColors.Control
Else
pSnapInButtons.Controls(i).BackColor = SystemColors.AppWorkspace
CType(pSnapInButtons.Controls(i), Button).FlatAppearance.BorderColor = SystemColors.AppWorkspace
End If
Next
End Sub
Private Sub btnSnapInThumbnails_Click(ByVal sender As System.Object, ByVal e As EventArgs) Handles btnSnapInThumbnails.Click
SelectSnapIn(0, "Thumbnails")
End Sub
Private Sub btnSnapInBookmarks_Click(ByVal sender As System.Object, ByVal e As EventArgs) Handles btnSnapInBookmarks.Click
SelectSnapIn(1, "Bookmarks")
End Sub
Private Sub btnSnapInSearch_Click(ByVal sender As System.Object, ByVal e As EventArgs) Handles btnSnapInSearch.Click
SelectSnapIn(2, "Search")
End Sub
Private Sub DefaultToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As EventArgs) Handles DefaultToolStripMenuItem.Click
GdViewer1.MouseMode = ViewerMouseMode.MouseModeDefault
DefaultToolStripMenuItem.Checked = True
@ -727,32 +461,6 @@ Public Class frmDocView
GdViewer1.Focus()
End Sub
Private Sub SmallThumbnailsToolStripMenuItem1_Click(ByVal sender As System.Object, ByVal e As EventArgs) Handles SmallThumbnailsToolStripMenuItem1.Click
ThumbnailEx1.ThumbnailSize = New Size(64, 64)
SmallThumbnailsToolStripMenuItem1.Checked = True
MediumThumbnailsToolStripMenuItem1.Checked = False
LargeThumbnailsToolStripMenuItem1.Checked = False
End Sub
Private Sub MediumThumbnailsToolStripMenuItem1_Click(ByVal sender As System.Object, ByVal e As EventArgs) Handles MediumThumbnailsToolStripMenuItem1.Click
ThumbnailEx1.ThumbnailSize = New Size(128, 128)
SmallThumbnailsToolStripMenuItem1.Checked = False
MediumThumbnailsToolStripMenuItem1.Checked = True
LargeThumbnailsToolStripMenuItem1.Checked = False
End Sub
Private Sub LargeThumbnailsToolStripMenuItem1_Click(ByVal sender As System.Object, ByVal e As EventArgs) Handles LargeThumbnailsToolStripMenuItem1.Click
ThumbnailEx1.ThumbnailSize = New Size(256, 256)
SmallThumbnailsToolStripMenuItem1.Checked = False
MediumThumbnailsToolStripMenuItem1.Checked = False
LargeThumbnailsToolStripMenuItem1.Checked = True
End Sub
Private Sub ToolStripButton1_Click_1(ByVal sender As System.Object, ByVal e As EventArgs) Handles btnAdjustGamma.Click
pGamma.Visible = _toggleGamma
_toggleGamma = Not _toggleGamma
End Sub
Private Sub frmDocView_Closing(sender As Object, e As CancelEventArgs) Handles Me.Closing
Try
ConfigManager.Config.ViewerWindowLocation = Location

View File

@ -1,5 +1,5 @@
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
Partial Class frmAbout
Partial Class frmDocViewAbout
Inherits System.Windows.Forms.Form
'Form overrides dispose to clean up the component list.
@ -22,7 +22,7 @@ Partial Class frmAbout
'Do not modify it using the code editor.
<System.Diagnostics.DebuggerStepThrough()> _
Private Sub InitializeComponent()
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmAbout))
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmDocViewAbout))
Me.btnClose = New System.Windows.Forms.Button()
Me.lblCopyrightORPALIS = New System.Windows.Forms.Label()
Me.PictureBox1 = New System.Windows.Forms.PictureBox()

View File

@ -1,7 +1,7 @@
Option Strict On
Option Explicit On
Public Class frmAbout
Public Class frmDocViewAbout
Private Sub btnClose_Click(sender As Object, e As EventArgs) Handles btnClose.Click
Me.Close()

View File

@ -1,5 +1,5 @@
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
Partial Class frmGdPictureOpen
Partial Class frmDocViewOpen
Inherits System.Windows.Forms.Form
'Form overrides dispose to clean up the component list.
@ -22,7 +22,7 @@ Partial Class frmGdPictureOpen
'Do not modify it using the code editor.
<System.Diagnostics.DebuggerStepThrough()> _
Private Sub InitializeComponent()
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmGdPictureOpen))
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmDocViewOpen))
Me.pOpenFromFile = New System.Windows.Forms.Panel()
Me.btOpenFromFile = New System.Windows.Forms.Button()
Me.tbFile = New System.Windows.Forms.TextBox()

View File

@ -4,7 +4,7 @@ Option Explicit On
Imports System.IO
Imports GdPicture14
Public Class frmGdPictureOpen
Public Class frmDocViewOpen
Private ReadOnly m_owner As GdViewer

View File

@ -22,18 +22,12 @@ Partial Class frmProfileMatch
'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
<System.Diagnostics.DebuggerStepThrough()>
Private Sub InitializeComponent()
Dim TileItemElement5 As DevExpress.XtraEditors.TileItemElement = New DevExpress.XtraEditors.TileItemElement()
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmProfileMatch))
Me.Label1 = New System.Windows.Forms.Label()
Me.TileControlMatch = New DevExpress.XtraEditors.TileControl()
Me.TileGroup2 = New DevExpress.XtraEditors.TileGroup()
Me.TileItem1 = New DevExpress.XtraEditors.TileItem()
Me.TileGroupDocumentsData = New DevExpress.XtraEditors.TileGroup()
Me.TileGroupDocuments = New DevExpress.XtraEditors.TileGroup()
Me.TileGroupData = New DevExpress.XtraEditors.TileGroup()
Me.SimpleButton1 = New DevExpress.XtraEditors.SimpleButton()
Me.Panel1 = New System.Windows.Forms.Panel()
Me.Panel1.SuspendLayout()
Me.SuspendLayout()
'
'Label1
@ -70,7 +64,6 @@ Partial Class frmProfileMatch
Me.TileControlMatch.AppearanceItem.Normal.Options.UseForeColor = True
Me.TileControlMatch.BackColor = System.Drawing.Color.FromArgb(CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer))
Me.TileControlMatch.Dock = System.Windows.Forms.DockStyle.Fill
Me.TileControlMatch.Groups.Add(Me.TileGroup2)
Me.TileControlMatch.Groups.Add(Me.TileGroupDocumentsData)
Me.TileControlMatch.Groups.Add(Me.TileGroupDocuments)
Me.TileControlMatch.Groups.Add(Me.TileGroupData)
@ -79,24 +72,10 @@ Partial Class frmProfileMatch
Me.TileControlMatch.MaxId = 18
Me.TileControlMatch.Name = "TileControlMatch"
Me.TileControlMatch.ShowGroupText = True
Me.TileControlMatch.Size = New System.Drawing.Size(990, 452)
Me.TileControlMatch.Size = New System.Drawing.Size(990, 523)
Me.TileControlMatch.TabIndex = 6
Me.TileControlMatch.Text = "TileControl1"
'
'TileGroup2
'
Me.TileGroup2.Items.Add(Me.TileItem1)
Me.TileGroup2.Name = "TileGroup2"
'
'TileItem1
'
TileItemElement5.ImageOptions.Image = CType(resources.GetObject("resource.Image"), System.Drawing.Image)
TileItemElement5.Text = "Alle"
Me.TileItem1.Elements.Add(TileItemElement5)
Me.TileItem1.Id = 1
Me.TileItem1.ItemSize = DevExpress.XtraEditors.TileItemSize.Medium
Me.TileItem1.Name = "TileItem1"
'
'TileGroupDocumentsData
'
Me.TileGroupDocumentsData.Name = "TileGroupDocumentsData"
@ -112,27 +91,6 @@ Partial Class frmProfileMatch
Me.TileGroupData.Name = "TileGroupData"
Me.TileGroupData.Text = "Daten"
'
'SimpleButton1
'
Me.SimpleButton1.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.SimpleButton1.Appearance.Font = New System.Drawing.Font("Tahoma", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.SimpleButton1.Appearance.Options.UseFont = True
Me.SimpleButton1.ImageOptions.Image = CType(resources.GetObject("SimpleButton1.ImageOptions.Image"), System.Drawing.Image)
Me.SimpleButton1.Location = New System.Drawing.Point(841, 14)
Me.SimpleButton1.Name = "SimpleButton1"
Me.SimpleButton1.Size = New System.Drawing.Size(137, 45)
Me.SimpleButton1.TabIndex = 7
Me.SimpleButton1.Text = "Abbruch"
'
'Panel1
'
Me.Panel1.Controls.Add(Me.SimpleButton1)
Me.Panel1.Dock = System.Windows.Forms.DockStyle.Bottom
Me.Panel1.Location = New System.Drawing.Point(0, 452)
Me.Panel1.Name = "Panel1"
Me.Panel1.Size = New System.Drawing.Size(990, 71)
Me.Panel1.TabIndex = 8
'
'frmProfileMatch
'
Me.Appearance.Options.UseFont = True
@ -141,7 +99,6 @@ Partial Class frmProfileMatch
Me.ClientSize = New System.Drawing.Size(990, 523)
Me.Controls.Add(Me.Label1)
Me.Controls.Add(Me.TileControlMatch)
Me.Controls.Add(Me.Panel1)
Me.Font = New System.Drawing.Font("Calibri", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
Me.MaximizeBox = False
@ -151,18 +108,13 @@ Partial Class frmProfileMatch
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterParent
Me.Text = "Profile Match"
Me.TopMost = True
Me.Panel1.ResumeLayout(False)
Me.ResumeLayout(False)
Me.PerformLayout()
End Sub
Friend WithEvents Label1 As Label
Friend WithEvents TileControlMatch As DevExpress.XtraEditors.TileControl
Friend WithEvents TileGroup2 As DevExpress.XtraEditors.TileGroup
Friend WithEvents TileItem1 As DevExpress.XtraEditors.TileItem
Friend WithEvents TileGroupDocumentsData As DevExpress.XtraEditors.TileGroup
Friend WithEvents SimpleButton1 As DevExpress.XtraEditors.SimpleButton
Friend WithEvents Panel1 As Panel
Friend WithEvents TileGroupDocuments As DevExpress.XtraEditors.TileGroup
Friend WithEvents TileGroupData As DevExpress.XtraEditors.TileGroup
End Class

View File

@ -118,33 +118,6 @@
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
<data name="resource.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m
dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAAhdEVYdFRpdGxlAEFwcGx5O09LO0NoZWNrO0JhcnM7
UmliYm9uO2RjyGgAAAGcSURBVFhHxZcxcsIwEEU5AVWO4z4dZ8gBcgZm6LhNWsrcIh0dV6B19nm0Hln5
sleG4OINRvq7+7FXktn1fb8pcvCVjBdd1y2xNw7G2bgYV+Oe4Jox5tCgVTlGWgy8GZ/Gt9EHQUsMsSpn
2MC78WWoIhGIJcef3BEDH8aPoRK3QA5yTfIvGSDgZqiEayDXxMScAW7ZM355CTnHx1EzQNM88syXIPfQ
mDUDdK4KXMNJjAE1pAHWbstSm+OUcqo5auyVATYQFdDKUDzlVPNwcE1ugF1MiVsYi6ecSgNn1+RitlIl
jjIpnnIqHVxck4vZz5UYag3lqOLHQpNzdV0ewKGixDY9zNdMtBaHu2vzoFkDSVOaWFMcpIHqI3BN0rmJ
tcVBPoJqE7om0z5SHGQTzi3Do+sUzBf6JeQyXNqIpAnGC10EuRFFtuKJCb4X8xGqWzFEDqPBBJ/FeJTq
YQTR43ht8cXjGDZ9IXE2fSVzCHjGnSDHpDhEDAC37JFXNGLH254TNQA0DZ3b8raElpih4RQtBpz//Wu2
FXLwdfS7XxGwk2isBZLIAAAAAElFTkSuQmCC
</value>
</data>
<data name="SimpleButton1.ImageOptions.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m
dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAAjdEVYdFRpdGxlAENhbmNlbDtTdG9wO0V4aXQ7QmFy
cztSaWJib247TJaWsgAAAW5JREFUWEfFlk1KBDEUhGfmAg56JTcuHEGP4FFFFMVZz1VcxaomD57pek1e
hLj4FilSP9Dd0LtSyr8ixZlIcSZSnIkUL8+3f6LJOvhzixRr0BV4AXf13I3LuQev4OjzPVKEgeUfoIBv
kBpRM1hOLzM+gRyxEnDxALiaRiM7wpcbzNy3fb8OBi4+gTagd4Qq5/lBda0EgsvksRrboK0RqXIiRRiM
zIh0OZEiTJ6eEUPlRIowtmyNGC4nUoRZEY0YLidSRECEGuFJlRMpImSLaMRSDmRmhBQZsoF65jZgeTFV
ZoQUGRIQlRvLCJUZIUWEKKK3XWndI6SIgN5yPvPwE1XZLVKEubfc7gyPkCKMmXJjaIQUYSJR+Qn4Yk96
hBRhGCk3UiNWAi7uwVs1+oCeckONeAfdPyTX4Ksas+WW4UecwU3bQ1YCwWXCEVydKicuhyOYIcuJFC0I
8P/Qn7tosvK/5TOR4kykOBMpzqPsfgBphQ1j4i+mWAAAAABJRU5ErkJggg==
</value>
</data>
<data name="$this.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
AAABAAMAMDAAAAEAIACoJQAANgAAACAgAAABACAAqBAAAN4lAAAQEAAAAQAgAGgEAACGNgAAKAAAADAA

View File

@ -1,9 +1,14 @@
Imports DevExpress.XtraEditors
Imports DD_Clipboard_Watcher.ClassProfileFilter
Imports DevExpress.XtraEditors
Imports ClassConstants
Public Class frmProfileMatch
Private PrimaryFont As New Font("Segoe UI", 12, FontStyle.Bold)
Private SecondaryFont As New Font("Segoe UI", 10)
Private OpenForms As New List(Of IResultForm)
Private ShouldHideInitially As Boolean = False
Private Sub frmProfileMatch_Load(sender As Object, e As EventArgs) Handles Me.Load
If Not ConfigManager.Config.MatchWindowLocation.IsEmpty Then
Location = ConfigManager.Config.MatchWindowLocation
@ -14,17 +19,30 @@ Public Class frmProfileMatch
End If
If USER_LANGUAGE = "de-DE" Then
Label1.Text = $"Clipboard Watcher hat mehr als einen Match für Ihre Suche nach ""{CURR_MATCH_RESULT}"" gefunden:"
Label1.Text = $"Clipboard Watcher hat mehr als einen Match für Ihre Suche nach ""{CURRENT_CLIPBOARD_CONTENTS}"" gefunden:"
Else
Label1.Text = $"Clipboard Watcher found more than on match for your search for ""{CURR_MATCH_RESULT}"":"
Label1.Text = $"Clipboard Watcher found more than on match for your search for ""{CURRENT_CLIPBOARD_CONTENTS}"":"
End If
CreateTiles()
CurrDocSearch2Load = Nothing
Dim oCreatedTiles = CreateTiles()
' Open Result Forms directly if only one match found
If oCreatedTiles = 1 Then
Dim oProfileId As Integer = CURRENT_MATCHING_PROFILES.Select(Function(p) p.Guid).First()
OpenResultForms(oProfileId)
ShouldHideInitially = True
End If
End Sub
Sub CreateTiles()
Private Sub frmProfileMatch_Shown(sender As Object, e As EventArgs) Handles Me.Shown
If ShouldHideInitially Then
Hide()
End If
End Sub
Function CreateTiles() As Integer
Try
Dim oCreatedTiles As Integer = 0
Dim oDocumentGroup = TileControlMatch.Groups.Item("TileGroupDocuments")
Dim oDataGroup = TileControlMatch.Groups.Item("TileGroupData")
Dim oDataDocumentsGroup = TileControlMatch.Groups.Item("TileGroupDocumentsData")
@ -32,30 +50,42 @@ Public Class frmProfileMatch
oDocumentGroup.Items.Clear()
oDataGroup.Items.Clear()
For Each oProfile As ClassProfileFilter.ProfileData In CURRENT_MATCHING_PROFILES
If oProfile.CountData > 0 And oProfile.CountDocs > 0 Then
Dim oCountText = oProfile.CountData + oProfile.CountDocs
Dim oItem = CreateTile(oProfile, $"{oCountText} Ergebnisse")
oDataDocumentsGroup.Items.Add(oItem)
For Each oProfile As ProfileData In CURRENT_MATCHING_PROFILES
If oProfile.ProfileType = ClassConstants.PROFILE_TYPE_DATA_DOCS Then
If oProfile.CountData > 0 And oProfile.CountDocs > 0 Then
Dim oCountText = oProfile.CountData + oProfile.CountDocs
Dim oItem = CreateTile(oProfile, $"{oCountText} Ergebnisse")
oDataDocumentsGroup.Items.Add(oItem)
oCreatedTiles += 1
End If
End If
If oProfile.CountDocs > 0 Then
Dim oItem = CreateTile(oProfile, $"{oProfile.CountDocs} Dokumente")
oDocumentGroup.Items.Add(oItem)
If oProfile.ProfileType = ClassConstants.PROFILE_TYPE_DATA_DOCS Or oProfile.ProfileType = ClassConstants.PROFILE_TYPE_DOCS_ONLY Then
If oProfile.CountDocs > 0 Then
Dim oItem = CreateTile(oProfile, $"{oProfile.CountDocs} Dokumente")
oDocumentGroup.Items.Add(oItem)
oCreatedTiles += 1
End If
End If
If oProfile.CountData > 0 Then
Dim oItem = CreateTile(oProfile, $"{oProfile.CountData} Datensätze")
oDataGroup.Items.Add(oItem)
If oProfile.ProfileType = ClassConstants.PROFILE_TYPE_DATA_DOCS Or oProfile.ProfileType = ClassConstants.PROFILE_TYPE_DATA_ONLY Then
If oProfile.CountData > 0 Then
Dim oItem = CreateTile(oProfile, $"{oProfile.CountData} Datensätze")
oDataGroup.Items.Add(oItem)
oCreatedTiles += 1
End If
End If
Next
Return oCreatedTiles
Catch ex As Exception
Logger.Error(ex)
MsgBox("Error while creating profile tiles!" & vbNewLine & ex.Message)
Return -1
End Try
End Sub
End Function
Private Function CreateTile(Profile As ClassProfileFilter.ProfileData, CountText As String) As TileItem
Private Function CreateTile(Profile As ProfileData, CountText As String) As TileItem
Dim oItem As New TileItem() With {.Tag = Profile.Guid}
oItem.Elements.Clear()
@ -113,35 +143,77 @@ Public Class frmProfileMatch
End Try
End Sub
Private Sub SimpleButton1_Click(sender As Object, e As EventArgs) Handles SimpleButton1.Click
Private Sub SimpleButton1_Click(sender As Object, e As EventArgs)
Close()
End Sub
Private Sub TileControl1_ItemClick(sender As Object, e As TileItemEventArgs) Handles TileControlMatch.ItemClick
Private Sub TileControlMatch_ItemClick(sender As Object, e As TileItemEventArgs) Handles TileControlMatch.ItemClick
Dim oItem As TileItem = e.Item
Dim oProfileId = oItem.Tag
Dim oProfileId As Integer = oItem.Tag
If oProfileId Is Nothing Then
Dim oResult As String = ""
For Each oProfile As ClassProfileFilter.ProfileData In CURRENT_MATCHING_PROFILES
If oResult = "" Then
oResult = oProfile.Guid
Else
oResult &= "," & oProfile.Guid
End If
Next
CurrDocSearch2Load = oResult
CurrDataSearch2Load = oResult
Else
CurrDocSearch2Load = oProfileId
CurrDataSearch2Load = oProfileId
End If
OpenResultForms(oProfileId)
' Show Result Document Form
Dim oFrmResultDoc As Form = New frmResultDoc(Me)
oFrmResultDoc.Show()
' ..and hide myself
Hide()
End Sub
Private Sub OpenResultForms(ProfileId As Integer)
Dim oMatchingProfiles As New List(Of ProfileData)
If ProfileId = -1 Then
' Click on Show all, add all matching profiles
oMatchingProfiles = CURRENT_MATCHING_PROFILES.
Select(Function(p) p).
ToList()
Else
' Click on specific profile
Dim oProfile As ProfileData = CURRENT_MATCHING_PROFILES.
Where(Function(p) p.Guid = ProfileId).
First()
oMatchingProfiles.Add(oProfile)
If (oProfile.ProfileType = ClassConstants.PROFILE_TYPE_DATA_DOCS Or oProfile.ProfileType = ClassConstants.PROFILE_TYPE_DOCS_ONLY) And oProfile.CountDocs > 0 Then
' Show Result Document Form
Dim oForm As New frmResultDoc(Me, oMatchingProfiles)
AddHandler oForm.FormClosed, AddressOf ProfileResultForm_Closed
OpenForms.Add(oForm)
oForm.Show()
End If
If oProfile.ProfileType = ClassConstants.PROFILE_TYPE_DATA_DOCS Or oProfile.ProfileType = ClassConstants.PROFILE_TYPE_DATA_ONLY And oProfile.CountData > 0 Then
' Show Result Data Form
Dim oForm As New frmResultSQL(Me, oMatchingProfiles)
AddHandler oForm.FormClosed, AddressOf ProfileResultForm_Closed
OpenForms.Add(oForm)
oForm.Show()
End If
End If
End Sub
Private Sub ProfileResultForm_Closed(sender As Object, e As FormClosedEventArgs)
Dim oShouldOpenAgain As Boolean = False
Dim oThisForm = New List(Of IResultForm) From {sender}
If TypeOf sender Is frmResultDoc Or TypeOf sender Is frmResultSQL Then
For Each oForm As IResultForm In OpenForms
' Determine if frmProfileMatch should be shown
If oForm.ShouldReturnToMatchForm Then
oShouldOpenAgain = True
End If
Next
End If
' If frmProfileMatch should be shown, close all windows of this profile
If oShouldOpenAgain Then
For Each oForm As Form In OpenForms.Except(oThisForm)
RemoveHandler oForm.FormClosed, AddressOf ProfileResultForm_Closed
oForm.Close()
Next
Show()
End If
End Sub
End Class

View File

@ -32,6 +32,7 @@ Partial Class frmResultDoc
Me.ÖffnenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.EigenschaftenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.ToolStripButtonDocView = New System.Windows.Forms.ToolStripButton()
Me.btnBackToMatchForm = New System.Windows.Forms.ToolStripButton()
Me.XtraTabControlDocs = New DevExpress.XtraTab.XtraTabControl()
Me.XtraTabPageDoc1 = New DevExpress.XtraTab.XtraTabPage()
Me.GridControlDocSearch1 = New DevExpress.XtraGrid.GridControl()
@ -102,7 +103,7 @@ Partial Class frmResultDoc
'ToolStrip1
'
Me.ToolStrip1.GripStyle = System.Windows.Forms.ToolStripGripStyle.Hidden
Me.ToolStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ToolStripDropDownButtonFile, Me.ToolStripButtonDocView})
Me.ToolStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ToolStripDropDownButtonFile, Me.ToolStripButtonDocView, Me.btnBackToMatchForm})
Me.ToolStrip1.Location = New System.Drawing.Point(0, 0)
Me.ToolStrip1.Name = "ToolStrip1"
Me.ToolStrip1.Size = New System.Drawing.Size(933, 25)
@ -142,6 +143,14 @@ Partial Class frmResultDoc
Me.ToolStripButtonDocView.Size = New System.Drawing.Size(73, 22)
Me.ToolStripButtonDocView.Text = "DocView"
'
'ToolStripButton1
'
Me.btnBackToMatchForm.Image = Global.DD_Clipboard_Watcher.My.Resources.Resources.control_start_blue
Me.btnBackToMatchForm.ImageTransparentColor = System.Drawing.Color.Magenta
Me.btnBackToMatchForm.Name = "ToolStripButton1"
Me.btnBackToMatchForm.Size = New System.Drawing.Size(157, 22)
Me.btnBackToMatchForm.Text = "Zurück zur Profilauswahl"
'
'XtraTabControlDocs
'
Me.XtraTabControlDocs.Dock = System.Windows.Forms.DockStyle.Fill
@ -455,4 +464,5 @@ Partial Class frmResultDoc
Friend WithEvents tslblState As ToolStripStatusLabel
Friend WithEvents OrdnerÖffnenToolStripMenuItem As ToolStripMenuItem
Friend WithEvents ToolStripButtonDocView As ToolStripButton
Friend WithEvents btnBackToMatchForm As ToolStripButton
End Class

View File

@ -1,15 +1,16 @@
Imports System.ComponentModel
Imports System.IO
Imports System.Runtime.InteropServices
Imports DevExpress.Utils
Imports DevExpress.XtraGrid
Imports DevExpress.XtraGrid.Columns
Imports DevExpress.XtraGrid.Views.Grid
Imports DD_LIB_Standards
Imports DevExpress.XtraGrid.Views.Base
Imports DevExpress.XtraTab
Imports DD_Clipboard_Watcher.ClassProfileFilter
Public Class frmResultDoc
Implements IResultForm
#Region "Laufzeitvariablen & Konstanten"
Private Shared BW_DocPath As String
Private Shared BW_DocID As Integer
@ -20,6 +21,10 @@ Public Class frmResultDoc
Private _frmProfileMatch As frmProfileMatch 'You need a reference to Form1
Private _frmSQL As frmResultSQL 'You need a reference to Form1
Private _activeGridView As GridView
Private Current_MatchingProfiles As List(Of ProfileData)
Public Property ShouldReturnToMatchForm As Boolean = False Implements IResultForm.ShouldReturnToMatchForm
#End Region
Public Sub New()
MyBase.New
@ -30,12 +35,13 @@ Public Class frmResultDoc
_frmProfileMatch = Nothing
End Sub
Public Sub New(ProfileMatchForm As frmProfileMatch)
Public Sub New(ProfileMatchForm As frmProfileMatch, MatchingProfiles As List(Of ProfileData))
' Dieser Aufruf ist für den Designer erforderlich.
InitializeComponent()
' Fügen Sie Initialisierungen nach dem InitializeComponent()-Aufruf hinzu.
_frmProfileMatch = ProfileMatchForm
Current_MatchingProfiles = MatchingProfiles
End Sub
Private Class DocSearch
@ -56,10 +62,6 @@ Public Class frmResultDoc
Size = ConfigManager.Config.ResultDocWindowSize
End If
Dim oFrmResultSQL As New frmResultSQL()
_frmSQL = oFrmResultSQL
_frmSQL.Show()
GridViewDocSearch1.ShowLoadingPanel()
Dim oSearches = Await LoadSearchesAsync()
@ -82,12 +84,6 @@ Public Class frmResultDoc
End Try
_frmDocView?.Close()
_frmSQL?.Close()
If CURRENT_MATCHING_PROFILES.Count > 1 Then
_frmProfileMatch?.Show()
_frmProfileMatch?.BringToFront()
End If
End Sub
Private Async Function LoadSearchesAsync() As Task(Of List(Of DocSearch))
@ -95,11 +91,8 @@ Public Class frmResultDoc
End Function
Private Function DoLoadSearches() As List(Of DocSearch)
If IsNothing(CurrDocSearch2Load) Then
Throw New ApplicationException("CurrDocSearch2Load is empty")
End If
Dim oSQL As String = $"SELECT * FROM TBCW_PROF_DOC_SEARCH WHERE ACTIVE = 1 AND PROFILE_ID in ({CurrDocSearch2Load}) ORDER BY TAB_INDEX"
Dim oMatchingIds = String.Join(",", Current_MatchingProfiles.Select(Function(p) p.Guid).ToArray())
Dim oSQL As String = $"SELECT * FROM TBCW_PROF_DOC_SEARCH WHERE ACTIVE = 1 AND PROFILE_ID in ({oMatchingIds}) ORDER BY TAB_INDEX"
Dim oSearchesDataTable = clsDatabase.Return_Datatable(oSQL)
Dim oDocSearches As New List(Of DocSearch)
Dim oCounter As Integer = 0
@ -618,4 +611,9 @@ Public Class frmResultDoc
BringToFront()
CurrSearchOpen = True
End Sub
Private Sub btnBackToMatchForm_Click(sender As Object, e As EventArgs) Handles btnBackToMatchForm.Click
ShouldReturnToMatchForm = True
Close()
End Sub
End Class

View File

@ -29,6 +29,7 @@ Partial Class frmResultSQL
Me.tslblDocID = New System.Windows.Forms.ToolStripStatusLabel()
Me.tslblState = New System.Windows.Forms.ToolStripStatusLabel()
Me.ToolStrip1 = New System.Windows.Forms.ToolStrip()
Me.btnBackToMatchForm = New System.Windows.Forms.ToolStripButton()
Me.XtraTabControlData = New DevExpress.XtraTab.XtraTabControl()
Me.XtraTabPageDoc1 = New DevExpress.XtraTab.XtraTabPage()
Me.GridControlDocSearch1 = New DevExpress.XtraGrid.GridControl()
@ -53,6 +54,7 @@ Partial Class frmResultSQL
Me.ToolStripMenuItem1 = New System.Windows.Forms.ToolStripMenuItem()
Me.ToolStripMenuItem2 = New System.Windows.Forms.ToolStripMenuItem()
Me.StatusStrip1.SuspendLayout()
Me.ToolStrip1.SuspendLayout()
CType(Me.XtraTabControlData, System.ComponentModel.ISupportInitialize).BeginInit()
Me.XtraTabControlData.SuspendLayout()
Me.XtraTabPageDoc1.SuspendLayout()
@ -97,12 +99,22 @@ Partial Class frmResultSQL
'
'ToolStrip1
'
Me.ToolStrip1.GripStyle = System.Windows.Forms.ToolStripGripStyle.Hidden
Me.ToolStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.btnBackToMatchForm})
Me.ToolStrip1.Location = New System.Drawing.Point(0, 0)
Me.ToolStrip1.Name = "ToolStrip1"
Me.ToolStrip1.Size = New System.Drawing.Size(933, 25)
Me.ToolStrip1.TabIndex = 1
Me.ToolStrip1.Text = "ToolStrip1"
'
'btnBackToMatchForm
'
Me.btnBackToMatchForm.Image = Global.DD_Clipboard_Watcher.My.Resources.Resources.control_start_blue
Me.btnBackToMatchForm.ImageTransparentColor = System.Drawing.Color.Magenta
Me.btnBackToMatchForm.Name = "btnBackToMatchForm"
Me.btnBackToMatchForm.Size = New System.Drawing.Size(157, 22)
Me.btnBackToMatchForm.Text = "Zurück zur Profilauswahl"
'
'XtraTabControlData
'
Me.XtraTabControlData.Dock = System.Windows.Forms.DockStyle.Fill
@ -362,6 +374,8 @@ Partial Class frmResultSQL
Me.Text = "Clipboard-Watcher SQL-Result"
Me.StatusStrip1.ResumeLayout(False)
Me.StatusStrip1.PerformLayout()
Me.ToolStrip1.ResumeLayout(False)
Me.ToolStrip1.PerformLayout()
CType(Me.XtraTabControlData, System.ComponentModel.ISupportInitialize).EndInit()
Me.XtraTabControlData.ResumeLayout(False)
Me.XtraTabPageDoc1.ResumeLayout(False)
@ -412,4 +426,5 @@ Partial Class frmResultSQL
Friend WithEvents tslblDocID As ToolStripStatusLabel
Friend WithEvents tslblState As ToolStripStatusLabel
Friend WithEvents OrdnerÖffnenToolStripMenuItem As ToolStripMenuItem
Friend WithEvents btnBackToMatchForm As ToolStripButton
End Class

View File

@ -4,14 +4,20 @@ Imports DevExpress.XtraGrid
Imports DevExpress.XtraGrid.Views.Grid
Imports DevExpress.XtraGrid.Views.Base
Imports DD_LIB_Standards
Imports DD_Clipboard_Watcher.ClassProfileFilter
Public Class frmResultSQL
Implements IResultForm
Private Shared BW_DocPath As String
Private Shared BW_DocID As Integer
Private Shared CurrSearchID As Integer
Private DTDataSearchDefinition As DataTable
Private _activeGridView As GridView
Private _frmProfileMatch As frmProfileMatch
Private Current_MatchingProfiles As List(Of ProfileData)
Public Property ShouldReturnToMatchForm As Boolean = False Implements IResultForm.ShouldReturnToMatchForm
Private Class SQLSearch
Public DataTable As DataTable
@ -20,6 +26,15 @@ Public Class frmResultSQL
Public ProfileId As Integer
End Class
Public Sub New(ProfileMatchForm As frmProfileMatch, MatchingProfiles As List(Of ProfileData))
' Dieser Aufruf ist für den Designer erforderlich.
InitializeComponent()
' Fügen Sie Initialisierungen nach dem InitializeComponent()-Aufruf hinzu.
Current_MatchingProfiles = MatchingProfiles
_frmProfileMatch = ProfileMatchForm
End Sub
Private Async Sub frmResultDoc_Load(sender As Object, e As EventArgs) Handles Me.Load
If Not ConfigManager.Config.ResultDataWindowSize.IsEmpty Then
Size = ConfigManager.Config.ResultDataWindowSize
@ -42,10 +57,6 @@ Public Class frmResultSQL
GridViewDataSearch1.HideLoadingPanel()
End Sub
Private Sub frmResultSQL_Shown(sender As Object, e As EventArgs) Handles Me.Shown
BringToFront()
End Sub
Private Sub frmResultDoc_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing
Try
ConfigManager.Config.ResultDataWindowSize = Size
@ -139,11 +150,8 @@ Public Class frmResultSQL
End Function
Private Function DoLoadSearches() As List(Of SQLSearch)
If IsNothing(CurrDocSearch2Load) Then
Throw New ApplicationException("CurrDataSearch2Load is empty")
End If
Dim oSQL = $"SELECT * FROM TBCW_PROF_DATA_SEARCH WHERE ACTIVE = 1 AND PROFILE_ID in ({CurrDataSearch2Load}) ORDER BY TAB_INDEX"
Dim oMatchingIds = String.Join(",", Current_MatchingProfiles.Select(Function(p) p.Guid).ToArray())
Dim oSQL = $"SELECT * FROM TBCW_PROF_DATA_SEARCH WHERE ACTIVE = 1 AND PROFILE_ID in ({oMatchingIds}) ORDER BY TAB_INDEX"
Dim oSearchesDataTable = clsDatabase.Return_Datatable(oSQL)
Dim oSearches As New List(Of SQLSearch)
Dim oCounter As Integer = 0
@ -171,24 +179,6 @@ Public Class frmResultSQL
Return oSearches
End Function
'Sub Load_Searches()
' If Not IsNothing(CurrDataSearch2Load) Then
' Dim oSQL = $"SELECT * FROM TBCW_PROF_DATA_SEARCH WHERE ACTIVE = 1 AND PROFILE_ID in ({CurrDataSearch2Load}) ORDER BY TAB_INDEX"
' DTDataSearchDefinition = clsDatabase.Return_Datatable(oSQL)
' Dim ocounter As Integer = 0
' If CurrDataSearch2Load.ToString.Contains(",") Then
' End If
' For Each oRow As DataRow In DTDataSearchDefinition.Rows
' RefreshTabData(oRow.Item("PROFILE_ID"), oRow.Item("CONN_ID"), oRow.Item("SQL_COMMAND"), ocounter, oRow.Item("TAB_TITLE"))
' ocounter += 1
' Next
' Else
' MsgBox("Sorry but the selection of profile went wrong. (CurrSearch2Load is nothing)", MsgBoxStyle.Critical)
' Close()
' End If
'End Sub
Private Sub MenuItemReload_Click(sender As Object, e As EventArgs) Handles ToolStripMenuItem1.Click
Reload_Active_DocumentTab()
End Sub
@ -238,4 +228,9 @@ Public Class frmResultSQL
'RefreshTabData(oProfileID, oConID, oCommand, oTabIndex, oTabCaption)
Reload_Active_DocumentTab()
End Sub
Private Sub btnBackToMatchForm_Click(sender As Object, e As EventArgs) Handles btnBackToMatchForm.Click
ShouldReturnToMatchForm = True
Close()
End Sub
End Class

View File

@ -25,24 +25,22 @@ Partial Class frmSplash
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmSplash))
Me.Copyright = New System.Windows.Forms.Label()
Me.Version = New System.Windows.Forms.Label()
Me.Label1 = New System.Windows.Forms.Label()
Me.lblStatus = New System.Windows.Forms.Label()
Me.pbStatus = New System.Windows.Forms.ProgressBar()
Me.PictureBox1 = New System.Windows.Forms.PictureBox()
Me.PictureBox2 = New System.Windows.Forms.PictureBox()
CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.PictureBox2, System.ComponentModel.ISupportInitialize).BeginInit()
Me.SuspendLayout()
'
'Copyright
'
Me.Copyright.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
Me.Copyright.AutoSize = True
Me.Copyright.BackColor = System.Drawing.Color.Transparent
Me.Copyright.Font = New System.Drawing.Font("Segoe UI", 9.0!)
Me.Copyright.ImeMode = System.Windows.Forms.ImeMode.NoControl
Me.Copyright.Location = New System.Drawing.Point(261, 33)
Me.Copyright.Location = New System.Drawing.Point(129, 328)
Me.Copyright.Name = "Copyright"
Me.Copyright.Size = New System.Drawing.Size(185, 21)
Me.Copyright.Size = New System.Drawing.Size(60, 15)
Me.Copyright.TabIndex = 2
Me.Copyright.Text = "Copyright"
Me.Copyright.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
@ -50,34 +48,24 @@ Partial Class frmSplash
'Version
'
Me.Version.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
Me.Version.AutoSize = True
Me.Version.BackColor = System.Drawing.Color.Transparent
Me.Version.Font = New System.Drawing.Font("Segoe UI", 9.0!)
Me.Version.ImeMode = System.Windows.Forms.ImeMode.NoControl
Me.Version.Location = New System.Drawing.Point(261, 12)
Me.Version.Location = New System.Drawing.Point(4, 328)
Me.Version.Name = "Version"
Me.Version.Size = New System.Drawing.Size(185, 21)
Me.Version.Size = New System.Drawing.Size(94, 15)
Me.Version.TabIndex = 1
Me.Version.Text = "Version {0}.{1:00}"
Me.Version.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
'
'Label1
'
Me.Label1.AutoSize = True
Me.Label1.Font = New System.Drawing.Font("Segoe UI", 8.25!)
Me.Label1.ImeMode = System.Windows.Forms.ImeMode.NoControl
Me.Label1.Location = New System.Drawing.Point(264, 196)
Me.Label1.Name = "Label1"
Me.Label1.Size = New System.Drawing.Size(182, 13)
Me.Label1.TabIndex = 12
Me.Label1.Text = "This software is in parts based on:"
'
'lblStatus
'
Me.lblStatus.AutoSize = True
Me.lblStatus.BackColor = System.Drawing.SystemColors.Control
Me.lblStatus.Font = New System.Drawing.Font("Segoe UI", 9.0!)
Me.lblStatus.ImeMode = System.Windows.Forms.ImeMode.NoControl
Me.lblStatus.Location = New System.Drawing.Point(-3, 268)
Me.lblStatus.Location = New System.Drawing.Point(4, 355)
Me.lblStatus.Name = "lblStatus"
Me.lblStatus.Size = New System.Drawing.Size(79, 15)
Me.lblStatus.TabIndex = 8
@ -88,29 +76,18 @@ Partial Class frmSplash
'
Me.pbStatus.Dock = System.Windows.Forms.DockStyle.Bottom
Me.pbStatus.ImeMode = System.Windows.Forms.ImeMode.NoControl
Me.pbStatus.Location = New System.Drawing.Point(0, 286)
Me.pbStatus.Location = New System.Drawing.Point(0, 375)
Me.pbStatus.Name = "pbStatus"
Me.pbStatus.Size = New System.Drawing.Size(494, 23)
Me.pbStatus.Size = New System.Drawing.Size(554, 23)
Me.pbStatus.TabIndex = 7
'
'PictureBox1
'
Me.PictureBox1.Image = CType(resources.GetObject("PictureBox1.Image"), System.Drawing.Image)
Me.PictureBox1.ImeMode = System.Windows.Forms.ImeMode.NoControl
Me.PictureBox1.Location = New System.Drawing.Point(267, 213)
Me.PictureBox1.Name = "PictureBox1"
Me.PictureBox1.Size = New System.Drawing.Size(109, 38)
Me.PictureBox1.SizeMode = System.Windows.Forms.PictureBoxSizeMode.Zoom
Me.PictureBox1.TabIndex = 10
Me.PictureBox1.TabStop = False
'
'PictureBox2
'
Me.PictureBox2.Image = CType(resources.GetObject("PictureBox2.Image"), System.Drawing.Image)
Me.PictureBox2.ImeMode = System.Windows.Forms.ImeMode.NoControl
Me.PictureBox2.Location = New System.Drawing.Point(0, 12)
Me.PictureBox2.Location = New System.Drawing.Point(0, 0)
Me.PictureBox2.Name = "PictureBox2"
Me.PictureBox2.Size = New System.Drawing.Size(254, 241)
Me.PictureBox2.Size = New System.Drawing.Size(532, 326)
Me.PictureBox2.SizeMode = System.Windows.Forms.PictureBoxSizeMode.Zoom
Me.PictureBox2.TabIndex = 11
Me.PictureBox2.TabStop = False
@ -119,12 +96,10 @@ Partial Class frmSplash
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.ClientSize = New System.Drawing.Size(494, 309)
Me.ClientSize = New System.Drawing.Size(554, 398)
Me.ControlBox = False
Me.Controls.Add(Me.Copyright)
Me.Controls.Add(Me.Label1)
Me.Controls.Add(Me.Version)
Me.Controls.Add(Me.PictureBox1)
Me.Controls.Add(Me.lblStatus)
Me.Controls.Add(Me.pbStatus)
Me.Controls.Add(Me.PictureBox2)
@ -133,7 +108,6 @@ Partial Class frmSplash
Me.Name = "frmSplash"
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
Me.Text = "frmSplash"
CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.PictureBox2, System.ComponentModel.ISupportInitialize).EndInit()
Me.ResumeLayout(False)
Me.PerformLayout()
@ -141,9 +115,7 @@ Partial Class frmSplash
End Sub
Friend WithEvents Copyright As System.Windows.Forms.Label
Friend WithEvents Version As System.Windows.Forms.Label
Friend WithEvents Label1 As System.Windows.Forms.Label
Friend WithEvents PictureBox1 As System.Windows.Forms.PictureBox
Friend WithEvents lblStatus As System.Windows.Forms.Label
Friend WithEvents pbStatus As System.Windows.Forms.ProgressBar
Friend WithEvents PictureBox2 As System.Windows.Forms.PictureBox
Friend WithEvents PictureBox2 As PictureBox
End Class

File diff suppressed because it is too large Load Diff

View File

@ -1,36 +1,32 @@
Imports System.ComponentModel
Imports System.Threading
Public NotInheritable Class frmSplash
'TODO: Dieses Formular kann einfach als Begrüßungsbildschirm für die Anwendung festgelegt werden, indem Sie zur Registerkarte "Anwendung"
' des Projekt-Designers wechseln (Menü "Projekt", Option "Eigenschaften").
Private InitSteps As Integer = 3
Private bw As New BackgroundWorker()
Private mainForm As Form
Private Worker As New BackgroundWorker()
Private MainForm As Form
Private Sub frmSplash_KeyUp(sender As Object, e As KeyEventArgs) Handles Me.KeyUp
If e.KeyCode = Keys.Escape Then
ESC_Hidden = True
End If
End Sub
Private Sub frmSplash_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
Version.Text = String.Format("Version {0}", My.Application.Info.Version.ToString)
Copyright.Text = My.Application.Info.Copyright & " " & My.Application.Info.CompanyName
Copyright.Text = String.Format("{0} {1}", My.Application.Info.Copyright, My.Application.Info.CompanyName)
BringToFront()
InitProgram()
End Sub
Private Sub InitProgram()
bw.WorkerReportsProgress = True
AddHandler bw.DoWork, AddressOf bw_DoWork
AddHandler bw.ProgressChanged, AddressOf bw_ProgressChanged
AddHandler bw.RunWorkerCompleted, AddressOf bw_RunWorkerCompleted
Worker.WorkerReportsProgress = True
AddHandler Worker.DoWork, AddressOf bw_DoWork
AddHandler Worker.ProgressChanged, AddressOf bw_ProgressChanged
AddHandler Worker.RunWorkerCompleted, AddressOf bw_RunWorkerCompleted
bw.RunWorkerAsync()
Worker.RunWorkerAsync()
End Sub
Private Function CalcProgress(_step As Integer)
@ -41,17 +37,17 @@ Public NotInheritable Class frmSplash
Private Sub bw_DoWork(sender As Object, e As System.ComponentModel.DoWorkEventArgs)
Try
Dim Init = New ClassInit()
bw.ReportProgress(CalcProgress(1), "Initializing Logger")
Worker.ReportProgress(CalcProgress(1), "Initializing Logger")
Init.InitLogger()
Thread.Sleep(500)
bw.ReportProgress(CalcProgress(2), "Initializing Database")
Worker.ReportProgress(CalcProgress(2), "Initializing Database")
Init.InitBasics()
If Init.InitDatabase() = True Then
Thread.Sleep(500)
bw.ReportProgress(CalcProgress(3), "Initializing User-Configuration")
Worker.ReportProgress(CalcProgress(3), "Initializing User-Configuration")
If ClassInit.InitUserLogin = False Then
If ERROR_INIT = "" Then
ERROR_INIT = "INVALID USER"
@ -68,12 +64,12 @@ Public NotInheritable Class frmSplash
End Try
End Sub
Private Sub bw_ProgressChanged(sender As Object, e As System.ComponentModel.ProgressChangedEventArgs)
Private Sub bw_ProgressChanged(sender As Object, e As ProgressChangedEventArgs)
pbStatus.Value = e.ProgressPercentage
lblStatus.Text = e.UserState.ToString()
End Sub
Private Sub bw_RunWorkerCompleted(sender As Object, e As System.ComponentModel.RunWorkerCompletedEventArgs)
Private Sub bw_RunWorkerCompleted(sender As Object, e As RunWorkerCompletedEventArgs)
' Bei Fehler MsgBox anzeigen und Programm beenden
If e.Error IsNot Nothing Then
MsgBox(e.Error.Message, MsgBoxStyle.Critical, "Unexpected Error in frmSplash")
@ -81,6 +77,6 @@ Public NotInheritable Class frmSplash
End If
' Wenn kein Fehler, Splashscreen schließen
Me.Close()
Close()
End Sub
End Class

View File

@ -34,11 +34,10 @@ Partial Class frmStart
Me.ContextMenuStripForm = New System.Windows.Forms.ContextMenuStrip(Me.components)
Me.MinimierenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
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.btnAdminConfig = New System.Windows.Forms.Button()
Me.labelHotkey = New System.Windows.Forms.Label()
Me.btnUserConfig = New System.Windows.Forms.Button()
Me.btnAdminConfig = New System.Windows.Forms.Button()
Me.cmstrpNotifyIcon.SuspendLayout()
Me.StatusStrip1.SuspendLayout()
Me.ContextMenuStripForm.SuspendLayout()
@ -79,9 +78,9 @@ Partial Class frmStart
'StatusStrip1
'
Me.StatusStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.tslblUser})
Me.StatusStrip1.Location = New System.Drawing.Point(0, 111)
Me.StatusStrip1.Location = New System.Drawing.Point(0, 138)
Me.StatusStrip1.Name = "StatusStrip1"
Me.StatusStrip1.Size = New System.Drawing.Size(328, 22)
Me.StatusStrip1.Size = New System.Drawing.Size(345, 22)
Me.StatusStrip1.SizingGrip = False
Me.StatusStrip1.TabIndex = 3
Me.StatusStrip1.Text = "StatusStrip1"
@ -111,87 +110,79 @@ Partial Class frmStart
'
'Label1
'
Me.Label1.AutoSize = True
Me.Label1.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
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, 38)
Me.Label1.Name = "Label1"
Me.Label1.Size = New System.Drawing.Size(284, 26)
Me.Label1.Size = New System.Drawing.Size(321, 26)
Me.Label1.TabIndex = 7
Me.Label1.Text = "Deaktivieren des Watchers über Rechtsklick Systray oder " & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "Tastaturkombination Str" &
"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"
Me.Label1.Text = "Deaktivieren des Watchers über Rechtsklick auf das Systray Icon oder die Tastatur" &
"kombination Strg + T"
'
'GroupBox1
'
Me.GroupBox1.Controls.Add(Me.Label3)
Me.GroupBox1.Controls.Add(Me.lbHKFunction)
Me.GroupBox1.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.GroupBox1.Controls.Add(Me.labelHotkey)
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.Location = New System.Drawing.Point(15, 67)
Me.GroupBox1.Name = "GroupBox1"
Me.GroupBox1.Size = New System.Drawing.Size(308, 32)
Me.GroupBox1.Size = New System.Drawing.Size(318, 59)
Me.GroupBox1.TabIndex = 11
Me.GroupBox1.TabStop = False
Me.GroupBox1.Text = "Aktuelle Tastenkombination:"
'
'btnAdminConfig
'labelHotkey
'
Me.btnAdminConfig.Image = CType(resources.GetObject("btnAdminConfig.Image"), System.Drawing.Image)
Me.btnAdminConfig.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
Me.btnAdminConfig.Location = New System.Drawing.Point(169, 12)
Me.btnAdminConfig.Name = "btnAdminConfig"
Me.btnAdminConfig.Size = New System.Drawing.Size(151, 29)
Me.btnAdminConfig.TabIndex = 6
Me.btnAdminConfig.Text = "Admin Einstellungen"
Me.btnAdminConfig.TextAlign = System.Drawing.ContentAlignment.MiddleRight
Me.btnAdminConfig.UseVisualStyleBackColor = True
Me.btnAdminConfig.Visible = False
Me.labelHotkey.Dock = System.Windows.Forms.DockStyle.Fill
Me.labelHotkey.Font = New System.Drawing.Font("Tahoma", 15.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.labelHotkey.ForeColor = System.Drawing.SystemColors.ControlDarkDark
Me.labelHotkey.Location = New System.Drawing.Point(3, 17)
Me.labelHotkey.Name = "labelHotkey"
Me.labelHotkey.Size = New System.Drawing.Size(312, 39)
Me.labelHotkey.TabIndex = 13
Me.labelHotkey.Text = "STRG+C"
Me.labelHotkey.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
'
'btnUserConfig
'
Me.btnUserConfig.Image = CType(resources.GetObject("btnUserConfig.Image"), System.Drawing.Image)
Me.btnUserConfig.Image = Global.DD_Clipboard_Watcher.My.Resources.Resources.user_16xLG
Me.btnUserConfig.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
Me.btnUserConfig.Location = New System.Drawing.Point(12, 12)
Me.btnUserConfig.Location = New System.Drawing.Point(15, 12)
Me.btnUserConfig.Name = "btnUserConfig"
Me.btnUserConfig.Size = New System.Drawing.Size(151, 29)
Me.btnUserConfig.TabIndex = 2
Me.btnUserConfig.Text = "Grundeinstellungen User"
Me.btnUserConfig.TextAlign = System.Drawing.ContentAlignment.MiddleRight
Me.btnUserConfig.Size = New System.Drawing.Size(151, 23)
Me.btnUserConfig.TabIndex = 13
Me.btnUserConfig.Text = "Grundeinstellungen"
Me.btnUserConfig.UseVisualStyleBackColor = True
'
'btnAdminConfig
'
Me.btnAdminConfig.Image = Global.DD_Clipboard_Watcher.My.Resources.Resources.Editdatasetwithdesigner_8449
Me.btnAdminConfig.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
Me.btnAdminConfig.Location = New System.Drawing.Point(182, 12)
Me.btnAdminConfig.Name = "btnAdminConfig"
Me.btnAdminConfig.Size = New System.Drawing.Size(151, 23)
Me.btnAdminConfig.TabIndex = 13
Me.btnAdminConfig.Text = "Administration"
Me.btnAdminConfig.UseVisualStyleBackColor = True
'
'frmStart
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.ClientSize = New System.Drawing.Size(328, 133)
Me.ClientSize = New System.Drawing.Size(345, 160)
Me.ContextMenuStrip = Me.ContextMenuStripForm
Me.Controls.Add(Me.btnAdminConfig)
Me.Controls.Add(Me.btnUserConfig)
Me.Controls.Add(Me.GroupBox1)
Me.Controls.Add(Me.Label1)
Me.Controls.Add(Me.btnAdminConfig)
Me.Controls.Add(Me.StatusStrip1)
Me.Controls.Add(Me.btnUserConfig)
Me.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
Me.KeyPreview = True
Me.MaximizeBox = False
Me.MinimumSize = New System.Drawing.Size(361, 199)
Me.Name = "frmStart"
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
Me.Text = "Clipboard Watcher"
@ -200,24 +191,22 @@ Partial Class frmStart
Me.StatusStrip1.PerformLayout()
Me.ContextMenuStripForm.ResumeLayout(False)
Me.GroupBox1.ResumeLayout(False)
Me.GroupBox1.PerformLayout()
Me.ResumeLayout(False)
Me.PerformLayout()
End Sub
Friend WithEvents btnUserConfig As System.Windows.Forms.Button
Friend WithEvents NotifyIconMain As System.Windows.Forms.NotifyIcon
Friend WithEvents cmstrpNotifyIcon As System.Windows.Forms.ContextMenuStrip
Friend WithEvents tsmiChangeState As System.Windows.Forms.ToolStripMenuItem
Friend WithEvents StatusStrip1 As System.Windows.Forms.StatusStrip
Friend WithEvents tslblUser As System.Windows.Forms.ToolStripStatusLabel
Friend WithEvents btnAdminConfig As System.Windows.Forms.Button
Friend WithEvents TimerClose As System.Windows.Forms.Timer
Friend WithEvents ContextMenuStripForm As System.Windows.Forms.ContextMenuStrip
Friend WithEvents MinimierenToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem
Friend WithEvents Label1 As System.Windows.Forms.Label
Friend WithEvents Label3 As Label
Friend WithEvents lbHKFunction As Label
Friend WithEvents GroupBox1 As GroupBox
Friend WithEvents ClientÖffnenToolStripMenuItem As ToolStripMenuItem
Friend WithEvents labelHotkey As Label
Friend WithEvents btnUserConfig As Button
Friend WithEvents btnAdminConfig As Button
End Class

File diff suppressed because it is too large Load Diff

View File

@ -4,11 +4,8 @@ Imports DD_LIB_Standards
Public Class frmStart
Dim WithEvents Hotkey As New clsHotkey(Me)
Private PID As Integer
Private WithEvents _Watcher As ClipboardWatcher = ClipboardWatcher.Singleton
Private Sub frmClipboardWatch_Disposed(ByVal sender As Object, ByVal e As EventArgs) Handles Me.Disposed
_Watcher.Dispose()
End Sub
@ -28,19 +25,17 @@ Public Class frmStart
Dim oProfileFilter As New ClassProfileFilter(DT_USER_PROFILES, DTPROFILE_REL_WINDOW)
Dim oProfiles = oProfileFilter.
Profiles.
AsEnumerable()
Dim oProfiles = oProfileFilter.Profiles.AsEnumerable()
oProfiles = oProfileFilter.FilterProfilesByProcess(oProfiles, CurrPROC_Name)
oProfiles = oProfileFilter.FilterProfilesByClipboardRegex(oProfiles, ClipboardContents)
oProfiles = oProfileFilter.FilterWindowsByWindowTitle(oProfiles, WindowTitle)
oProfiles = oProfileFilter.FilterProfilesByWindowRegex(oProfiles, ClipboardContents)
oProfiles = oProfileFilter.FilterWindowsByWindowTitleRegex(oProfiles, WindowTitle)
oProfiles = oProfileFilter.FilterProfilesByWindowClipboardRegex(oProfiles, ClipboardContents)
oProfiles = oProfileFilter.RemoveDuplicateProfiles()
oProfiles = oProfiles.ToList()
CURRENT_MATCHING_PROFILES = oProfiles
CURR_MATCH_RESULT = ClipboardContents
CURRENT_CLIPBOARD_CONTENTS = ClipboardContents
End Sub
Public Sub New()
@ -62,18 +57,12 @@ Public Class frmStart
End Sub
Private Sub btnUserConfig_Click(sender As Object, e As EventArgs) Handles btnUserConfig.Click
frmConfig_Basic.ShowDialog()
End Sub
Private Sub frmMain_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing
Logger.Info(">> Logout time: " & Now.ToString, False)
If ERROR_INIT = "INVALID USER" Or ERROR_INIT = "NO CLIENT" Then
Exit Sub
End If
Try
'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)
Dim sql = "DELETE FROM TBDD_USER_MODULE_LOG_IN WHERE USER_ID = " & USER_ID & " AND UPPER(MODULE) = UPPER('Clipboard-Watcher')"
clsDatabase.Execute_non_Query(sql, True)
ClassWindowLocation.SaveFormLocationSize(Me, "")
@ -131,7 +120,7 @@ Public Class frmStart
End If
tslblUser.Text = USER_USERNAME
lbHKFunction.Text = HotkeyFunctionKey.ToUpper & " + " & HotkeySearchKey.ToUpper
labelHotkey.Text = $"STRG+C {HotkeyFunctionKey.ToUpper}+{HotkeySearchKey.ToUpper}"
End Sub
Private Sub ReceiveHotKey(ByVal HotKeyID As String) Handles Hotkey.HotKeyPressed
If HotKeyID = ClassConstants.HOTKEY_TRIGGER_WATCHER Then
@ -197,24 +186,8 @@ Public Class frmStart
MsgBox("Ein oder mehrere Abfragen konnten nicht ausgeführt werden. Bitte überprüfen Sie das Log.", MsgBoxStyle.Exclamation, "Warnung")
End If
If oProfiles.Count = 1 Then
Dim oCountData = oProfiles.First().CountData
Dim oCountDocs = oProfiles.First().CountDocs = 0
If oCountData = 0 Then
CurrDocSearch2Load = oProfiles.First().Guid
frmResultDoc.Show()
ElseIf oCountDocs = 0 Then
CurrDocSearch2Load = oProfiles.First().Guid
frmResultDoc.Show()
ElseIf oCountDocs = 0 And oCountData = 0 Then
MsgBox("Es wurden keine Ergebnisse gefunden!")
Else
frmProfileMatch.ShowDialog()
End If
Else
frmProfileMatch.ShowDialog()
End If
Dim oForm As New frmProfileMatch()
oForm.ShowDialog()
End Sub
Sub Change_Monitoring_State()
If MONITORING_ACTIVE = True Then
@ -282,14 +255,6 @@ Public Class frmStart
End If
End Sub
Private Sub btnAdminConfig_Click(sender As Object, e As EventArgs) Handles btnAdminConfig.Click
TimerClose.Stop()
MONITORING_ACTIVE = False
frmAdministration.ShowDialog()
TimerClose.Start()
MONITORING_ACTIVE = True
End Sub
Private Sub TimerClose_Tick(sender As Object, e As EventArgs) Handles TimerClose.Tick
Hide()
End Sub
@ -307,4 +272,17 @@ Public Class frmStart
Private Sub ClientÖffnenToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles ClientÖffnenToolStripMenuItem.Click
OpenClose()
End Sub
Private Sub btnUserConfig_Click(sender As Object, e As EventArgs) Handles btnUserConfig.Click
frmConfig_Basic.ShowDialog()
End Sub
Private Sub btnAdminConfig_Click(sender As Object, e As EventArgs) Handles btnAdminConfig.Click
TimerClose.Stop()
MONITORING_ACTIVE = False
frmAdministration.ShowDialog()
TimerClose.Start()
MONITORING_ACTIVE = True
End Sub
End Class

View File

@ -43,13 +43,14 @@ Module modCurrent
Public TEMP_FILES As List(Of String) = New List(Of String)
Public WD_UNICODE As Boolean = False
Public GDPICTURE_LICENSE As String = String.Empty
Public DT_USER_PROFILES As DataTable
Public CLIPBOARD_TEXT As String
Public CURRENT_MATCHING_PROFILES As New List(Of ClassProfileFilter.ProfileData)
Public CURR_MATCH_RESULT
Public CURRENT_CLIPBOARD_CONTENTS
'Public CURR_MATCH_WM_SEARCH
Public CURR_FOCUSED_WINDOWNAME
Public MONITORING_ACTIVE As Boolean = True
@ -64,7 +65,5 @@ Module modCurrent
Public CURRENT_DT_DOC_SEARCHES As DataTable
Public CURRENT_DT_DATA_SEARCHES As DataTable
Public CurrDocSearch2Load As Object
Public CurrDataSearch2Load As Object
Public CurrSearchOpen As Boolean = False
End Module