zooflow basics

ClipboardWatcher/My Project/Resources.Designer.vb

@@ -1,62 +0,0 @@
-'------------------------------------------------------------------------------
-' <auto-generated>
-'     This code was generated by a tool.
-'     Runtime Version:4.0.30319.42000
-'
-'     Changes to this file may cause incorrect behavior and will be lost if
-'     the code is regenerated.
-' </auto-generated>
-'------------------------------------------------------------------------------
-
-Option Strict On
-Option Explicit On
-
-
-Namespace My.Resources
-    
-    'This class was auto-generated by the StronglyTypedResourceBuilder
-    'class via a tool like ResGen or Visual Studio.
-    'To add or remove a member, edit your .ResX file then rerun ResGen
-    'with the /str option, or rebuild your VS project.
-    '''<summary>
-    '''  A strongly-typed resource class, for looking up localized strings, etc.
-    '''</summary>
-    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Resources.Tools.StronglyTypedResourceBuilder", "4.0.0.0"), _
-     Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
-     Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(), _
-     Global.Microsoft.VisualBasic.HideModuleNameAttribute()> _
-    Friend Module Resources
-
-        Private resourceMan As Global.System.Resources.ResourceManager
-
-        Private resourceCulture As Global.System.Globalization.CultureInfo
-
-        '''<summary>
-        '''  Returns the cached ResourceManager instance used by this class.
-        '''</summary>
-        <Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
-        Friend ReadOnly Property ResourceManager() As Global.System.Resources.ResourceManager
-            Get
-                If Object.ReferenceEquals(resourceMan, Nothing) Then
-                    Dim temp As Global.System.Resources.ResourceManager = New Global.System.Resources.ResourceManager("ClipboardWatcher.Resources", GetType(Resources).Assembly)
-                    resourceMan = temp
-                End If
-                Return resourceMan
-            End Get
-        End Property
-
-        '''<summary>
-        '''  Overrides the current thread's CurrentUICulture property for all
-        '''  resource lookups using this strongly typed resource class.
-        '''</summary>
-        <Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
-        Friend Property Culture() As Global.System.Globalization.CultureInfo
-            Get
-                Return resourceCulture
-            End Get
-            Set(ByVal value As Global.System.Globalization.CultureInfo)
-                resourceCulture = value
-            End Set
-        End Property
-    End Module
-End Namespace

ClipboardWatcher/My Project/Settings.Designer.vb

@@ -1,73 +0,0 @@
-'------------------------------------------------------------------------------
-' <auto-generated>
-'     This code was generated by a tool.
-'     Runtime Version:4.0.30319.42000
-'
-'     Changes to this file may cause incorrect behavior and will be lost if
-'     the code is regenerated.
-' </auto-generated>
-'------------------------------------------------------------------------------
-
-Option Strict On
-Option Explicit On
-
-
-Namespace My
-
-    <Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(), _
-     Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Editors.SettingsDesigner.SettingsSingleFileGenerator", "11.0.0.0"), _
-     Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
-    Partial Friend NotInheritable Class MySettings
-        Inherits Global.System.Configuration.ApplicationSettingsBase
-
-        Private Shared defaultInstance As MySettings = CType(Global.System.Configuration.ApplicationSettingsBase.Synchronized(New MySettings), MySettings)
-
-#Region "My.Settings Auto-Save Functionality"
-#If _MyType = "WindowsForms" Then
-        Private Shared addedHandler As Boolean
-
-        Private Shared addedHandlerLockObject As New Object
-
-        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
-        Private Shared Sub AutoSaveSettings(ByVal sender As Global.System.Object, ByVal e As Global.System.EventArgs)
-            If My.Application.SaveMySettingsOnExit Then
-                My.Settings.Save()
-            End If
-        End Sub
-#End If
-#End Region
-
-        Public Shared ReadOnly Property [Default]() As MySettings
-            Get
-
-#If _MyType = "WindowsForms" Then
-                   If Not addedHandler Then
-                        SyncLock addedHandlerLockObject
-                            If Not addedHandler Then
-                                AddHandler My.Application.Shutdown, AddressOf AutoSaveSettings
-                                addedHandler = True
-                            End If
-                        End SyncLock
-                    End If
-#End If
-                Return defaultInstance
-            End Get
-        End Property
-    End Class
-End Namespace
-
-Namespace My
-    
-    <Global.Microsoft.VisualBasic.HideModuleNameAttribute(),  _
-     Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-     Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute()>  _
-    Friend Module MySettingsProperty
-        
-        <Global.System.ComponentModel.Design.HelpKeywordAttribute("My.Settings")>  _
-        Friend ReadOnly Property Settings() As Global.ClipboardWatcher.My.MySettings
-            Get
-                Return Global.ClipboardWatcher.My.MySettings.Default
-            End Get
-        End Property
-    End Module
-End Namespace

ClipboardWatcher/frmMatch.vb

@@ -1,14 +0,0 @@
-''' <summary>
-''' Needs:
-''' 
-''' - Config (Location of Window)
-''' - Clipboard Contents
-''' - Matching Profiles
-''' - Pattern Replacement Values
-''' - Connections
-''' </summary>
-
-
-Public Class frmMatch
-
-End Class

DDMonorepo.sln

@@ -84,7 +84,7 @@ Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "ZooFlow", "ZooFlow\ZooFlow.
 EndProject
 Project("{2150E333-8FDC-42A3-9474-1A3956D46DE8}") = "Products", "Products", "{EB026AEE-C702-47C6-82F5-956D5C8E26C2}"
 EndProject
-Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "ClipboardWatcher", "ClipboardWatcher\ClipboardWatcher.vbproj", "{1FBA063D-60A5-4FC8-A529-A3D1ECFD640C}"
+Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "ClipboardWatcher", "Products.ClipboardWatcher\ClipboardWatcher.vbproj", "{1FBA063D-60A5-4FC8-A529-A3D1ECFD640C}"
 EndProject
 Global
 	GlobalSection(SolutionConfigurationPlatforms) = preSolution

Products.ClipboardWatcher/ClipboardWatcher.vbproj

@@ -6,8 +6,8 @@
     <Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
     <ProjectGuid>{1FBA063D-60A5-4FC8-A529-A3D1ECFD640C}</ProjectGuid>
     <OutputType>Library</OutputType>
-    <RootNamespace>ClipboardWatcher</RootNamespace>
+    <RootNamespace>DigitalData.Products.ClipboardWatcher</RootNamespace>
-    <AssemblyName>ClipboardWatcher</AssemblyName>
+    <AssemblyName>DigitalData.Products.ClipboardWatcher</AssemblyName>
     <FileAlignment>512</FileAlignment>
     <MyType>Windows</MyType>
     <TargetFrameworkVersion>v4.6.1</TargetFrameworkVersion>
@@ -18,7 +18,7 @@
     <DefineDebug>true</DefineDebug>
     <DefineTrace>true</DefineTrace>
     <OutputPath>bin\Debug\</OutputPath>
-    <DocumentationFile>ClipboardWatcher.xml</DocumentationFile>
+    <DocumentationFile>DigitalData.Products.ClipboardWatcher.xml</DocumentationFile>
     <NoWarn>42016,41999,42017,42018,42019,42032,42036,42020,42021,42022</NoWarn>
   </PropertyGroup>
   <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|AnyCPU' ">
@@ -27,7 +27,7 @@
     <DefineTrace>true</DefineTrace>
     <Optimize>true</Optimize>
     <OutputPath>bin\Release\</OutputPath>
-    <DocumentationFile>ClipboardWatcher.xml</DocumentationFile>
+    <DocumentationFile>DigitalData.Products.ClipboardWatcher.xml</DocumentationFile>
     <NoWarn>42016,41999,42017,42018,42019,42032,42036,42020,42021,42022</NoWarn>
   </PropertyGroup>
   <PropertyGroup>
@@ -88,6 +88,9 @@
     </Compile>
   </ItemGroup>
   <ItemGroup>
+    <EmbeddedResource Include="frmMatch.resx">
+      <DependentUpon>frmMatch.vb</DependentUpon>
+    </EmbeddedResource>
     <EmbeddedResource Include="My Project\Resources.resx">
       <Generator>VbMyResourcesResXFileCodeGenerator</Generator>
       <LastGenOutput>Resources.Designer.vb</LastGenOutput>
@@ -106,5 +109,19 @@
       <LastGenOutput>Settings.Designer.vb</LastGenOutput>
     </None>
   </ItemGroup>
+  <ItemGroup>
+    <ProjectReference Include="..\Modules.Config\Config.vbproj">
+      <Project>{44982f9b-6116-44e2-85d0-f39650b1ef99}</Project>
+      <Name>Config</Name>
+    </ProjectReference>
+    <ProjectReference Include="..\Modules.Database\Database.vbproj">
+      <Project>{eaf0ea75-5fa7-485d-89c7-b2d843b03a96}</Project>
+      <Name>Database</Name>
+    </ProjectReference>
+    <ProjectReference Include="..\Modules.Logging\Logging.vbproj">
+      <Project>{903b2d7d-3b80-4be9-8713-7447b704e1b0}</Project>
+      <Name>Logging</Name>
+    </ProjectReference>
+  </ItemGroup>
   <Import Project="$(MSBuildToolsPath)\Microsoft.VisualBasic.targets" />
 </Project>

Products.ClipboardWatcher/My Project/Application.Designer.vb

@@ -1,10 +1,10 @@
 '------------------------------------------------------------------------------
 ' <auto-generated>
-'     This code was generated by a tool.
+'     Dieser Code wurde von einem Tool generiert.
-'     Runtime Version:4.0.30319.42000
+'     Laufzeitversion:4.0.30319.42000
 '
-'     Changes to this file may cause incorrect behavior and will be lost if
+'     Änderungen an dieser Datei können falsches Verhalten verursachen und gehen verloren, wenn
-'     the code is regenerated.
+'     der Code erneut generiert wird.
 ' </auto-generated>
 '------------------------------------------------------------------------------
 

Products.ClipboardWatcher/My Project/Resources.Designer.vb

@@ -0,0 +1,63 @@
+'------------------------------------------------------------------------------
+' <auto-generated>
+'     Dieser Code wurde von einem Tool generiert.
+'     Laufzeitversion:4.0.30319.42000
+'
+'     Änderungen an dieser Datei können falsches Verhalten verursachen und gehen verloren, wenn
+'     der Code erneut generiert wird.
+' </auto-generated>
+'------------------------------------------------------------------------------
+
+Option Strict On
+Option Explicit On
+
+Imports System
+
+Namespace My.Resources
+    
+    'Diese Klasse wurde von der StronglyTypedResourceBuilder automatisch generiert
+    '-Klasse über ein Tool wie ResGen oder Visual Studio automatisch generiert.
+    'Um einen Member hinzuzufügen oder zu entfernen, bearbeiten Sie die .ResX-Datei und führen dann ResGen
+    'mit der /str-Option erneut aus, oder Sie erstellen Ihr VS-Projekt neu.
+    '''<summary>
+    '''  Eine stark typisierte Ressourcenklasse zum Suchen von lokalisierten Zeichenfolgen usw.
+    '''</summary>
+    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Resources.Tools.StronglyTypedResourceBuilder", "15.0.0.0"),  _
+     Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
+     Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(),  _
+     Global.Microsoft.VisualBasic.HideModuleNameAttribute()>  _
+    Friend Module Resources
+        
+        Private resourceMan As Global.System.Resources.ResourceManager
+        
+        Private resourceCulture As Global.System.Globalization.CultureInfo
+        
+        '''<summary>
+        '''  Gibt die zwischengespeicherte ResourceManager-Instanz zurück, die von dieser Klasse verwendet wird.
+        '''</summary>
+        <Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)>  _
+        Friend ReadOnly Property ResourceManager() As Global.System.Resources.ResourceManager
+            Get
+                If Object.ReferenceEquals(resourceMan, Nothing) Then
+                    Dim temp As Global.System.Resources.ResourceManager = New Global.System.Resources.ResourceManager("DigitalData.Products.ClipboardWatcher.Resources", GetType(Resources).Assembly)
+                    resourceMan = temp
+                End If
+                Return resourceMan
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Überschreibt die CurrentUICulture-Eigenschaft des aktuellen Threads für alle
+        '''  Ressourcenzuordnungen, die diese stark typisierte Ressourcenklasse verwenden.
+        '''</summary>
+        <Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)>  _
+        Friend Property Culture() As Global.System.Globalization.CultureInfo
+            Get
+                Return resourceCulture
+            End Get
+            Set
+                resourceCulture = value
+            End Set
+        End Property
+    End Module
+End Namespace

Products.ClipboardWatcher/My Project/Settings.Designer.vb

@@ -0,0 +1,73 @@
+'------------------------------------------------------------------------------
+' <auto-generated>
+'     Dieser Code wurde von einem Tool generiert.
+'     Laufzeitversion:4.0.30319.42000
+'
+'     Änderungen an dieser Datei können falsches Verhalten verursachen und gehen verloren, wenn
+'     der Code erneut generiert wird.
+' </auto-generated>
+'------------------------------------------------------------------------------
+
+Option Strict On
+Option Explicit On
+
+
+Namespace My
+    
+    <Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(),  _
+     Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Editors.SettingsDesigner.SettingsSingleFileGenerator", "15.7.0.0"),  _
+     Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)>  _
+    Partial Friend NotInheritable Class MySettings
+        Inherits Global.System.Configuration.ApplicationSettingsBase
+        
+        Private Shared defaultInstance As MySettings = CType(Global.System.Configuration.ApplicationSettingsBase.Synchronized(New MySettings()),MySettings)
+        
+#Region "Automatische My.Settings-Speicherfunktion"
+#If _MyType = "WindowsForms" Then
+    Private Shared addedHandler As Boolean
+
+    Private Shared addedHandlerLockObject As New Object
+
+    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
+    Private Shared Sub AutoSaveSettings(sender As Global.System.Object, e As Global.System.EventArgs)
+        If My.Application.SaveMySettingsOnExit Then
+            My.Settings.Save()
+        End If
+    End Sub
+#End If
+#End Region
+        
+        Public Shared ReadOnly Property [Default]() As MySettings
+            Get
+                
+#If _MyType = "WindowsForms" Then
+               If Not addedHandler Then
+                    SyncLock addedHandlerLockObject
+                        If Not addedHandler Then
+                            AddHandler My.Application.Shutdown, AddressOf AutoSaveSettings
+                            addedHandler = True
+                        End If
+                    End SyncLock
+                End If
+#End If
+                Return defaultInstance
+            End Get
+        End Property
+    End Class
+End Namespace
+
+Namespace My
+    
+    <Global.Microsoft.VisualBasic.HideModuleNameAttribute(),  _
+     Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
+     Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute()>  _
+    Friend Module MySettingsProperty
+        
+        <Global.System.ComponentModel.Design.HelpKeywordAttribute("My.Settings")>  _
+        Friend ReadOnly Property Settings() As Global.DigitalData.Products.ClipboardWatcher.My.MySettings
+            Get
+                Return Global.DigitalData.Products.ClipboardWatcher.My.MySettings.Default
+            End Get
+        End Property
+    End Module
+End Namespace

Products.ClipboardWatcher/frmMatch.Designer.vb

@@ -22,9 +22,16 @@ Partial Class frmMatch
     'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
     <System.Diagnostics.DebuggerStepThrough()> _
     Private Sub InitializeComponent()
-        components = New System.ComponentModel.Container
+        Me.SuspendLayout()
+        '
+        'frmMatch
+        '
+        Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
         Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
         Me.ClientSize = New System.Drawing.Size(800, 450)
+        Me.Name = "frmMatch"
         Me.Text = "frmMatch"
+        Me.ResumeLayout(False)
+
     End Sub
 End Class

Products.ClipboardWatcher/frmMatch.resx

@@ -0,0 +1,120 @@
+<?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>
+</root>

Products.ClipboardWatcher/frmMatch.vb

@@ -0,0 +1,22 @@
+''' <summary>
+''' 
+''' Selfcontained:
+''' - Config (Location of Window)
+''' 
+''' Environment:
+''' - Pattern Replacement Values
+''' - User Info (isAdmin, etc)
+''' - License Info?
+''' - ConnectionString
+''' 
+''' Parameters:
+''' - Matching Profiles as List Of ProfileData
+''' - Clipboard Content as String
+''' </summary>
+
+
+Public Class frmMatch
+    Private Sub frmMatch_Load(sender As Object, e As EventArgs) Handles MyBase.Load
+
+    End Sub
+End Class

ZooFlow/ClassEnvironment.vb

@@ -0,0 +1,3 @@
+Public Class ClassEnvironment
+
+End Class

ZooFlow/My Project/AssemblyInfo.vb

@@ -8,7 +8,7 @@ Imports System.Runtime.InteropServices
 <Assembly: AssemblyTitle("ZooFlow")>
 <Assembly: AssemblyDescription("")>
 <Assembly: AssemblyConfiguration("")>
-<Assembly: AssemblyCompany("")>
+<Assembly: AssemblyCompany("Digital Data")>
 <Assembly: AssemblyProduct("ZooFlow")>
 <Assembly: AssemblyCopyright("Copyright ©  2019")>
 <Assembly: AssemblyTrademark("")>

ZooFlow/My Project/licenses.licx

@@ -1 +1,3 @@
+DevExpress.XtraEditors.PictureEdit, DevExpress.XtraEditors.v18.1, Version=18.1.5.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
+DevExpress.XtraEditors.ProgressBarControl, 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

ZooFlow/ZooFlow.vbproj

@@ -74,6 +74,7 @@
   </ItemGroup>
   <ItemGroup>
     <Compile Include="ClassClipboardWatcher.vb" />
+    <Compile Include="ClassEnvironment.vb" />
     <Compile Include="ClassFlowForm.vb" />
     <Compile Include="frmMain.vb">
       <SubType>Form</SubType>
@@ -87,6 +88,12 @@
     <Compile Include="frmFlowForm.vb">
       <SubType>Form</SubType>
     </Compile>
+    <Compile Include="frmSplash.Designer.vb">
+      <DependentUpon>frmSplash.vb</DependentUpon>
+    </Compile>
+    <Compile Include="frmSplash.vb">
+      <SubType>Form</SubType>
+    </Compile>
     <Compile Include="My Project\Application.Designer.vb">
       <AutoGen>True</AutoGen>
       <DependentUpon>Application.myapp</DependentUpon>
@@ -98,6 +105,9 @@
     <EmbeddedResource Include="frmFlowForm.resx">
       <DependentUpon>frmFlowForm.vb</DependentUpon>
     </EmbeddedResource>
+    <EmbeddedResource Include="frmSplash.resx">
+      <DependentUpon>frmSplash.vb</DependentUpon>
+    </EmbeddedResource>
     <EmbeddedResource Include="My Project\licenses.licx" />
     <EmbeddedResource Include="My Project\Resources.resx">
       <Generator>VbMyResourcesResXFileCodeGenerator</Generator>

ZooFlow/frmFlowForm.vb

@@ -5,6 +5,7 @@
 
     Private Sub frmFlowForm_Load(sender As Object, e As EventArgs) Handles MyBase.Load
         AllowDrop = True
+        ShowInTaskbar = False
 
         SetBitmap(My.Resources.CW_wartet_klein)
     End Sub

ZooFlow/frmMain.Designer.vb

@@ -24,10 +24,23 @@
     ''' the contents of this method with the code editor.
     ''' </summary>
     Private Sub InitializeComponent()
+        Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmMain))
+        Dim SplashScreenManager As DevExpress.XtraSplashScreen.SplashScreenManager = New DevExpress.XtraSplashScreen.SplashScreenManager(Me, GetType(Global.ZooFlow.frmSplash), True, True)
         Me.ribbonControl1 = New DevExpress.XtraBars.Ribbon.RibbonControl()
         Me.ribbonPage1 = New DevExpress.XtraBars.Ribbon.RibbonPage()
         Me.ribbonPageGroup1 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
+        Me.NotifyIconMain = New System.Windows.Forms.NotifyIcon()
+        Me.ContextMenuStripMain = New System.Windows.Forms.ContextMenuStrip()
+        Me.AnzeigenVersteckenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
+        Me.AdministrationToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
+        Me.ToolStripSeparator2 = New System.Windows.Forms.ToolStripSeparator()
+        Me.ToolStripMenuItem1 = New System.Windows.Forms.ToolStripMenuItem()
+        Me.ToolStripSeparator1 = New System.Windows.Forms.ToolStripSeparator()
+        Me.BeendenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
+        Me.ToastNotificationsManager = New DevExpress.XtraBars.ToastNotifications.ToastNotificationsManager()
         CType(Me.ribbonControl1, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.ContextMenuStripMain.SuspendLayout()
+        CType(Me.ToastNotificationsManager, System.ComponentModel.ISupportInitialize).BeginInit()
         Me.SuspendLayout()
         '
         'ribbonControl1
@@ -51,16 +64,77 @@
         Me.ribbonPageGroup1.Name = "ribbonPageGroup1"
         Me.ribbonPageGroup1.Text = "ribbonPageGroup1"
         '
-        'Form1
+        'NotifyIconMain
+        '
+        Me.NotifyIconMain.ContextMenuStrip = Me.ContextMenuStripMain
+        Me.NotifyIconMain.Icon = CType(resources.GetObject("NotifyIconMain.Icon"), System.Drawing.Icon)
+        Me.NotifyIconMain.Text = "NotifyIcon1"
+        Me.NotifyIconMain.Visible = True
+        '
+        'ContextMenuStripMain
+        '
+        Me.ContextMenuStripMain.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.AnzeigenVersteckenToolStripMenuItem, Me.AdministrationToolStripMenuItem, Me.ToolStripSeparator2, Me.ToolStripMenuItem1, Me.ToolStripSeparator1, Me.BeendenToolStripMenuItem})
+        Me.ContextMenuStripMain.Name = "ContextMenuStripMain"
+        Me.ContextMenuStripMain.Size = New System.Drawing.Size(204, 104)
+        '
+        'AnzeigenVersteckenToolStripMenuItem
+        '
+        Me.AnzeigenVersteckenToolStripMenuItem.Name = "AnzeigenVersteckenToolStripMenuItem"
+        Me.AnzeigenVersteckenToolStripMenuItem.Size = New System.Drawing.Size(203, 22)
+        Me.AnzeigenVersteckenToolStripMenuItem.Text = "Anzeigen/Verstecken"
+        '
+        'AdministrationToolStripMenuItem
+        '
+        Me.AdministrationToolStripMenuItem.Name = "AdministrationToolStripMenuItem"
+        Me.AdministrationToolStripMenuItem.Size = New System.Drawing.Size(203, 22)
+        Me.AdministrationToolStripMenuItem.Text = "Administration"
+        '
+        'ToolStripSeparator2
+        '
+        Me.ToolStripSeparator2.Name = "ToolStripSeparator2"
+        Me.ToolStripSeparator2.Size = New System.Drawing.Size(200, 6)
+        '
+        'ToolStripMenuItem1
+        '
+        Me.ToolStripMenuItem1.Name = "ToolStripMenuItem1"
+        Me.ToolStripMenuItem1.Size = New System.Drawing.Size(203, 22)
+        Me.ToolStripMenuItem1.Text = "Clipboard Überwachung"
+        '
+        'ToolStripSeparator1
+        '
+        Me.ToolStripSeparator1.Name = "ToolStripSeparator1"
+        Me.ToolStripSeparator1.Size = New System.Drawing.Size(200, 6)
+        '
+        'BeendenToolStripMenuItem
+        '
+        Me.BeendenToolStripMenuItem.Name = "BeendenToolStripMenuItem"
+        Me.BeendenToolStripMenuItem.Size = New System.Drawing.Size(203, 22)
+        Me.BeendenToolStripMenuItem.Text = "Beenden"
+        '
+        'ToastNotificationsManager
+        '
+        Me.ToastNotificationsManager.ApplicationId = "e0bfb9d4-ab95-488f-af6f-0b69c2381ee8"
+        Me.ToastNotificationsManager.ApplicationName = "ZooFlow"
+        Me.ToastNotificationsManager.Notifications.AddRange(New DevExpress.XtraBars.ToastNotifications.IToastNotificationProperties() {New DevExpress.XtraBars.ToastNotifications.ToastNotification("37d276f6-e182-4bdf-b06a-8414d9604a4f", Nothing, "Pellentesque lacinia tellus eget volutpat", "Lorem ipsum dolor sit amet, consectetur adipisicing elit, sed do eiusmod tempor i" &
+                    "ncididunt ut labore et dolore magna aliqua.", "Lorem ipsum dolor sit amet, consectetur adipisicing elit, sed do eiusmod tempor i" &
+                    "ncididunt ut labore et dolore magna aliqua.", DevExpress.XtraBars.ToastNotifications.ToastNotificationTemplate.Text01)})
+        '
+        'SplashScreenManager
+        '
+        SplashScreenManager.ClosingDelay = 500
+        '
+        'frmMain
         '
         Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
         Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
         Me.ClientSize = New System.Drawing.Size(906, 587)
         Me.Controls.Add(Me.ribbonControl1)
-        Me.Name = "Form1"
+        Me.Name = "frmMain"
         Me.Ribbon = Me.ribbonControl1
         Me.Text = "Zoo Flow"
         CType(Me.ribbonControl1, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.ContextMenuStripMain.ResumeLayout(False)
+        CType(Me.ToastNotificationsManager, System.ComponentModel.ISupportInitialize).EndInit()
         Me.ResumeLayout(False)
         Me.PerformLayout()
 
@@ -71,4 +145,13 @@
     Private WithEvents ribbonControl1 As DevExpress.XtraBars.Ribbon.RibbonControl
     Private WithEvents ribbonPage1 As DevExpress.XtraBars.Ribbon.RibbonPage
     Private WithEvents ribbonPageGroup1 As DevExpress.XtraBars.Ribbon.RibbonPageGroup
+    Friend WithEvents NotifyIconMain As NotifyIcon
+    Friend WithEvents ContextMenuStripMain As ContextMenuStrip
+    Friend WithEvents AdministrationToolStripMenuItem As ToolStripMenuItem
+    Friend WithEvents ToolStripSeparator2 As ToolStripSeparator
+    Friend WithEvents ToolStripMenuItem1 As ToolStripMenuItem
+    Friend WithEvents ToolStripSeparator1 As ToolStripSeparator
+    Friend WithEvents BeendenToolStripMenuItem As ToolStripMenuItem
+    Friend WithEvents AnzeigenVersteckenToolStripMenuItem As ToolStripMenuItem
+    Friend WithEvents ToastNotificationsManager As DevExpress.XtraBars.ToastNotifications.ToastNotificationsManager
 End Class

ZooFlow/frmMain.resx

@@ -117,4 +117,148 @@
   <resheader name="writer">
     <value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
   </resheader>
+  <metadata name="NotifyIconMain.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
+    <value>17, 17</value>
+  </metadata>
+  <metadata name="ContextMenuStripMain.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
+    <value>153, 17</value>
+  </metadata>
+  <assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
+  <data name="NotifyIconMain.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        AAABAAQAEBAAAAEACABoBQAARgAAABAQAAABABgAaAMAAK4FAAAgIAAAAQAIAKgIAAAWCQAAICAAAAEA
+        GACoDAAAvhEAACgAAAAQAAAAIAAAAAEACAAAAAAAQAEAAAAAAAAAAAAAAAEAAAAAAAD28uoA6/TxAOXi
+        wgDp39IA4M3DAN/SzADCwsIA9tSTAO/HlQDvwI0A3cu9AMfFvgDJwK0A18qdAOC8oQDcvaIAyb29ANur
+        kQDap4EAzKWLAMqbggCW0N0AlcbfAKvztgCn0pQAubbFALSpwACBo8wAu7u7ALe3twC9t6cArKysAKWl
+        pQCwqp4ArLmYAKCfmwCfr78Ahaa1AJyalwCMjIwA/8J9AP3FRwDsqXcA6qZZAOmfbQDilGIA3KR9ANST
+        agDTjF0A0YFOAP+sOgD/pw0A/osmAP+UFAD/lwsA/5ABAP2IEgD/jAEA/4MBALWzaACoh28AvZRSAIG7
+        VgCfhWwA/n4JAP98AQD/dgEAoW9QAJ54WwCccFEAqGI/AHzo8gBO0uQAUOq9AGu/7wBtqNwAMcX/AAHc
+        /wAB1f8AAcb/AD6I6AAsmOMAIID2ABCg/AABtv8AAar/AAGj/wBm5XYAQMtOAF26UwAy4VIAL/RdACno
+        UQAmyDkAHtM7ADewKwAUviYADK4VAEF75gBAYeQAH2HxAAF2/wABY/8AAVD/AAE//wBtbW0AZWVlAGhi
+        XwBwXFMAdVtPAGpQRABcT0kAflE7AHdGLAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAD///8A/v7+/v7+
+        /v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/h8gHAYdIB/+/v7+/v7+
+        /kZwbmttP0RqJxz+/v7+/hMsLTEwKwcSPG9pJyD+/v4vMjU0ODMIURUPRXFsIP4FKjY6QjcpE1ZPRwEO
+        QyD+FCg5QUA9DSVUTk1USiEG/jAbYmNkUglfSE1PVRYj/gQuZWdoZks7YFpJTFMeBv4RJGZoZ1AMPl5b
+        XF0YJv7+/goZGhAD/gJXW15hIhz+/v7+/v7+/v7+ABdYWQv+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+
+        /v7+/v7+/v7+/v////////////////Af///gB///wAH//8AA//+AAP//gAD//4AB//8AAf//AAP//4ID
+        ////B/////////////8oAAAAEAAAACAAAAABABgAAAAAAEADAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAqamppaWlubm5wsLCt7e3paWlrq6uAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAqGI/flE7alBEaGJfdVtPn4VsnnhbZWVljo6Ovr6+AAAAAAAAAAAAAAAAAAAA
+        zaON6Z9t4pRi0YFO1Yxb6qZZ9tST2qeBqIdvXE9JbW1tioqKp6enAAAAAAAAAAAA1JNq/6w6/5QU/osm
+        /YgS/6cN78eVLJjjltDd3L2inHBRd0YscFxToqKiAAAA39LM7Kl3/5cL/4MB/3YB/5AB/cVHy6aIAaP/
+        Acb/fOjy6/Tx4LyhoW9QpKSkAAAAypuC/8J9/4wB/3wB/n4JvZRS18qdhaa1AbX/AdX/Adj/Abf/a7/v
+        sKqew8PDAAAA0YtegaPMQXvmQGHkH2HxIID278CNN7ArTtLkAd//Acb/Aar/lcbfoJ+bAAAA4M3D3KR9
+        AXb/AVD/AT7/AWP/bajctbNoFL4mMuFSUOq9McX/EKD8vbenwMDAAAAA26uRn6+/AWP/AT//AVD/Pojo
+        ycCtgbtWHdE5LvJbKehRJsg5p9KUnJqXAAAAAAAAAAAA3cu9ubbFtKnAyb296d/SAAAA5eLCZuV2L/Ve
+        H9Q8DK4VrLmYu7u7AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA9vLqq/O2QMtOXbpTx8W+AAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA////////////////8B///+AH
+        ///AAf//wAD//4AA//+AAP//gAH//wAB//8AA///ggP///8H/////////////ygAAAAgAAAAQAAAAAEA
+        CAAAAAAAgAQAAAAAAAAAAAAAAAEAAAAAAAD+/v4A/Pr3APPz8wD98+kA9/PoAPbx4wDs/P4A4eHhAPPu
+        3wDw6dQA/eTJAO/l0ADg5NsA7uPKAOzhxgD43sYA7NrJAOvewADj3M4A2fHWAN7g1QDA98gA2traANrY
+        1QDd19EA1NTUANrZxgDK1csAysrKAMXFxQD88roA+uy0APnkrAD34qoA9di9APHTuAD52qEA9t6lAPfV
+        pQDq2rwA7NmyAOrTugDg07gA4dO3AO7WoQDpzbwA6MuxAObKuQDz05sA+ciTAPPKnADwyZEA8cWeAP7F
+        jQD6xIIA8saKAOzAkwDvxY4A3M+tANXKrwDO3LMAwN6uAMvBpwDgu6QA87mVAP2+hAD3vIQA8raBAOm5
+        nADhvpoA4raVAOu7hADstYQA57mOAOCthgDCuaMA0qmHAKzP4ACf2+8Ajc/pALzvvAC/3K0Aqs2PAJbb
+        kwCS1YsAkdGHAJnGgQC7u7sAtrGpAKqqqgChoaEAoJuPAJubmwCZmJQAk5OTAJuWigCXlIwAjIyMAIKC
+        ggDxtH8A9rZ1AO+xewDnsHoA6616AOytdQDkp3EA7KFsAPyrWAD3pV8A/6lJAOmfagDpm2YA451sAOKZ
+        ZADikmIA+JRHAPGTSwDsnV4A45JeAOSJUgDqjEQA4oFGANyZYADblGgA3Y5cAN2JVQDbhlMA2YJPANKI
+        TQDXgEwAyYdXAP+cNwD/jDQA/pAcAP+CHQD/iw0A/4QBAILPfQCgh3gA4nw9AO97KwDjcC0A/3ITAP98
+        AQD/dgEA82wTAP9sAQD/ZgEA82AHAO9rGADnaRwA5F4KAN1pJgDbZiQAy2MuAMVZKADXXBoAylgSAJd3
+        ZQCJZ1MAhVpAAKVTIACyVBwAnmQ/AJxTJwCXWC0AiFQ0AG/h9gBv1/UAUdL5AFn/gABsvOkAbLXqAGuz
+        4wB6uN8ATrLwAFOR0wBcg8QAC9n/AAHZ/wAB1/8AAcv/ACSp+AABu/8AC6D+AAGr/wAWm/kACpT8AAGd
+        /wBP6WwARtNYACb8VgAk81AAI/FNAB3hQAAc4D4AG9s8ABfPMQAVyy4ANawxAC+4NgAQvCEAFKscAA+6
+        HwAOtx0ACakSAAimEAAZnhgAJHTmABh88AALbvgAC2H4AAFo/wABWv8AAVf/AAFL/wABQP8AATz/AAEx
+        /wABL/8Aenp6AHFxcQB4cGwAbm5uAGdnZwB8WkYAa1NEAFtbWwBbVFAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAD///8A/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+
+        /v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+
+        /v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+
+        /v7+/v7+/v7+/v7+/v7+/hkdGf7+/v7+/v7+GRwW/v7+/v7+/v7+/v7+/v7+/v4/it3cXllXHBkcV1qe
+        3mEc/v7+/v7+/v7+/v7+/v7+/o2Ul6Km4eDf3Z+jgGiC5GJX/v7+/v7+/v7+/v7+/v7+nJuamZaVkZGM
+        eEcfcHxM4t1aHP7+/v7+/v7+/v7+/nB2QTk5OTk5OTk5JR+AcDFJpePcXFf+/v7+/v7+/v7+mEE5OTk5
+        OTk3NyAgOX5lJicneKHi4NxhWh3+/v7+/i2LNYiPkpKSMzMzIB98bjUoEQ0LMoSRnaSgXhb+/v7+cm8z
+        iJCTj4gzc3M2IH9jRicOFAwECkGEjpdiFv7+/v6YQW2PkpKIazM2ICBmcUYpeyesuKgGAQUyel8H/v7+
+        L4s1h5CTkJAzZ3M2Hn1oKXApJ7q5tbKpTw1LX/7+/v53bzWDhoaFazMzMyEzdilDCSdNvLeztbm6EWAZ
+        /v7+/pg1NTU1NTU1Z2cwH2lxKShKCa+5tbS3vK4+X/7+/v5EeTXR1tna17EzM0EhfUINDQ4Jtreztbm7
+        GlsZ/v7+/n1qWNTX29jVM3RkJDlxKUYODVEFp7K3vK07X/7+/v7+mDWw1dna19AsLCwfcUNGLkYJyr4V
+        AE6rG18c/v7+/kB5ONLX2tnVNXVsNSxxRgtwJ1XLxL+9UzwrX/7+/v7+RmpY09na19AsLDc6GEgLRgsL
+        yMbBwMXNUl0c/v7+/v7+NTU1NTVCY2dFEgIAA0gLJz3Jw7/Cy8cqXf7+/v7+/v7+/g8iIhAL/v7+/v7+
+        /kgLVMXBwcbOVl0d/v7+/v7+/v7+/v7+/v7+/v7+/v7+/kgIUKrEzM8RXQf+/v7+/v7+/v7+/v7+/v7+
+        /v7+/v7+/khISBOJUksc/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+SEg0FP7+/v7+/v7+/v7+/v7+
+        /v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+
+        /v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+
+        /v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v///////////////////////////H+P//gA
+        B//4AAP/+AAA//AAAD/wAAAD4AAAAeAAAAHgAAABwAAAA8AAAAPAAAAHgAAAB4AAAA+AAAAPAAAAHwAA
+        AB+AAAA/4P4AP///AD///4B////w////////////////////////////KAAAACAAAABAAAAAAQAYAAAA
+        AACADAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAANHR0cbGxtTU1AAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAANbW1sjIyNjY2AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAOC7pKCHeHFxcX5+fpWVlaqqqry8vMvLy9HR0cvLy7q6uqKiopd3ZXhwbI6OjsjI
+        yAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAONwLfNgB+ReCrJU
+        HIhUNHxaRmZmZm5ubnFxcYlnU55kP9KITeitc8mHV1tUUIODg7u7uwAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAANdcGsVZKMtjLttmJOdpHO9rGPVqEfNtFu97K+uMRuu7hPnq
+        suCfat6OXdKph2hRQnJycqGhoczMzAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAOSa
+        beaTX/y+hu/Fju/Fju/Fju/Fju/Fju/Fju/Fju/Fjvbepfnrs9eATOefavnIk+e5jpdYLVtbW3h4eJub
+        m7u7uwAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAN5pJfy+hu/Fju/Fju/Fju/Fju/Fju/FjvLG
+        i/LGi/niqvniqu7Hj9uGU++xe/fVpenbu+/bvemMQqVTIG1VRmdnZ3h4eIqKiqGhocXFxQAAAAAAAAAA
+        AAAAAAAAAOnNvOJ8Pf/Fjf+DAf98Af9tAf9rAf9rAfDIkfDIkfDIkfniqvzvttuOWumfavjEjO7YsOve
+        wO7iye/n0PPKmf+ON/FsE8pYEpxTJ4VaQJCQkN7e3gAAAAAAAAAAAAAAAOKSYumbZvDIkf+DAf9zAf9m
+        Af95Af+GAfDIkfiUR/iUR/rEgvjnrdmCT/K0fuG2k+nauOzhx97g1eDk2/fz6P3kyf+8gf+JMP9yE+Re
+        CoCAgNjY2AAAAAAAAAAAAAAAANxpJ/y+hv+pSf9+Af9tAf9qAf+EAfyrWPDIkfrEgvnmrfnmreeweuGZ
+        ZOG2k+rTutuUaOrZvWy16gug/m/X9ez8/vz69/Xw4vPJntyZYJuWiuHh4QAAAAAAAAAAAObKueJ8Pf/F
+        jf+LDf91Af9mAf93Af93AfDIkeuteviUR/rEgvzyutuJVe+sd+rTuuOfb+rTuurZvRaZ+gGp/wHK/wvZ
+        /1HS+Y3P6e7iycO4oJuWigAAAAAAAAAAAAAAAOSJUumbZv/Fjf+cN/+EHf+AHf6QHPyrWPDIkfDIkfDI
+        kffhqfDPluCQXOrTuvC2gvDp1erZvazP4AGb/wG7/wHY/wHJ/wGs/xad+OvfwZeUjNfX1wAAAAAAAAAA
+        AAAAAN1oJf/Fjf/Fjf/Fjf/Fjf/Fjf/Fjf/FjeuteuutevPTm/nqsuSnceGZZOrTuunZtOCthvDp1U6y
+        8AGp/wHO/wHX/wG7/wGf/3q438vBp5uWigAAAAAAAAAAAAAAAOm5nOKBRv/FjRh88AFX/wE5/wEy/wFO
+        /1yDxPDIkfDIkf2/gPfjq9yKVve8hO7jy+7jy+zhx/Dp1SSp+AG7/wHa/wHJ/wGs/wqU/NrZxqCbj9LS
+        0gAAAAAAAAAAAAAAAN+IVOyhbLaxqQFo/wFI/wEv/wFA/wFb//DIkfGTS/a2dfnaoezCi+GZZOrTuuG3
+        levgxO7jy7/crfbx5G/h9gvY/wG7/wGe/2uz49XKr5uWigAAAAAAAAAAAAAAAAAAAN1oJf/FjVOR0wFZ
+        /wE7/wEx/wFO/yN15u7Woe7Woe7WofzuteGZZPO2gOG3lejLseG3lfDo0hSrHEbTWMD3yP/+/p/b72y8
+        6crVy5uWi8/PzwAAAAAAAAAAAAAAAPO5leKBRuzAkwtu+AFK/wEw/wE+/wFa///FjeydXvelX/3Gie3X
+        ouSaZeG3le/m0OCba+rZvZHRhw64HxraOyb8Vk/pbJbbk87cs+HTt5uWigAAAAAAAAAAAAAAAAAAAOey
+        leyhbLawqQth+AE+/wEw/wFK/yRz5u7Woe7WofPFidzPrd3X0e22hu/m0OG3le/m0O/m0C+4NhXLLyPw
+        TSTzUBfPMQmpEqrNj5mYlMnJyQAAAAAAAAAAAAAAAAAAAAAAAP/Fjf/Fjf/Fjf/Fjf3Ci/e7hPC0f+qs
+        eeG+muPczvPz8/39/f3z6ey1hO/m0OrZvcDerhC8IRzgPib8Vh3hQA+7HzWsMeDTuJmYlAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAPjexvXYvfHTuOzaye7g0gAAAAAAAAAAAAAAAAAAAAAAAAAAAOy1hO/m
+        0JLVixfPMSPyTiPwTRXKLQimEJnGgZmYlMPDwwAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAOy1hPPu37zvvFn/gBvbPA63HRmeGOvewJqZ
+        leHh4QAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAOy1hOy1hOy1hNnx1oLPfarNj8G5psjIyAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAOy1
+        hOy1hPHFntrY1QAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAP///////////////////////////H+P//gA
+        B//4AAP/+AAA//AAAD/wAAAD4AAAAeAAAAHgAAABwAAAA8AAAAPAAAAHgAAAB4AAAA+AAAAPAAAAHwAA
+        AB+AAAA/4P4AP///AD///4B////w////////////////////////////
+</value>
+  </data>
+  <metadata name="ToastNotificationsManager.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
+    <value>331, 17</value>
+  </metadata>
 </root>

ZooFlow/frmMain.vb

@@ -1,20 +1,64 @@
 
+Imports DevExpress.XtraSplashScreen
+
 Partial Public Class frmMain
     Private WithEvents FlowForm As New frmFlowForm()
 
-    Shared Sub New()
-        DevExpress.UserSkins.BonusSkins.Register()
-    End Sub
     Public Sub New()
         InitializeComponent()
+        InitializeApplication()
     End Sub
 
     Private Sub frmMain_Load(sender As Object, e As EventArgs) Handles MyBase.Load
         FlowForm.Show()
+
+        ToastNotificationsManager.ShowNotification(ToastNotificationsManager.Notifications.First)
+    End Sub
+
+    Private Sub frmMain_Shown(sender As Object, e As EventArgs) Handles Me.Shown
+        Hide()
     End Sub
 
     Private Sub FlowForm_ClipboardChanged(sender As Object, e As IDataObject) Handles FlowForm.ClipboardChanged
-
+        MsgBox("Clipboard Changed!")
     End Sub
 
+#Region "Notify Icon Menu"
+    Private Sub BeendenToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles BeendenToolStripMenuItem.Click
+        Application.Exit()
+    End Sub
+
+    Private Sub NotifyIconMain_DoubleClick(sender As Object, e As EventArgs) Handles NotifyIconMain.DoubleClick
+        ToggleVisibility()
+    End Sub
+
+    Private Sub AnzeigenVersteckenToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles AnzeigenVersteckenToolStripMenuItem.Click
+        ToggleVisibility()
+    End Sub
+
+
+
+
+#End Region
+
+    Private Sub ToggleVisibility()
+        If Visible Then
+            Hide()
+        Else
+            Show()
+        End If
+    End Sub
+
+    Private Sub InitializeApplication()
+        SplashScreenManager.ShowForm(Me, GetType(frmSplash), False, False, False)
+
+        ' The splash screen will be opened in a separate thread. To interact with it, use the SendCommand method.
+        For i As Integer = 1 To 100
+            SplashScreenManager.Default.SendCommand(frmSplash.SplashScreenCommand.SetProgress, i)
+            'To process commands, override the SplashScreen.ProcessCommand method.
+            Threading.Thread.Sleep(25)
+        Next i
+
+        SplashScreenManager.CloseForm(False)
+    End Sub
 End Class

ZooFlow/frmSplash.Designer.vb

@@ -0,0 +1,129 @@
+<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
+Partial Class frmSplash
+    Inherits DevExpress.XtraSplashScreen.SplashScreen
+
+    'Form overrides dispose to clean up the component list.
+    <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
+
+    'Required by the Windows Form Designer
+    Private components As System.ComponentModel.IContainer
+
+    'NOTE: The following procedure is required by the Windows Form Designer
+    'It can be modified using the Windows Form Designer.
+    '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(frmSplash))
+        Me.pictureEdit2 = New DevExpress.XtraEditors.PictureEdit()
+        Me.pictureEdit1 = New DevExpress.XtraEditors.PictureEdit()
+        Me.labelControl2 = New DevExpress.XtraEditors.LabelControl()
+        Me.LabelControl3 = New DevExpress.XtraEditors.LabelControl()
+        Me.Version = New DevExpress.XtraEditors.LabelControl()
+        Me.ProgressBarControl1 = New DevExpress.XtraEditors.ProgressBarControl()
+        CType(Me.pictureEdit2.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.pictureEdit1.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.ProgressBarControl1.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.SuspendLayout()
+        '
+        'pictureEdit2
+        '
+        Me.pictureEdit2.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
+            Or System.Windows.Forms.AnchorStyles.Left) _
+            Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+        Me.pictureEdit2.Cursor = System.Windows.Forms.Cursors.Default
+        Me.pictureEdit2.EditValue = CType(resources.GetObject("pictureEdit2.EditValue"), Object)
+        Me.pictureEdit2.Location = New System.Drawing.Point(12, 12)
+        Me.pictureEdit2.Name = "pictureEdit2"
+        Me.pictureEdit2.Properties.AllowFocused = False
+        Me.pictureEdit2.Properties.Appearance.BackColor = System.Drawing.Color.Transparent
+        Me.pictureEdit2.Properties.Appearance.Options.UseBackColor = True
+        Me.pictureEdit2.Properties.BorderStyle = DevExpress.XtraEditors.Controls.BorderStyles.NoBorder
+        Me.pictureEdit2.Properties.ShowMenu = False
+        Me.pictureEdit2.Size = New System.Drawing.Size(525, 260)
+        Me.pictureEdit2.TabIndex = 14
+        '
+        'pictureEdit1
+        '
+        Me.pictureEdit1.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+        Me.pictureEdit1.Cursor = System.Windows.Forms.Cursors.Default
+        Me.pictureEdit1.EditValue = CType(resources.GetObject("pictureEdit1.EditValue"), Object)
+        Me.pictureEdit1.Location = New System.Drawing.Point(335, 346)
+        Me.pictureEdit1.Name = "pictureEdit1"
+        Me.pictureEdit1.Properties.AllowFocused = False
+        Me.pictureEdit1.Properties.Appearance.BackColor = System.Drawing.Color.Transparent
+        Me.pictureEdit1.Properties.Appearance.Options.UseBackColor = True
+        Me.pictureEdit1.Properties.BorderStyle = DevExpress.XtraEditors.Controls.BorderStyles.NoBorder
+        Me.pictureEdit1.Properties.ShowMenu = False
+        Me.pictureEdit1.Size = New System.Drawing.Size(202, 28)
+        Me.pictureEdit1.TabIndex = 13
+        '
+        'labelControl2
+        '
+        Me.labelControl2.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
+        Me.labelControl2.Location = New System.Drawing.Point(12, 278)
+        Me.labelControl2.Name = "labelControl2"
+        Me.labelControl2.Size = New System.Drawing.Size(50, 13)
+        Me.labelControl2.TabIndex = 12
+        Me.labelControl2.Text = "Starting..."
+        '
+        'LabelControl3
+        '
+        Me.LabelControl3.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
+        Me.LabelControl3.Location = New System.Drawing.Point(12, 321)
+        Me.LabelControl3.Name = "LabelControl3"
+        Me.LabelControl3.Size = New System.Drawing.Size(75, 13)
+        Me.LabelControl3.TabIndex = 12
+        Me.LabelControl3.Text = "Loading stuff..."
+        '
+        'Version
+        '
+        Me.Version.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
+        Me.Version.Location = New System.Drawing.Point(12, 361)
+        Me.Version.Name = "Version"
+        Me.Version.Size = New System.Drawing.Size(54, 13)
+        Me.Version.TabIndex = 12
+        Me.Version.Text = "Version {0}"
+        '
+        'ProgressBarControl1
+        '
+        Me.ProgressBarControl1.Location = New System.Drawing.Point(12, 297)
+        Me.ProgressBarControl1.Name = "ProgressBarControl1"
+        Me.ProgressBarControl1.Size = New System.Drawing.Size(525, 18)
+        Me.ProgressBarControl1.TabIndex = 15
+        '
+        'frmSplash
+        '
+        Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
+        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
+        Me.ClientSize = New System.Drawing.Size(549, 386)
+        Me.Controls.Add(Me.ProgressBarControl1)
+        Me.Controls.Add(Me.pictureEdit2)
+        Me.Controls.Add(Me.pictureEdit1)
+        Me.Controls.Add(Me.Version)
+        Me.Controls.Add(Me.LabelControl3)
+        Me.Controls.Add(Me.labelControl2)
+        Me.Name = "frmSplash"
+        Me.Text = "Form1"
+        CType(Me.pictureEdit2.Properties, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.pictureEdit1.Properties, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.ProgressBarControl1.Properties, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.ResumeLayout(False)
+        Me.PerformLayout()
+
+    End Sub
+    Private WithEvents pictureEdit2 As DevExpress.XtraEditors.PictureEdit
+    Private WithEvents pictureEdit1 As DevExpress.XtraEditors.PictureEdit
+    Private WithEvents labelControl2 As DevExpress.XtraEditors.LabelControl
+    Private WithEvents LabelControl3 As DevExpress.XtraEditors.LabelControl
+    Private WithEvents Version As DevExpress.XtraEditors.LabelControl
+    Friend WithEvents ProgressBarControl1 As DevExpress.XtraEditors.ProgressBarControl
+End Class

ZooFlow/frmSplash.vb

@@ -0,0 +1,24 @@
+Public Class frmSplash
+    Sub New
+        InitializeComponent()
+    End Sub
+
+    Public Overrides Sub ProcessCommand(ByVal cmd As System.Enum, ByVal arg As Object)
+        MyBase.ProcessCommand(cmd, arg)
+
+        Dim oCommand As SplashScreenCommand = CType(cmd, SplashScreenCommand)
+        Select Case oCommand
+            Case SplashScreenCommand.SetProgress
+                Dim oPosition As Integer = CInt(Fix(arg))
+                ProgressBarControl1.Position = oPosition
+        End Select
+    End Sub
+
+    Private Sub frmSplash_Load(sender As Object, e As EventArgs) Handles Me.Load
+        Version.Text = String.Format("Version {0}", My.Application.Info.Version.ToString)
+    End Sub
+
+    Public Enum SplashScreenCommand
+        SetProgress
+    End Enum
+End Class