diff --git a/GUIs.ZooFlow/ClassConstants.vb b/GUIs.ZooFlow/ClassConstants.vb
index 8a67f2c3..539de7b7 100644
--- a/GUIs.ZooFlow/ClassConstants.vb
+++ b/GUIs.ZooFlow/ClassConstants.vb
@@ -22,8 +22,8 @@
Public Const VECTORSEPARATOR = "╚"
Public Const SERVICE_ADDRESS_SEPARATOR = ":"
- Public Const HOTKEY_TOGGLE_WATCHER = 354522017
- Public Const HOTKEY_TRIGGER_WATCHER = 354523017
+ Public Const HOTKEY_TOGGLE_WATCHER As Integer = 354522017
+ Public Const HOTKEY_TRIGGER_WATCHER As Integer = 354523017
Public Const NOTIFICATION_DELAY = 2500
diff --git a/GUIs.ZooFlow/ZooFlow.vbproj b/GUIs.ZooFlow/ZooFlow.vbproj
index 1509f99b..6ef7e9ac 100644
--- a/GUIs.ZooFlow/ZooFlow.vbproj
+++ b/GUIs.ZooFlow/ZooFlow.vbproj
@@ -56,15 +56,6 @@
-
- ..\Controls.DocumentViewer\bin\Debug\DigitalData.Controls.DocumentViewer.dll
-
-
- ..\Controls.LookupGrid\bin\Debug\DigitalData.Controls.LookupGrid.dll
-
-
- ..\GUIs.Common\bin\Debug\DigitalData.GUIs.Common.dll
-
P:\Visual Studio Projekte\Bibliotheken\MSG .NET\Bin\22_11_19\Independentsoft.Msg.dll
@@ -396,10 +387,22 @@
+
+ {0958cddf-4a16-41f6-8837-8335f71d599c}
+ DocumentViewer
+
+
+ {3dcd6d1a-c830-4241-b7e4-27430e7ea483}
+ LookupControl
+
{B7D465A2-AE31-4CDF-A8B2-34B42D3EA84E}
ClipboardWatcher
+
+ {d20a6bf2-c7c6-4a7a-b34d-fa27d775a049}
+ Common
+
{44982F9B-6116-44E2-85D0-F39650B1EF99}
Config
diff --git a/GUIs.ZooFlow/frmFlowForm.vb b/GUIs.ZooFlow/frmFlowForm.vb
index 77d61cdb..ab9cf70e 100644
--- a/GUIs.ZooFlow/frmFlowForm.vb
+++ b/GUIs.ZooFlow/frmFlowForm.vb
@@ -34,6 +34,11 @@ Public Class frmFlowForm
Private ClassWindow As Window
Private ProfileFilter As ProfileFilter
Private ProfileLoader As ClassProfileLoader
+ Private Animator As New Animator() With {
+ .PopupColor = Color.FromArgb(255, 214, 49),
+ .PopupOpacity = 0.8,
+ .PopupSize = New Size(100, 30)
+ }
' Runtime Flags
Private ApplicationLoading As Boolean = True
@@ -229,13 +234,13 @@ Public Class frmFlowForm
Select Case oFunctionKey
Case "CTRL"
- HotkeyClass.AddHotKey(oKeyCode, Hotkey.ModfierKey.MOD_CONTROL, ClassConstants.HOTKEY_TRIGGER_WATCHER)
+ HotkeyClass.AddHotKey(oKeyCode, Hotkey.ModfierKey.MOD_CONTROL, HOTKEY_TRIGGER_WATCHER)
Case "SHIFT"
- HotkeyClass.AddHotKey(oKeyCode, Hotkey.ModfierKey.MOD_SHIFT, ClassConstants.HOTKEY_TRIGGER_WATCHER)
+ HotkeyClass.AddHotKey(oKeyCode, Hotkey.ModfierKey.MOD_SHIFT, HOTKEY_TRIGGER_WATCHER)
Case "ALT"
- HotkeyClass.AddHotKey(oKeyCode, Hotkey.ModfierKey.MOD_ALT, ClassConstants.HOTKEY_TRIGGER_WATCHER)
+ HotkeyClass.AddHotKey(oKeyCode, Hotkey.ModfierKey.MOD_ALT, HOTKEY_TRIGGER_WATCHER)
Case "WIN"
- HotkeyClass.AddHotKey(oKeyCode, Hotkey.ModfierKey.MOD_WIN, ClassConstants.HOTKEY_TRIGGER_WATCHER)
+ HotkeyClass.AddHotKey(oKeyCode, Hotkey.ModfierKey.MOD_WIN, HOTKEY_TRIGGER_WATCHER)
End Select
AddHandler HotkeyClass.HotKeyPressed, AddressOf HotkeyClass_HotKeyPressed
@@ -943,6 +948,8 @@ Public Class frmFlowForm
Select Case HotKeyID
Case HOTKEY_TRIGGER_WATCHER
+ Animator.Highlight(Cursor.Position)
+
If oState.CurrentClipboardContents = String.Empty Then
Logger.Info("Current Clipboard Contents is empty. Exiting.")
Exit Sub