diff --git a/app/DD_Clipboard_Searcher/App.config b/app/DD_Clipboard_Searcher/App.config
index 835b550..c454930 100644
--- a/app/DD_Clipboard_Searcher/App.config
+++ b/app/DD_Clipboard_Searcher/App.config
@@ -33,6 +33,12 @@
0, 0
+
+ 0, 0
+
+
+ 0, 0
+
diff --git a/app/DD_Clipboard_Searcher/My Project/Settings.Designer.vb b/app/DD_Clipboard_Searcher/My Project/Settings.Designer.vb
index 1dc0eb0..99046e1 100644
--- a/app/DD_Clipboard_Searcher/My Project/Settings.Designer.vb
+++ b/app/DD_Clipboard_Searcher/My Project/Settings.Designer.vb
@@ -136,6 +136,30 @@ Namespace My
Me("frmViewerSize") = value
End Set
End Property
+
+ _
+ Public Property frmProfileMatchPosition() As Global.System.Drawing.Point
+ Get
+ Return CType(Me("frmProfileMatchPosition"),Global.System.Drawing.Point)
+ End Get
+ Set
+ Me("frmProfileMatchPosition") = value
+ End Set
+ End Property
+
+ _
+ Public Property frmProfileMatchSize() As Global.System.Drawing.Size
+ Get
+ Return CType(Me("frmProfileMatchSize"),Global.System.Drawing.Size)
+ End Get
+ Set
+ Me("frmProfileMatchSize") = value
+ End Set
+ End Property
End Class
End Namespace
diff --git a/app/DD_Clipboard_Searcher/My Project/Settings.settings b/app/DD_Clipboard_Searcher/My Project/Settings.settings
index 86399c5..319956b 100644
--- a/app/DD_Clipboard_Searcher/My Project/Settings.settings
+++ b/app/DD_Clipboard_Searcher/My Project/Settings.settings
@@ -28,5 +28,11 @@
0, 0
+
+ 0, 0
+
+
+ 0, 0
+
\ No newline at end of file
diff --git a/app/DD_Clipboard_Searcher/frmDocView.designer.vb b/app/DD_Clipboard_Searcher/frmDocView.designer.vb
index 43cc1fc..1ebcd6c 100644
--- a/app/DD_Clipboard_Searcher/frmDocView.designer.vb
+++ b/app/DD_Clipboard_Searcher/frmDocView.designer.vb
@@ -73,6 +73,7 @@ Partial Class frmDocView
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()
@@ -83,8 +84,8 @@ Partial Class frmDocView
Me.ToolStripSeparator8 = New System.Windows.Forms.ToolStripSeparator()
Me.btnMouseMode = New System.Windows.Forms.ToolStripDropDownButton()
Me.DefaultToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
- Me.AreaSelectionToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.PanToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
+ Me.AreaSelectionToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.AreaZoomingToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.MagnifierToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.ToolStripSeparator6 = New System.Windows.Forms.ToolStripSeparator()
@@ -111,7 +112,6 @@ Partial Class frmDocView
Me.ToolStripSeparator4 = New System.Windows.Forms.ToolStripSeparator()
Me.btnAbout = New System.Windows.Forms.ToolStripButton()
Me.pMain = New System.Windows.Forms.Panel()
- Me.ToolStripStatusLabel2 = New System.Windows.Forms.ToolStripStatusLabel()
Me.tcLeftPanel.SuspendLayout()
Me.tpThumbnails.SuspendLayout()
Me.ToolStripContainer1.BottomToolStripPanel.SuspendLayout()
@@ -747,8 +747,14 @@ Partial Class frmDocView
Me.ToolStripStatusLabel1.Name = "ToolStripStatusLabel1"
Me.ToolStripStatusLabel1.Size = New System.Drawing.Size(0, 17)
'
+ 'ToolStripStatusLabel2
+ '
+ Me.ToolStripStatusLabel2.Name = "ToolStripStatusLabel2"
+ Me.ToolStripStatusLabel2.Size = New System.Drawing.Size(0, 17)
+ '
'mainToolStrip
'
+ 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})
@@ -760,13 +766,13 @@ Partial Class frmDocView
'
'btnOpen
'
- Me.btnOpen.Font = New System.Drawing.Font("Segoe UI", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+ 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(130, 28)
+ Me.btnOpen.Size = New System.Drawing.Size(126, 28)
Me.btnOpen.Text = "Open document"
'
'ToolStripSeparator9
@@ -820,7 +826,7 @@ Partial Class frmDocView
'btnMouseMode
'
Me.btnMouseMode.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
- Me.btnMouseMode.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.DefaultToolStripMenuItem, Me.AreaSelectionToolStripMenuItem, Me.PanToolStripMenuItem, Me.AreaZoomingToolStripMenuItem, Me.MagnifierToolStripMenuItem})
+ Me.btnMouseMode.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.DefaultToolStripMenuItem, Me.PanToolStripMenuItem, Me.AreaSelectionToolStripMenuItem, Me.AreaZoomingToolStripMenuItem, Me.MagnifierToolStripMenuItem})
Me.btnMouseMode.Image = CType(resources.GetObject("btnMouseMode.Image"), System.Drawing.Image)
Me.btnMouseMode.ImageTransparentColor = System.Drawing.Color.Magenta
Me.btnMouseMode.Name = "btnMouseMode"
@@ -831,37 +837,37 @@ Partial Class frmDocView
'
Me.DefaultToolStripMenuItem.CheckOnClick = True
Me.DefaultToolStripMenuItem.Name = "DefaultToolStripMenuItem"
- Me.DefaultToolStripMenuItem.Size = New System.Drawing.Size(148, 22)
+ Me.DefaultToolStripMenuItem.Size = New System.Drawing.Size(151, 22)
Me.DefaultToolStripMenuItem.Text = "Default"
'
- 'AreaSelectionToolStripMenuItem
- '
- Me.AreaSelectionToolStripMenuItem.CheckOnClick = True
- Me.AreaSelectionToolStripMenuItem.Name = "AreaSelectionToolStripMenuItem"
- Me.AreaSelectionToolStripMenuItem.Size = New System.Drawing.Size(148, 22)
- Me.AreaSelectionToolStripMenuItem.Text = "Area selection"
- '
'PanToolStripMenuItem
'
Me.PanToolStripMenuItem.Checked = True
Me.PanToolStripMenuItem.CheckOnClick = True
Me.PanToolStripMenuItem.CheckState = System.Windows.Forms.CheckState.Checked
Me.PanToolStripMenuItem.Name = "PanToolStripMenuItem"
- Me.PanToolStripMenuItem.Size = New System.Drawing.Size(148, 22)
+ Me.PanToolStripMenuItem.Size = New System.Drawing.Size(151, 22)
Me.PanToolStripMenuItem.Text = "Pan"
'
+ 'AreaSelectionToolStripMenuItem
+ '
+ Me.AreaSelectionToolStripMenuItem.CheckOnClick = True
+ Me.AreaSelectionToolStripMenuItem.Name = "AreaSelectionToolStripMenuItem"
+ Me.AreaSelectionToolStripMenuItem.Size = New System.Drawing.Size(151, 22)
+ Me.AreaSelectionToolStripMenuItem.Text = "Area selection"
+ '
'AreaZoomingToolStripMenuItem
'
Me.AreaZoomingToolStripMenuItem.CheckOnClick = True
Me.AreaZoomingToolStripMenuItem.Name = "AreaZoomingToolStripMenuItem"
- Me.AreaZoomingToolStripMenuItem.Size = New System.Drawing.Size(148, 22)
+ Me.AreaZoomingToolStripMenuItem.Size = New System.Drawing.Size(151, 22)
Me.AreaZoomingToolStripMenuItem.Text = "Area zooming"
'
'MagnifierToolStripMenuItem
'
Me.MagnifierToolStripMenuItem.CheckOnClick = True
Me.MagnifierToolStripMenuItem.Name = "MagnifierToolStripMenuItem"
- Me.MagnifierToolStripMenuItem.Size = New System.Drawing.Size(148, 22)
+ Me.MagnifierToolStripMenuItem.Size = New System.Drawing.Size(151, 22)
Me.MagnifierToolStripMenuItem.Text = "Magnifier"
'
'ToolStripSeparator6
@@ -892,14 +898,14 @@ Partial Class frmDocView
'
'tbCurrentPage
'
- Me.tbCurrentPage.Font = New System.Drawing.Font("Segoe UI", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+ Me.tbCurrentPage.Font = New System.Drawing.Font("Tahoma", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.tbCurrentPage.Name = "tbCurrentPage"
Me.tbCurrentPage.Size = New System.Drawing.Size(40, 31)
Me.tbCurrentPage.TextBoxTextAlign = System.Windows.Forms.HorizontalAlignment.Right
'
'lblPageCount
'
- Me.lblPageCount.Font = New System.Drawing.Font("Segoe UI", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+ Me.lblPageCount.Font = New System.Drawing.Font("Tahoma", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.lblPageCount.Name = "lblPageCount"
Me.lblPageCount.Size = New System.Drawing.Size(25, 28)
Me.lblPageCount.Text = "/ X"
@@ -1069,11 +1075,6 @@ Partial Class frmDocView
Me.pMain.Size = New System.Drawing.Size(1264, 676)
Me.pMain.TabIndex = 6
'
- 'ToolStripStatusLabel2
- '
- Me.ToolStripStatusLabel2.Name = "ToolStripStatusLabel2"
- Me.ToolStripStatusLabel2.Size = New System.Drawing.Size(0, 17)
- '
'frmDocView
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
diff --git a/app/DD_Clipboard_Searcher/frmDocView.resx b/app/DD_Clipboard_Searcher/frmDocView.resx
index f98c41d..d5b3e3e 100644
--- a/app/DD_Clipboard_Searcher/frmDocView.resx
+++ b/app/DD_Clipboard_Searcher/frmDocView.resx
@@ -185,164 +185,164 @@
iVBORw0KGgoAAAANSUhEUgAAABgAAAAYCAYAAADgdz34AAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
- YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAALYSURBVEhLzVTdSxRRFN/Syh6EqP6C/oDoLXxJiT7WnTUl
- kkKJsHamD5ZSc92ttW4xM1vCGvRS+BA+hA/uzqxp7h2KyJegtwIR8qFc+1jc2UAo0HTd3eme68w0Xlwx
- 1qADP+455879/c45d2Zc/7UhhLbWq+JhryJ2cop8vV6VjzbHYhXmdnnmTURqOFWeIjBWIS5/9CjiIfMx
- lysUCg0Gg8GiCYPEhhWDb2LQfJwakB9T0ULj8H2jIRGxyc88f7DiP0WLXFysow87CUsJmHkqAmMhJFNA
- DmRvvn0wGhP3bBEbcTFVO44qqcAGAYJRmDkQnCCkQA72LvPJaDIFl/LLtohHlbhVHZTwrQ4AUbhMi4AV
- gVyxWPwjoMg9GxGwfRDwKFLAIgA4RfKFAl299r50629GBMCcIh2Hw80jUVsEsLC8RMnBrIv3KnIT00Hg
- UW8gUN3X17FzaA0MIFQl9Pdvgwu0iOdzi0aukLexTACXXh+X0m78cIdT4Cd5QyonY1cOTOOWQlYTjOk4
- XwRYPqwZ7OvlFPEIp6KcJcKiTkV5uGA9yd9xjCj4El7DmVH+KhCVQkprLeiacBJGBVWy5O44yngVqSGL
- L3q+ar4fdgc3Q913QSCdFIacVbMd0Bzm86Q6sSkR2UNIT5GLlwHkl3EaclksoPRoS252zPfC7gCFu9yx
- WHOFjts+W9WWCx0LISrg9/uXoqhz74RyeR9btdN35th4LX92jD9odhCcNAzXlunhS2fXO+DMsTHrZ3Db
- XGr8XJUp0P2Ezn+MfwybmwMyfzAQuB3u5sHX8YWJUhWxOTZm/Yzm67EEijLq2v9+4NqulCbkSx1gc2zM
- +lnM11KB9vb2OfKBbZ9SBTfd2BS0zn9/dr6aCpBv4BWsX0YECTZLVcTm2Jjx31JysPCNoARrOul7vc4B
- 6jtzbOz0dcz3UXIwhDp2w6rjFYGyMSz8ymhCDSX/9+Zy/QZ80uQPbbbcHgAAAABJRU5ErkJggg==
+ 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==
iVBORw0KGgoAAAANSUhEUgAAABgAAAAYCAYAAADgdz34AAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
- YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAADZSURBVEhLYyAX2FXM+mdXsfk/CEOFqAfoZjhWXLbJE6qU
+ YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAADZSURBVEhLYyAX2FVM+2dXsfk/CEOFqAfoZjhWXLbJE6qU
PACxgC6WQAyDCoGBTdnGCXS1BCxQUVHRBcR/gPg/DtwFVkgCgFkC5gAN+IZmIDZ8PDQ0lBmsgUgAsgTM
- iI+P/43FQEowqo9pYAH18wZecGFu6r+X21L/v9qeBsYgNgiDxGFiIAzjI4vD1KLrhxoNAciKKMEwC0AO
+ iI+P/43FQEowqo9pYAH18wZecGZm6r+X21L/v9qeBsYgNgiDxGFiIAzjI4vD1KLrhxoNAciKKMEwC0AO
gBoNATAfUAvTzAKa+2DoWwDDGBZgU0QOhvkAxIYaDQHoCinFNPfB0A0inBY825Tciq6YVIxsOMg8qNFA
- wMAAALzzIZoHXNFfAAAAAElFTkSuQmCC
+ wMAAAAm1IPYi8wi5AAAAAElFTkSuQmCC
iVBORw0KGgoAAAANSUhEUgAAABgAAAAYCAYAAADgdz34AAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
- YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAFfSURBVEhLvVVBTsMwEAwgLvwJfpEv5JRTpCi5IH+jXEBC
- QijX9Ig48QoeEUVqQDk02Oy4Xuo4WHFbwkgjz652d7xtokQ+FEUhiQpnWZajk4mYadrCIIQ4pwEqFAcb
- JElyuayBEFcLb3CnN5BS6gH2yeQYOMjgplyrU2jG7EHur2mafuGpGIZBXRc18VmiGKet7ZwbQ4Nd1+mn
- i2Zu8zx/gsHPo/eXBmbmoA2YMODCY8n/CXPpDeTIoO97JR7fqKHWxTuzvbZzbgyN3rZt/QZ1XaumaSRu
- gVVx2trOuTE0equqmhosydEGc9rOubFP/88GWhhA+25k59zYpzFQJ2xyUSjcoazxNuPDsqbExAQMxW+9
- xIG4Mj/MFChiPLy8q3uHyDFwW3ykTGsYbIM5nGwwtwFq4zi+MK1hcDdw31yOgWM32Jj+WWRZ9kktZ7vO
- QNCtyKPcYJMZfhBvTZuDKPoGy4flC2dE9P8AAAAASUVORK5CYII=
+ YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAFeSURBVEhLvVVBboMwEKSteumf2l/wBcQZCcGl8jfSS3qo
+ +AA5VlXf0ScgDkhRKw6hdnccb2NMkZ2kZKSRZ1e7O94ERDSHoigkUeEsy3J0MhEzTVsYhBDXNECF4miD
+ JElulzUQ4m7hDZ70BlJKPcA+mRwDRxk8lBt1Ds2YA8j9LU3TbzwVwzCo+6ImvkgU47S1nXNjaLDrOv10
+ 0cxdnucVDH4fvf80MDMHbcCEAReeSv5PmEtvIEcGfd8rsX6nhloX780O2s65MTR627adN6jrWjVNI3EL
+ rIrT1nbOjaHRW1XV1GBJjjbwaTvnxnP6MhtoYQA9dyM758ZzGgN1wiYXhcIdyhpvMz4sG0pMTMBQ/NVL
+ HIgr88NMgSLG8+uHWjtEjoHb4iNlWsNgG/hwtoFvA9TGcXxjWsPgbuC+uRwDp26wNf1eZFn2RS1X+85A
+ 0K3Io9xiEw8/iY+mzUEU/QA62uN7tDI4aAAAAABJRU5ErkJggg==
iVBORw0KGgoAAAANSUhEUgAAABgAAAAYCAYAAADgdz34AAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
- YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAK7SURBVEhLpVY9iBNBFA6ihY0WilqJ1SkKubtsgs1hGsXG
- QtDGH7TLKbndnZkNaiEELbQSwRNErA4V7jSb3ZxoKzZeY+GdFhYH14iNjQp3whmzvm/yJo75M+Q+eMx7
- 37z3vTezuyEpg4xfOc6uRk5GQbo4+4v4y0wND8erPHFEmDgqnkM8JsPRnIoTcGkR1nXSRjDuPv8BwW6W
- lfEjThseh73abkwLQawZN/zY8kU4zWkbg2kw5s4d1PHVZ9vBNfnIzZdfb9aJw8Dx5vdqcRWvMaVBz+Q9
- eGNZER/lrcHhyGjy76RxkvGqJ8DnRO1Qk4+SrKrRVUXJeBAfwV7geTkhRKKUSmi9Aa4naMoVuwHWtJhd
- bfpRkvPDl3n1eGZCPL2VVw93okb6/qTV4IUW6gVH1Y7p46vqDL379+E3Y31lS8i5oqbqUso3uoBAwjHE
- Ya7rfmUa/BlwlDvKVCfwDeAUaJATlVdKTK0qJROpJ5Z1rJi+WCz+hhh8Ps2C5Se+7+9nyU7g40IDx48W
- LolrFwNqYAvShA0TYyWuYflo8JmluiOtqiPpINzFYYoEF81kRsTEWK3mDY53cOlgwBVBoM2mSewOrett
- fMJl/SGld54E7pItosiacr1cLm/iNA3P876ZHJyA/Lf0DATxE5zSCRT0sI73nrhiW07LOKUT2MQ0PJF9
- ghKntEDTXjA5Vp42TukEPdhTVHibjrlkN6D1C6e0QEKfTA5EcWVk81R/nVN6A/eNYttIZDkIgtPkn6RB
- PrTv017rDRwINMlPTIZiM6WJsbZdy3cuGwxUUDPCZjVmx8ZHEzrVTS7vD/qd2YZCy9ba4p5GTbayTH9Q
- 8ggK6JoeIC6VSntoymVMCp7WFdrbhz3y3zH/zx+I/6JQKGxhV4NE8AHqBiR+j2kN4g6wOzzo+GchznaO
- 6S5Ipf4AS9JpZnDMydwAAAAASUVORK5CYII=
+ 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=
iVBORw0KGgoAAAANSUhEUgAAABgAAAAYCAYAAADgdz34AAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
- YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAG/SURBVEhLnZM9LwRRGIU38VVp/AG9dhtkZoTKD6CTUGlk
- I8TujCgUhEYi4gdQriXB3I34KGhIiCyFWoKSjpAQrnvGu8nEPWtmPcmTm7nvPWd2Z3cytRgcLDU4fnnI
- DVToFdR9Nlf88AKlF0pXGmt0bfYxxzmcl2gynRP7bU5BnaHot1unt9YexHnkpOJvzKfaYyUDi0d6fqMS
- rWyOnFTUxptWLgvD57d3DbCyeaTJSxXH88NVGjTGYfNIk5cqjpNXFzRojMPmEHmp4jiT6okFYRw2h8hL
- FcfLqU8WhHHYPNLkpcqmZ/a4kYaMfTNlfX37pF/MD4wV1+wclDqb7OhlEwvELayd0/2qPUaps6ne4KDy
- 8C/LF3fRTaTOhn0DPIrh5RPtr5/ruWJFL25eRSuusc8eldTZpHlEaZQ6m47ZUjML1KvU2fTn9lpYoF6l
- zubnb1r8YqH0Fr+kjvPXm5zGxDfZCdQhC6YVeaniuH44xoJpRV6qON35ndauQD2ycJLIIS9VtXH93RFW
- kCRyUpGM66sVVlJLnJdoetwgnMqOb7+xwqqY45xE6qd3ptzuBOGSKbsxvsa8wT7mcpSQyXwDtwi5IK1K
- 4ZIAAAAASUVORK5CYII=
+ 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==
iVBORw0KGgoAAAANSUhEUgAAABgAAAAYCAYAAADgdz34AAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
- YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAGjSURBVEhLxVQ7S8RAEF7Uq0VRLO1tr1BINgHxD4iciiJ2
- V/tKdg+RIIhoqZ2VvShedg8RLPwDoqCo/0Hw2frM5Ca67OXO5LjoB0Mm8/i+nSFZkgWGS34fuq0FEFMm
+ YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAGjSURBVEhLxVQ7S8RAEF7Uq0VRLO1tr1BINgHxD6gERRG7
+ q31ddg+RIIhoob2VvShedg8RLPwDoqCo/0Hw2frM5Ca67OXO5LjoB0Mm8/i+nSFZkgWGS34fuq0FEFMm
Nql78IwhQiwuP1Xrn919xVRi2Auih3KxYXDxFPFgihDKtj7AIAjPNAJm6ajXZGI96H3RebCkOQEgpkyu
DTLxqPaqPpamW5HJK11AbM3tP+h9umFLsgmG5o+7qeuvGqy6Y7W+no+tjQXCE3O5Qpl/r9clFoCAapGA
- xcWytVi+0/NJLSQH1JxiXLzDjmvi2rsaj/ORPkagga++/1aP9H8gAIEsDOn/YYIBLt+CO+VSj6c1pI//
- D0bYSafB5KjhiHOLb3+fXq2LnvV8pI8XwBQpFPbag+t3LPjRLvS6xAIQUC3uqrC90w6bVwppVoetjSeo
- gee1Bff+hLEEQj+ri3pVHztSCiBgItOVk6ZbvlJ7VR9Lk62oHvLFs5zliimD+zc6D5Y0N4GO8GNw5DR1
- xXW0Oky1FvniTs7mYsZ0Dm8xlA1gdVWPkC/kLzShX9EmngAAAABJRU5ErkJggg==
+ xcWytVi+0/NJLSQH1JxiTLzDjmvi2rsaj/ORPkagga++/1aP9H8gAIEsDOn/YYIBLt+CO+VSj6c1pI//
+ D0bYSafB5KhRFOcW3/4+vVoXPev5SB8vgCniOHvtwfU7HvxoF3pdYgEIqBZ3VdjeaYfNK06a1WFr4wlq
+ 4Hltwb0/YSyB0M/qol7Vx46UAgiYyHTlpOmWr9Re1cfSZCuqh3zhLGe5Ysrg/o3OgyXNTaAj/BiKcpq6
+ 4jpaHaZai3xhJ2dzMWMWD28xlA1gdVWPkC8ZoDJ5AYCZmAAAAABJRU5ErkJggg==
iVBORw0KGgoAAAANSUhEUgAAABgAAAAYCAYAAADgdz34AAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAHLSURBVEhLY6AZqK9ngrKoC4zTzrDalG0OsS3bdAIqRB1g
- X7+fw7Z8U4pdxeYbQPwfhKFSlAH7/PUCduWbyy1KNz2zLZ/4D2QwiAZhqBLygFPVZmmgizttija9QTaU
- YgtsKraq2ZVtnm5ZsfYLLChwYagWYsB/RqvSDSY25ZtWalVs/oPuUlxsqGY8AJjU7Cu2uNiWb9hjG7bp
- L7IBFFkQGrqK2bZiU7hN6eZTduGb/4I0kYOhxiGAa/FObmD6Tbcr3XgTm4uQ+cjiuNhQYxkYLAp3CAFT
- RCkQP8WnAZmPSw0yG2y4bfnGBtuCNe+I0YDMJ0Y92AK7ii1p1hWb79tVTAJLUhODLQABj9xt7PYVm2Jt
- yjZcxuciZD4uNchsqPEIACxPWGwqNwUAM9IRkEJKMdRY7MCudIOjdfnGHfLx83/DXITsQhiNjw01Cj+w
- K99gaFO2cYVt1qafyAZQzQIYABYV6rblm6fq56//DjKEGAzVShqwrdouCSpF7So2vsXmamQ2VAt5wKZi
- i6Bt2cZKUD1AEwtgAFS8gPKSXcmGuyDDkTFUCXUAKInblm6OBtZuZ6nqAwwALOKBrveyLt10ECpCK/Cf
- kYGBgQEAkPePYFdkTIgAAAAASUVORK5CYII=
+ X7+fw7Z8U4pdxeYbQPwfhKFSlAH7/PUCduWbyy1KNz2zLe/9BzIYRIMwVAl5wKlqszTQxZ02RZveIBtK
+ sQU2FVvV7Mo2T7esWPsFFhS4MFQLMeA/o1XpBhOb8k0rtSo2/0F3KS42VDMeAExq9hVbXGzLN+yxDdr0
+ F9kAiiwIDV3FbFuxKdymdPMpu+DNf0GayMFQ4xDAtXgnNzD9ptuVbryJzUXIfGRxXGyosQwMFoU7hIAp
+ ohSIn+LTgMzHpQaZDTbctnxjg23BmnfEaEDmE6MebIFdxZY064rN9+0q+sCS1MRgC0DAI3cbu33Fplib
+ sg2X8bkImY9LDTIbajwCAMsTFpvKTQHAjHQEpJBSDDUWO7Ar3eBoXb5xh3z8/N8wFyG7EEbjY0ONwg/s
+ yjcY2pRtXGGbteknsgFUswAGgEWFum355qn6+eu/gwwhBkO1kgZsq7ZLgkpRu4qNb7G5GpkN1UIesKnY
+ ImhbtrESVA/QxAIYABUvoLxkV7LhLshwZAxVQh0ASuK2pZujgbXbWar6AAMAi3ig672sSzcdhIrQCvxn
+ ZGBgYAAA+IeNtEQs0ocAAAAASUVORK5CYII=
iVBORw0KGgoAAAANSUhEUgAAABgAAAAYCAYAAADgdz34AAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAHCSURBVEhLYwCD+nomCINGwLZs0wmbss0hxmlnWKFC1AV2
- FZv/Q/EN2/JNKfb1+zmgUtQBtuUT/4EwyBIQbVG66Zld+eZy+/z1AlAllAF0C2Bsm6JNb4A+6nSq2iwN
- VUoegAYPTmxZsfaLXdnm6TYVW9WgWkgDuHyAztaq2PzHpnzTSqvSDSYMDP8ZodoJA3yGIrPhYmGb/tqW
- b9hjX7HFhagkDtJIFg7f/NemdPMp24pN4aGhq5ihxmECdJfiYiOLofPtSjfeBOandNfindxQYxEAqwZS
- LYCzNz0F4lKLwh1CUOOpbQGUXbDmnW35xgawBSAB6uJJ/6wrNt+3q9iSBrYApyvQ2Mhi6HwY26Zsw2X7
- ik2xHrnb2MGGgwBIkmJctvmITeWmAGA5xgI1FgHwuQiZjSwGwvLx839bl2/cYVe6wRFqFHYA00C0BVmb
- ftqUbVxhV77BEGoEfgDSSAzWz1//3bZ881RgUaEO1UocQHcpJnvjW1Cpalu1XRKqhTSA3dDN/0H1gm3Z
- xkqbii2CUKXkAZBhKLhkw11QGsaa7ckBcFeXbz5rW7o5GmtSowRYl246CHS5Fw1bFyRUHiQBBgYAAr+P
- YJgx9a0AAAAASUVORK5CYII=
+ FZv/Q/EN2/JNKfb1+zmgUtQBtuW9/0AYZAmItijd9MyufHO5ff56AagSygC6BTC2TdGmN0AfdTpVbZaG
+ KiUPQIMHJ7asWPvFrmzzdJuKrWpQLaQBXD5AZ2tVbP5jU75ppVXpBhMGhv+MUO2EAT5DkdlwsaBNf23L
+ N+yxr9jiQlQSB2kkCwdv/mtTuvmUbcWm8NDQVcxQ4zABuktxsZHF0Pl2pRtvAvNTumvxTm6osQiAVQOp
+ FsDZm54CcalF4Q4hqPHUtgDKLljzzrZ8YwPYApAAdXHfP+uKzfftKrakgS3A6Qo0NrIYOh/GtinbcNm+
+ YlOsR+42drDhIACSpBiXbT5iU7kpAFiOsUCNRQB8LkJmI4uBsHz8/N/W5Rt32JVucIQahR3ANBBtQdam
+ nzZlG1fYlW8whBqBH4A0EoP189d/ty3fPBVYVKhDtRIH0F2Kyd74FlSq2lZtl4RqIQ1gN3Tzf1C9YFu2
+ sdKmYosgVCl5AGQYCi7ZcBeUhrFme3IA3NXlm8/alm6OxprUKAHWpZsOAl3uRcPWBQmVB0mAgQEAOL+N
+ tDkCuiEAAAAASUVORK5CYII=
iVBORw0KGgoAAAANSUhEUgAAABgAAAAYCAYAAADgdz34AAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAFxSURBVEhLY4ABp8qN4lAmbYBt2dqPtuWbOmlmkV3F5v8g
- bF2x6YNtxaYO+6JNIlApooF8/PzfMHNgGCoF9EH5xH8gARANZX+yKd/UZlO5TRSqhCAAWYBuDlQKqwVg
- tnn5pve25ZtbiLEIrwUgQby4YM07sEUVWwShWjAAqUGEwQbR1uXAOCrb2GhRuEMIqhUOyAoiZDaymG35
- xre2FZtrkX1EWRDhwsUbXtlVbKoGmUGVIIKJofPBcRS26S+6ONR4KliAgw01ng4WgARpgaHGDwEfAMuw
- S1oVm/+gi0ONJ9cHk/5Zl246Z12+OdClfDc/tTPaeWDxHhwauooZagR1MhooKOwrtoTa1+9ngWqFAwoy
- GjAoSjZdAtYT4Qz19UxQLRiArCCyKdtw2aZscwQ2F6MDkoLIumLjNbuyTVHGaWdYoUoIAiKCaNI/27JN
- V21LN0cjRx6xAK8PbErXX7ev2BRrnDaTaBeTBEgJCuIBAwMAXxU0oaPR8ToAAAAASUVORK5CYII=
+ bF2x6YNtxaYO+6JNIlApooF8/PzfMHNgGCoF9EF57z+QAIiGsj/ZlG9qs6ncJgpVQhCALEA3ByqF1QIw
+ 27x803vb8s0txFiE1wKQIF5csOYd2KKKLYJQLRiA1CDCYINo63JgHJVtbLQo3CEE1QoHZAURMhtZzLZ8
+ 41vbis21yD6iLIhw4eINr+wqNlWDzKBKEMHE0PngOAra9BddHGo8FSzAwYYaTwcLQIK0wFDjh4APgGXY
+ Ja2KzX/QxaHGk+uDvn/WpZvOWZdvDnQp381P7Yx2Hli8B4eGrmKGGkGdjAYKCvuKLaH29ftZoFrhgIKM
+ BgyKkk2XgPVEOEN9PRNUCwYgK4hsyjZctinbHIHNxeiApCCyrth4za5sU5Rx2hlWqBKCgIgg6vtnW7bp
+ qm3p5mjkyCMW4PWBTen66/YVm2KN02YS7WKSAClBQTxgYAAAoRcyeTnPBtoAAAAASUVORK5CYII=
iVBORw0KGgoAAAANSUhEUgAAABgAAAAYCAYAAADgdz34AAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
- YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAMISURBVEhLtVXfS5NRGA6KLuqiKCSCqIsi6Da69qL+Bm/C
- IerUObWJ20DL7bOEwLAwKbFQK60M6qIfhBJlSRAIZhSmkDXWzMhtbtNJLVvf6Xn3vefzfE5Rix54fc+P
- 5zzP+x79jhtWgtPp3FdaWuotKSl5jDxRVlYWxvgT4gnm9Xa7/SBT14fCwsIcCFy12WwpiOoUDodDqJlj
- AXELRnv46OqA8BGIfCahtUZRUdE08lGWWBlo/TCqmZUV0mHO85p2Nnj+UttkU1PLV5ov5eTn56dQ3DGW
- ykZxcfEOEAPyAEVlZWX0xeDgt+jMjC4UJBKz+uj7MeHxeH6ofEQYJntZ0goQW4gsw+v1fpmamkqTYDKZ
- tBjIeSwW09vb23+r5xB3WHIRVVVVOXDPtE2kioqKRCgUSpPQahGPx3VN08zrKigo+FVeXn6IpQ1gw84t
- Zkj3+/rDdDhTLqCOCXIu84eJj2YHpIFr0ljaABa6JQHuP+eS8xbR1Qx0/Gw4fcY0gd4zljaAxVeyg5qa
- uigdzK19KHJrHyEoq2N1zZgTv+vGTbMDxCRLG4DjW2mA+4xSVdliKxsQeu89UA3iLG0AGy+lQd3JU3N/
- 00Hn9W7TAN9TiKUNYKODNinw/qQTs3OWe1fHBDmXWccvwefXMuc5nrK0ASwclx0Qoa+/f10GY+Pjpjhp
- 4MrrWdoAFrZhc0aSqqur04FAYE0GqVRKNDY2mgaIBdzCAZZeBJz9sgPKPp9PDwaDy35cMiKRiN7a2mpW
- zrmHJa1AF1vor0mSKdxutxgYeC6mwxFLBzF8vcOvR4Tf7zfFpQF+wUN4CXayrBXY3A8SvZZqy+KEyyWa
- zjWLy1c6RPOFi8Lt8dAHaeGogUKH6fFkWSvIhDqRFanVyZBry3HkGDoj9I+LZa3A274VpAYQYksPqyKo
- 8jtyG8TuLt3j8RtwdrFsNlwu13YQbSB2IdNzMoo8hA57MXZCeDfx8vLyNmP9NokuE+8yYv8KmGyEaQ8i
- 67qY8u/AO7YJ3V37bwYENulcvCKH+ANdhjEQZi0cZwAAAABJRU5ErkJggg==
+ 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
iVBORw0KGgoAAAANSUhEUgAAABgAAAAYCAYAAADgdz34AAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
- YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAMMSURBVEhLtZXLa1NREMYFxYUuFKWIILpQBLfiWkG76D/Q
- ja2UpkmaJsSEUttIqnFloYrtomlR6gOrVtCNilikjQuxUqgVpbZgVVBBMKF5tU3Sm8fxm5w53pubxFfx
- g+Gce87Mb2bu49x11eR0OvfY7fZTNpvtMcaF1tbWMOYfYU9x3W21Wvez69+pubm5BoArDQ0NGUALZA6H
- QxhHNg12G4l2cejvBfAhQD4T6E/NYrF8x3iUEdWF1g+imoSqkIJpPOnxaD09PbHhG7fE+f6BRY/Hkzb7
- ULco7hijytXS0rINjp9UAFl7e3vqxeRLkVldFUblcnkx+25OdHV1xYz+sDCS7GZkqeDYT87KAoGAFo/H
- GSnEYd+jn6akaZoIBoMpYxzsLiN1ud3uGmRfpirIyev1ZqLRKGOkJPyhOHJaT0DKZrPC5/MtqtimpqZs
- W1vbAUZLYcPKLRadxidCHK6rWgLS+4UPora2Nk+xxMBtCjBaCgs3aZPM5XLlkkvLHKqr0i1SKhSE6Ozs
- TCgGeBOMlsLipOoAD3aFgqhaVXXp3Lgmr0mDQ0NhgjPnK6OlkPGNSnDh4qViQDns1wlG7z8oVs+cGKOl
- sPFcJfB3n0n9S4IBQwf4nr4wWgobw7RJVldXl48nksUgoyRYmlkFPISOjo4lxYCNM1oKC8dVB+TwZGyM
- Q3Wpyiu9RXPz8+a3qJvRUljYgs1FciDDKboaDoc5XKpaB5lMRvj9/riKhWmI38doXch8VnVAI30wkUiE
- MZU7SKfToq+vz3wujTCyVOhiE71NKgEZdRIKPRMrqTQjpTR8vdOvZugsShr9aY4HPIVvaTtjS4XNvXD6
- Ro5Go25wNiWDl4dxRvXGPThKsF4EVjIUOk2HJ2NLRUmoE1WRsTrzmvnaOAdnhn5cjC1VY2PjZjidg0PU
- HGyEoMoUxkHA7pn3eP4aPjsYWy78WLbC8QQcr2Gk42QW4xQ6HMXcCfBO8quvr9+I9TsErWBvi7C1CknW
- I+kIrOx2scvahRdhA7q7/t8SkDjJVf0WOcQP/v4QiRXulcEAAAAASUVORK5CYII=
+ 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==
@@ -428,18 +428,18 @@
iVBORw0KGgoAAAANSUhEUgAAABgAAAAYCAYAAADgdz34AAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
- YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAKdSURBVEhLtVZbaxNBGN1nRe2TIuifaGigyc4uatUHQamC
- CEofBaFQTbI7m6oE1IpYQ1+q1jfFS0o07s7MGlHwRhFFHwJV0uqDN9SqqKjBGya7zmwmYRv30gY8cMi3
- s+c73zeTnZ0VggD26itFiPdIGjYBNF5IGvkG1MLXboif0XEENNIPBgvLuXzukNXiCgni01GY+wVgzqLG
- tvu3wfo1/iFCNLY6jZbx9GBIkPSKCfKRJbeyZ98Vew2l172Yps8ADa/jNt6QVbKrE+Jqa7cNE3cBLw3o
- x7+BQrZzu9mQFGNjRCOOuVdyVp+0q7Wa/adasw/nS94FWEyLSGlzFbetg62flDQ+MJEf7069sxksy7Kv
- l157appUySs5o3dwe0EQVXTStyMen7nxtFlg1HzsP4NGrOIjjnl3srAUJHLfwxJkyr6RW/aO7E2nyzA9
- 2H3pcw/MLxEkzdzJBv4HRZVsE+h6jft24YqPXXxosSWqVCrWwfP3QvVOrOJTQlzDk4EiHmddBQ5duB+q
- d+KUMUEfT/w2UMTjdgqIij5F/wPyhg2Ecexqmfk7GEGPPDWtjGuoLACISkFdNOK2lggat+kM8Fk2EMZ2
- ZkA5yl5ufcFd1OP2ZoA2CWxLxyH+4i+qx/MtEIP6TCSDFzi7mc5imA0Gcd5LBMmgY84gD+gdIHH5Jbvh
- 19Fw/kFzBgfOhW606Wb3DYgKlqPauHOCeSTYvRndOlEs20dpoQ2Zgm+BrhSuiJoZ4bazQY+/LZEB/ScT
- t8OuFKkAlazndt4Q0ygeT+LnLKG1O/dY6zWNp4GCO7lNMKKZ4mJ6vg7Rx+yT28i7AH4PVLT/nzWfC2KK
- sUhS0Vb2VqSfKBOSgp6wTunmvAMgOU6Pxs1rk9cWcrkHBOEvPJeW3gGqnWsAAAAASUVORK5CYII=
+ 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
diff --git a/app/DD_Clipboard_Searcher/frmProfileMatch.vb b/app/DD_Clipboard_Searcher/frmProfileMatch.vb
index 1961930..ba869f0 100644
--- a/app/DD_Clipboard_Searcher/frmProfileMatch.vb
+++ b/app/DD_Clipboard_Searcher/frmProfileMatch.vb
@@ -4,73 +4,68 @@ Imports DevExpress.XtraGrid.Views.Tile.ViewInfo
Public Class frmProfileMatch
Private Sub frmProfileMatch_Load(sender As Object, e As EventArgs) Handles Me.Load
+ If My.Settings.frmProfileMatchPosition.IsEmpty = False Then
+ If My.Settings.frmProfileMatchPosition.X > 0 And My.Settings.frmProfileMatchPosition.Y > 0 Then
+ Location = My.Settings.frmProfileMatchPosition
+ End If
+ End If
+ If My.Settings.frmProfileMatchSize.IsEmpty = False Then
+ Size = My.Settings.frmProfileMatchSize
+ End If
+
CreateTiles()
CurrSearch2Load = Nothing
End Sub
+
+ Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
+ Me.Close()
+ End Sub
Sub CreateTiles()
Try
- Dim oPrimaryFont As New Font("Segoe UI", 12, FontStyle.Bold)
+ Dim ImageIndex As Integer = -1
+ Dim i As Integer = 0
+ Dim j As Integer = 0
+ Dim PrimaryFont As New Font("Segoe UI", 12, FontStyle.Bold)
Dim SecondaryFont As New Font("Segoe UI", 10)
- Dim oGroup = TileControl1.Groups.Item("TileGroupProfiles")
-
- For Each oRow As DataRow In CurrDT_PROFILE_MATCH.Rows
- Dim oItem As New TileItem() With {.Tag = oRow.Item("GUID")}
- oItem.Elements.Clear()
-
- Dim oNameElement = New TileItemElement()
- oNameElement.Text = oRow.Item("NAME")
- oNameElement.TextAlignment = TileItemContentAlignment.TopLeft
- oNameElement.Appearance.Normal.Font = oPrimaryFont
- oItem.Elements.Add(oNameElement)
-
- Dim oCommentElement = New TileItemElement()
- oCommentElement.Text = oRow.Item("COMMENT")
- oCommentElement.TextAlignment = TileItemContentAlignment.BottomLeft
- oCommentElement.Appearance.Normal.Font = SecondaryFont
- oItem.Elements.Add(oCommentElement)
-
- oGroup.Items.Add(oItem)
- Next
+ Dim WhiteBackground As Color = System.Drawing.Color.FromArgb(230, Color.White)
' Datatable laden
- 'GridControl1.DataSource = CurrDT_PROFILE_MATCH
+ GridControl1.DataSource = CurrDT_PROFILE_MATCH
- 'TileView1.TileTemplate.Clear()
-
- 'Dim ImageColumn As TileViewItemElement
- 'Dim HeadlineColumn As TileViewItemElement
- 'Dim IDColumn As TileViewItemElement
- 'Dim TextColumn As TileViewItemElement
- 'Dim TextHeaderColumn As TileViewItemElement
-
- 'HeadlineColumn = New TileViewItemElement()
- 'With HeadlineColumn
- ' .Column = TileView1.Columns(1)
- ' .TextAlignment = TileItemContentAlignment.TopRight
- ' .Appearance.Normal.Font = PrimaryFont
- ' .Appearance.Normal.ForeColor = Color.DodgerBlue
- ' .Column.OptionsFilter.AllowFilter = True
- 'End With
- 'TileView1.TileTemplate.Add(HeadlineColumn)
- 'IDColumn = New TileViewItemElement()
- 'With IDColumn
- ' .Column = TileView1.Columns(0)
- ' .Column.OptionsFilter.AllowFilter = True
- ' .TextAlignment = TileItemContentAlignment.TopLeft
- 'End With
- 'TileView1.TileTemplate.Add(IDColumn)
- 'ImageColumn = New TileViewItemElement()
- 'With ImageColumn
- ' .Image = My.Resources.build_Selection_32xLG
- ' '
- ' ' '.ImageSize = New Size(186, 90)
- ' .ImageSize = New Size(186, 118)
- ' .ImageScaleMode = TileItemImageScaleMode.ZoomInside
- ' .ImageAlignment = TileItemContentAlignment.BottomLeft
- ' ' .ImageLocation = New Point(-10, -10)
- 'End With
+ TileView1.TileTemplate.Clear()
+ Dim ImageColumn As TileViewItemElement
+ Dim HeadlineColumn As TileViewItemElement
+ Dim IDColumn As TileViewItemElement
+ Dim TextColumn As TileViewItemElement
+ Dim TextHeaderColumn As TileViewItemElement
+ HeadlineColumn = New TileViewItemElement()
+ With HeadlineColumn
+ .Column = TileView1.Columns(1)
+ .TextAlignment = TileItemContentAlignment.TopRight
+ .Appearance.Normal.Font = PrimaryFont
+ .Appearance.Normal.ForeColor = Color.DodgerBlue
+ .Column.OptionsFilter.AllowFilter = True
+ End With
+ TileView1.TileTemplate.Add(HeadlineColumn)
+ IDColumn = New TileViewItemElement()
+ With IDColumn
+ .Column = TileView1.Columns(0)
+ .Column.OptionsFilter.AllowFilter = True
+ .TextAlignment = TileItemContentAlignment.TopLeft
+ End With
+ TileView1.TileTemplate.Add(IDColumn)
+ ImageColumn = New TileViewItemElement()
+ With ImageColumn
+ .Image = My.Resources.build_Selection_32xLG
+ '
+ ' '.ImageSize = New Size(186, 90)
+ .ImageSize = New Size(186, 118)
+ .ImageScaleMode = TileItemImageScaleMode.ZoomInside
+ .ImageAlignment = TileItemContentAlignment.BottomLeft
+ ' .ImageLocation = New Point(-10, -10)
+ End With
' TileView1.TileTemplate.Add(ImageColumn)
'For Each oProfileColumn As DataColumn In CurrDT_PROFILE_MATCH.Columns
' Dim index As Integer = CurrDT_PROFILE_MATCH.Columns.IndexOf(oProfileColumn)
@@ -147,27 +142,27 @@ Public Class frmProfileMatch
End Sub
- 'Private Sub TileView1_ItemClick(sender As Object, e As TileViewItemClickEventArgs)
- ' Dim oPROFILE_ID = TileView1.GetFocusedRowCellValue(TileView1.Columns("GUID"))
- ' CurrSearch2Load = oPROFILE_ID
- ' Dim view As TileView = TryCast(sender, TileView)
- ' Dim pt As Point = view.GridControl.PointToClient(Control.MousePosition)
- ' Dim hitInfo As TileViewHitInfo = view.CalcHitInfo(pt)
- ' If hitInfo.ItemInfo IsNot Nothing Then
- ' Dim elementInfo As TileItemElementViewInfo = hitInfo.ItemInfo.Elements.FirstOrDefault(Function(t) t.EntireElementBounds.Contains(pt))
- ' If elementInfo IsNot Nothing Then
- ' Dim text As String = elementInfo.Element.Text
- ' End If
- ' End If
- ' OpenResults_Doc()
- 'End Sub
+ Private Sub TileView1_ItemClick(sender As Object, e As TileViewItemClickEventArgs) Handles TileView1.ItemClick
+ Dim oPROFILE_ID = TileView1.GetFocusedRowCellValue(TileView1.Columns("GUID"))
+ CurrSearch2Load = oPROFILE_ID
+ Dim view As TileView = TryCast(sender, TileView)
+ Dim pt As Point = view.GridControl.PointToClient(Control.MousePosition)
+ Dim hitInfo As TileViewHitInfo = view.CalcHitInfo(pt)
+ If hitInfo.ItemInfo IsNot Nothing Then
+ Dim elementInfo As TileItemElementViewInfo = hitInfo.ItemInfo.Elements.FirstOrDefault(Function(t) t.EntireElementBounds.Contains(pt))
+ If elementInfo IsNot Nothing Then
+ Dim text As String = elementInfo.Element.Text
+
+ End If
+ End If
+ OpenResults_Doc
+ End Sub
Sub OpenResults_Doc()
Me.Hide()
Dim ofrmresult As Form = New frmResultDoc
ofrmresult.ShowDialog()
- Me.Show()
End Sub
- Private Sub Button1_Click(sender As Object, e As EventArgs)
+ Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Dim oResult As String = ""
For Each oRow As DataRow In CurrDT_PROFILE_MATCH.Rows
If oResult = "" Then
@@ -181,28 +176,15 @@ Public Class frmProfileMatch
End Sub
- Private Sub TileControl1_ItemClick(sender As Object, e As TileItemEventArgs) Handles TileControl1.ItemClick
- Dim oItem As TileItem = e.Item
- Dim oProfileId = oItem.Tag
-
- If oProfileId Is Nothing Then
- Dim oResult As String = ""
- For Each oRow As DataRow In CurrDT_PROFILE_MATCH.Rows
- If oResult = "" Then
- oResult = oRow.Item("GUID")
- Else
- oResult &= "," & oRow.Item("GUID")
- End If
- Next
- CurrSearch2Load = oResult
- Else
- CurrSearch2Load = oProfileId
- End If
-
- OpenResults_Doc()
- End Sub
-
- Private Sub SimpleButton1_Click(sender As Object, e As EventArgs) Handles SimpleButton1.Click
- Close()
+ Private Sub frmProfileMatch_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing
+ Try
+ ' Position und Größe speichern
+ My.Settings.frmProfileMatchSize = Me.Size
+ My.Settings.frmProfileMatchPosition = Me.Location
+ My.Settings.Save()
+ Catch ex As Exception
+ Logger.Error(ex)
+ Logger.Info("Error in Save FormLayout: " & ex.Message)
+ End Try
End Sub
End Class
\ No newline at end of file
diff --git a/app/DD_Clipboard_Searcher/frmResultDoc.Designer.vb b/app/DD_Clipboard_Searcher/frmResultDoc.Designer.vb
index b498b74..a4b181b 100644
--- a/app/DD_Clipboard_Searcher/frmResultDoc.Designer.vb
+++ b/app/DD_Clipboard_Searcher/frmResultDoc.Designer.vb
@@ -54,6 +54,7 @@ Partial Class frmResultDoc
Me.ToolStripSeparator1 = New System.Windows.Forms.ToolStripSeparator()
Me.ToolStripMenuItem1 = New System.Windows.Forms.ToolStripMenuItem()
Me.ToolStripMenuItem2 = New System.Windows.Forms.ToolStripMenuItem()
+ Me.OrdnerÖffnenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.StatusStrip1.SuspendLayout()
Me.ToolStrip1.SuspendLayout()
CType(Me.XtraTabControlDocs, System.ComponentModel.ISupportInitialize).BeginInit()
@@ -121,14 +122,14 @@ Partial Class frmResultDoc
'
Me.ÖffnenToolStripMenuItem.Image = Global.DD_Clipboard_Watcher.My.Resources.Resources.OpenFile
Me.ÖffnenToolStripMenuItem.Name = "ÖffnenToolStripMenuItem"
- Me.ÖffnenToolStripMenuItem.Size = New System.Drawing.Size(148, 22)
+ Me.ÖffnenToolStripMenuItem.Size = New System.Drawing.Size(180, 22)
Me.ÖffnenToolStripMenuItem.Text = "Öffnen"
'
'EigenschaftenToolStripMenuItem
'
Me.EigenschaftenToolStripMenuItem.Image = Global.DD_Clipboard_Watcher.My.Resources.Resources.properties_16xMD
Me.EigenschaftenToolStripMenuItem.Name = "EigenschaftenToolStripMenuItem"
- Me.EigenschaftenToolStripMenuItem.Size = New System.Drawing.Size(148, 22)
+ Me.EigenschaftenToolStripMenuItem.Size = New System.Drawing.Size(180, 22)
Me.EigenschaftenToolStripMenuItem.Text = "Eigenschaften"
'
'XtraTabControlDocs
@@ -214,8 +215,6 @@ Partial Class frmResultDoc
Me.GridViewDocSearch2.OptionsFind.AlwaysVisible = True
Me.GridViewDocSearch2.OptionsSelection.EnableAppearanceFocusedCell = False
Me.GridViewDocSearch2.OptionsSelection.EnableAppearanceHideSelection = False
- Me.GridViewDocSearch2.OptionsSelection.MultiSelect = True
- Me.GridViewDocSearch2.OptionsSelection.MultiSelectMode = DevExpress.XtraGrid.Views.Grid.GridMultiSelectMode.CellSelect
Me.GridViewDocSearch2.OptionsView.EnableAppearanceEvenRow = True
Me.GridViewDocSearch2.OptionsView.ShowAutoFilterRow = True
'
@@ -253,8 +252,6 @@ Partial Class frmResultDoc
Me.GridViewDocSearch3.OptionsFind.AlwaysVisible = True
Me.GridViewDocSearch3.OptionsSelection.EnableAppearanceFocusedCell = False
Me.GridViewDocSearch3.OptionsSelection.EnableAppearanceHideSelection = False
- Me.GridViewDocSearch3.OptionsSelection.MultiSelect = True
- Me.GridViewDocSearch3.OptionsSelection.MultiSelectMode = DevExpress.XtraGrid.Views.Grid.GridMultiSelectMode.CellSelect
Me.GridViewDocSearch3.OptionsView.EnableAppearanceEvenRow = True
Me.GridViewDocSearch3.OptionsView.ShowAutoFilterRow = True
'
@@ -292,8 +289,6 @@ Partial Class frmResultDoc
Me.GridViewDocSearch4.OptionsFind.AlwaysVisible = True
Me.GridViewDocSearch4.OptionsSelection.EnableAppearanceFocusedCell = False
Me.GridViewDocSearch4.OptionsSelection.EnableAppearanceHideSelection = False
- Me.GridViewDocSearch4.OptionsSelection.MultiSelect = True
- Me.GridViewDocSearch4.OptionsSelection.MultiSelectMode = DevExpress.XtraGrid.Views.Grid.GridMultiSelectMode.CellSelect
Me.GridViewDocSearch4.OptionsView.EnableAppearanceEvenRow = True
Me.GridViewDocSearch4.OptionsView.ShowAutoFilterRow = True
'
@@ -331,16 +326,14 @@ Partial Class frmResultDoc
Me.GridViewDocSearch5.OptionsFind.AlwaysVisible = True
Me.GridViewDocSearch5.OptionsSelection.EnableAppearanceFocusedCell = False
Me.GridViewDocSearch5.OptionsSelection.EnableAppearanceHideSelection = False
- Me.GridViewDocSearch5.OptionsSelection.MultiSelect = True
- Me.GridViewDocSearch5.OptionsSelection.MultiSelectMode = DevExpress.XtraGrid.Views.Grid.GridMultiSelectMode.CellSelect
Me.GridViewDocSearch5.OptionsView.EnableAppearanceEvenRow = True
Me.GridViewDocSearch5.OptionsView.ShowAutoFilterRow = True
'
'ContextMenuStripWMFile
'
- Me.ContextMenuStripWMFile.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.EigenschaftenDateiToolStripMenuItem, Me.DateiÖffnenToolStripMenuItem, Me.ToolStripSeparator1, Me.ToolStripMenuItem1, Me.ToolStripMenuItem2})
+ Me.ContextMenuStripWMFile.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.EigenschaftenDateiToolStripMenuItem, Me.DateiÖffnenToolStripMenuItem, Me.OrdnerÖffnenToolStripMenuItem, Me.ToolStripSeparator1, Me.ToolStripMenuItem1, Me.ToolStripMenuItem2})
Me.ContextMenuStripWMFile.Name = "ContextMenuStripWMFile"
- Me.ContextMenuStripWMFile.Size = New System.Drawing.Size(182, 98)
+ Me.ContextMenuStripWMFile.Size = New System.Drawing.Size(182, 142)
'
'EigenschaftenDateiToolStripMenuItem
'
@@ -374,6 +367,13 @@ Partial Class frmResultDoc
Me.ToolStripMenuItem2.Size = New System.Drawing.Size(181, 22)
Me.ToolStripMenuItem2.Text = "Layout zurücksetzen"
'
+ 'OrdnerÖffnenToolStripMenuItem
+ '
+ Me.OrdnerÖffnenToolStripMenuItem.Image = Global.DD_Clipboard_Watcher.My.Resources.Resources.folder_Open_16xLG
+ Me.OrdnerÖffnenToolStripMenuItem.Name = "OrdnerÖffnenToolStripMenuItem"
+ Me.OrdnerÖffnenToolStripMenuItem.Size = New System.Drawing.Size(181, 22)
+ Me.OrdnerÖffnenToolStripMenuItem.Text = "Ordner öffnen"
+ '
'frmResultDoc
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(7.0!, 16.0!)
@@ -445,4 +445,5 @@ Partial Class frmResultDoc
Friend WithEvents ÖffnenToolStripMenuItem As ToolStripMenuItem
Friend WithEvents EigenschaftenToolStripMenuItem As ToolStripMenuItem
Friend WithEvents tslblState As ToolStripStatusLabel
+ Friend WithEvents OrdnerÖffnenToolStripMenuItem As ToolStripMenuItem
End Class
diff --git a/app/DD_Clipboard_Searcher/frmResultDoc.vb b/app/DD_Clipboard_Searcher/frmResultDoc.vb
index 26a8c39..bf6195d 100644
--- a/app/DD_Clipboard_Searcher/frmResultDoc.vb
+++ b/app/DD_Clipboard_Searcher/frmResultDoc.vb
@@ -41,6 +41,7 @@ Public Class frmResultDoc
Private DTDocSearchDefinition As DataTable
Private _frmDocView As frmDocView 'You need a reference to Form1
Private _frmProfileMatch As frmDocView 'You need a reference to Form1
+ Private _activeGridView As GridView
#End Region
Public Sub New()
MyBase.New
@@ -367,9 +368,18 @@ Public Class frmResultDoc
End Try
End Sub
Sub Refresh_DocID(myGrid As GridView)
+ _activeGridView = myGrid
clsWMDocGrid.ActiveDocGrid = myGrid
clsWMDocGrid.ActiveDocGrid.EndSelection()
clsWMDocGrid.GetDocItems()
+ Try
+ ContextMenuStripWMFile.Close()
+ Catch ex As Exception
+
+ End Try
+
+
+
If ToolStripDropDownButtonFile.Visible = False Then
ToolStripDropDownButtonFile.Visible = True
End If
@@ -388,6 +398,7 @@ Public Class frmResultDoc
With f
.Show()
.Load_File_from_Path(clsWMDocGrid.SELECTED_DOC_PATH)
+
End With
End If
Catch ex As Exception
@@ -398,16 +409,18 @@ Public Class frmResultDoc
End With
_frmDocView = newDocView
End Try
-
+ Me.BringToFront()
Else
tslblDocID.Text = "DocRow not selected"
ToolStripDropDownButtonFile.Enabled = False
End If
End Sub
Private Sub GridViewDocSearch1_FocusedRowChanged(sender As Object, e As Views.Base.FocusedRowChangedEventArgs) Handles GridViewDocSearch1.FocusedRowChanged
+ _activeGridView = GridViewDocSearch1
Refresh_DocID(GridViewDocSearch1)
End Sub
Private Sub GridViewDocSearch1_ColumnWidthChanged(sender As Object, e As Views.Base.ColumnEventArgs) Handles GridViewDocSearch1.ColumnWidthChanged
+ _activeGridView = GridViewDocSearch1
SaveDocGridLayout()
End Sub
@@ -505,38 +518,47 @@ Public Class frmResultDoc
End Sub
Private Sub GridViewDocSearch1_FocusedColumnChanged(sender As Object, e As Views.Base.FocusedColumnChangedEventArgs) Handles GridViewDocSearch1.FocusedColumnChanged
+ _activeGridView = GridViewDocSearch1
Refresh_DocID(GridViewDocSearch1)
End Sub
Private Sub GridViewDocSearch2_FocusedColumnChanged(sender As Object, e As FocusedColumnChangedEventArgs) Handles GridViewDocSearch2.FocusedColumnChanged
+ _activeGridView = GridViewDocSearch2
Refresh_DocID(GridViewDocSearch2)
End Sub
Private Sub GridViewDocSearch3_FocusedColumnChanged(sender As Object, e As FocusedColumnChangedEventArgs) Handles GridViewDocSearch3.FocusedColumnChanged
+ _activeGridView = GridViewDocSearch3
Refresh_DocID(GridViewDocSearch3)
End Sub
Private Sub GridViewDocSearch4_FocusedColumnChanged(sender As Object, e As FocusedColumnChangedEventArgs) Handles GridViewDocSearch4.FocusedColumnChanged
+ _activeGridView = GridViewDocSearch4
Refresh_DocID(GridViewDocSearch4)
End Sub
Private Sub GridViewDocSearch5_FocusedColumnChanged(sender As Object, e As FocusedColumnChangedEventArgs) Handles GridViewDocSearch5.FocusedColumnChanged
+ _activeGridView = GridViewDocSearch5
Refresh_DocID(GridViewDocSearch5)
End Sub
Private Sub GridViewDocSearch2_FocusedRowChanged(sender As Object, e As FocusedRowChangedEventArgs) Handles GridViewDocSearch2.FocusedRowChanged
+ _activeGridView = GridViewDocSearch2
Refresh_DocID(GridViewDocSearch2)
End Sub
Private Sub GridViewDocSearch3_FocusedRowChanged(sender As Object, e As FocusedRowChangedEventArgs) Handles GridViewDocSearch3.FocusedRowChanged
+ _activeGridView = GridViewDocSearch3
Refresh_DocID(GridViewDocSearch3)
End Sub
Private Sub GridViewDocSearch4_FocusedRowChanged(sender As Object, e As FocusedRowChangedEventArgs) Handles GridViewDocSearch4.FocusedRowChanged
+ _activeGridView = GridViewDocSearch4
Refresh_DocID(GridViewDocSearch4)
End Sub
Private Sub GridViewDocSearch5_FocusedRowChanged(sender As Object, e As FocusedRowChangedEventArgs) Handles GridViewDocSearch5.FocusedRowChanged
+ _activeGridView = GridViewDocSearch5
Refresh_DocID(GridViewDocSearch5)
End Sub
@@ -558,4 +580,38 @@ Public Class frmResultDoc
Dim oTabCaption = DTDocSearchDefinition.Rows(XtraTabControlDocs.SelectedTabPageIndex).Item("TAB_TITLE")
RefreshTabDoc(oProfileID, oConID, oCommand, oTabIndex, oTabCaption)
End Sub
+
+ Private Sub GridControlDocSearch1_DoubleClick(sender As Object, e As EventArgs) Handles GridControlDocSearch1.DoubleClick
+ Refresh_DocID(GridViewDocSearch1)
+ FileShow()
+ End Sub
+ Private Sub GridControlDocSearch2_DoubleClick(sender As Object, e As EventArgs) Handles GridControlDocSearch2.DoubleClick
+ Refresh_DocID(GridViewDocSearch2)
+ FileShow()
+ End Sub
+ Private Sub GridControlDocSearch3_DoubleClick(sender As Object, e As EventArgs) Handles GridControlDocSearch3.DoubleClick
+ Refresh_DocID(GridViewDocSearch3)
+ FileShow()
+ End Sub
+ Private Sub GridControlDocSearch4_DoubleClick(sender As Object, e As EventArgs) Handles GridControlDocSearch4.DoubleClick
+ Refresh_DocID(GridViewDocSearch4)
+ FileShow()
+ End Sub
+ Private Sub GridControlDocSearch5_DoubleClick(sender As Object, e As EventArgs) Handles GridControlDocSearch5.DoubleClick
+ Refresh_DocID(GridViewDocSearch5)
+ FileShow()
+ End Sub
+
+ Private Sub OrdnerÖffnenToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles OrdnerÖffnenToolStripMenuItem.Click
+ Open_Folder()
+
+ End Sub
+ Sub Open_Folder()
+ Dim oFilepath = Path.GetDirectoryName(clsWMDocGrid.SELECTED_DOC_PATH)
+ If System.IO.Directory.Exists(oFilepath) = True Then
+ Process.Start(oFilepath)
+ Else
+ MsgBox("Folder '" & oFilepath & "' not existing or accessible!", MsgBoxStyle.Exclamation)
+ End If
+ End Sub
End Class
\ No newline at end of file