MS bugfixing

app/DD_Clipboard_Searcher/DD_Clipboard_Watcher.vbproj

@@ -256,6 +256,7 @@
   <ItemGroup>
     <Content Include="DD_Icons_ICO_CBWATCHER_48px.ico" />
     <Content Include="KeyOutput_8167.ico" />
+    <None Include="Resources\refresh_16xLG.png" />
     <None Include="Resources\Symbols_Stop_16xLG.png" />
     <None Include="Resources\startwithoutdebugging_6556.png" />
     <None Include="Resources\ReduceSize.png" />

app/DD_Clipboard_Searcher/My Project/Resources.Designer.vb

@@ -22,7 +22,7 @@ Namespace My.Resources
     '''<summary>
     '''  Eine stark typisierte Ressourcenklasse zum Suchen von lokalisierten Zeichenfolgen usw.
     '''</summary>
-    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Resources.Tools.StronglyTypedResourceBuilder", "4.0.0.0"),  _
+    <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()>  _
@@ -130,6 +130,16 @@ Namespace My.Resources
             End Get
         End Property
         
+        '''<summary>
+        '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
+        '''</summary>
+        Friend ReadOnly Property refresh_16xLG() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("refresh_16xLG", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>

app/DD_Clipboard_Searcher/My Project/Resources.resx

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

app/DD_Clipboard_Searcher/frmAdministration.Designer.vb

@@ -34,10 +34,20 @@ Partial Class frmAdministration
         Dim CHANGED_WHENLabel As System.Windows.Forms.Label
         Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmAdministration))
         Me.GroupBox1 = New System.Windows.Forms.GroupBox()
+        Me.grpbxProfiles = New System.Windows.Forms.GroupBox()
         Me.btnaddSearch = New System.Windows.Forms.Button()
-        Me.GridControl1 = New DevExpress.XtraGrid.GridControl()
+        Me.CHANGED_WHENTextBox = New System.Windows.Forms.TextBox()
         Me.TBCW_PROFILESBindingSource = New System.Windows.Forms.BindingSource(Me.components)
         Me.MyDataset = New DD_Clipboard_Watcher.MyDataset()
+        Me.CHANGED_WHOTextBox = New System.Windows.Forms.TextBox()
+        Me.GUIDTextBox = New System.Windows.Forms.TextBox()
+        Me.ADDED_WHENTextBox = New System.Windows.Forms.TextBox()
+        Me.NAMETextBox = New System.Windows.Forms.TextBox()
+        Me.ADDED_WHOTextBox = New System.Windows.Forms.TextBox()
+        Me.COMMENTTextBox = New System.Windows.Forms.TextBox()
+        Me.REGEX_EXPRESSIONTextBox = New System.Windows.Forms.TextBox()
+        Me.WD_SEARCHTextBox = New System.Windows.Forms.TextBox()
+        Me.GridControl1 = New DevExpress.XtraGrid.GridControl()
         Me.GridView1 = New DevExpress.XtraGrid.Views.Grid.GridView()
         Me.colGUID = New DevExpress.XtraGrid.Columns.GridColumn()
         Me.colNAME = New DevExpress.XtraGrid.Columns.GridColumn()
@@ -54,15 +64,7 @@ Partial Class frmAdministration
         Me.BindingNavigatorSeparator2 = New System.Windows.Forms.ToolStripSeparator()
         Me.BindingNavigatorDeleteItem = New System.Windows.Forms.ToolStripButton()
         Me.TBCW_PROFILESBindingNavigatorSaveItem = New System.Windows.Forms.ToolStripButton()
-        Me.GUIDTextBox = New System.Windows.Forms.TextBox()
+        Me.ToolStripButton1 = New System.Windows.Forms.ToolStripButton()
-        Me.NAMETextBox = New System.Windows.Forms.TextBox()
-        Me.COMMENTTextBox = New System.Windows.Forms.TextBox()
-        Me.WD_SEARCHTextBox = New System.Windows.Forms.TextBox()
-        Me.REGEX_EXPRESSIONTextBox = New System.Windows.Forms.TextBox()
-        Me.ADDED_WHOTextBox = New System.Windows.Forms.TextBox()
-        Me.ADDED_WHENTextBox = New System.Windows.Forms.TextBox()
-        Me.CHANGED_WHOTextBox = New System.Windows.Forms.TextBox()
-        Me.CHANGED_WHENTextBox = New System.Windows.Forms.TextBox()
         Me.GroupBox2 = New System.Windows.Forms.GroupBox()
         Me.Label2 = New System.Windows.Forms.Label()
         Me.GridControlUsers2Menue = New DevExpress.XtraGrid.GridControl()
@@ -125,9 +127,10 @@ Partial Class frmAdministration
         CHANGED_WHOLabel = New System.Windows.Forms.Label()
         CHANGED_WHENLabel = New System.Windows.Forms.Label()
         Me.GroupBox1.SuspendLayout()
-        CType(Me.GridControl1, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.grpbxProfiles.SuspendLayout()
         CType(Me.TBCW_PROFILESBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
         CType(Me.MyDataset, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.GridControl1, System.ComponentModel.ISupportInitialize).BeginInit()
         CType(Me.GridView1, System.ComponentModel.ISupportInitialize).BeginInit()
         CType(Me.TBCW_PROFILESBindingNavigator, System.ComponentModel.ISupportInitialize).BeginInit()
         Me.TBCW_PROFILESBindingNavigator.SuspendLayout()
@@ -152,7 +155,7 @@ Partial Class frmAdministration
         '
         GUIDLabel.AutoSize = True
         GUIDLabel.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        GUIDLabel.Location = New System.Drawing.Point(174, 48)
+        GUIDLabel.Location = New System.Drawing.Point(10, 17)
         GUIDLabel.Name = "GUIDLabel"
         GUIDLabel.Size = New System.Drawing.Size(22, 13)
         GUIDLabel.TabIndex = 0
@@ -162,7 +165,7 @@ Partial Class frmAdministration
         '
         NAMELabel.AutoSize = True
         NAMELabel.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        NAMELabel.Location = New System.Drawing.Point(227, 48)
+        NAMELabel.Location = New System.Drawing.Point(63, 17)
         NAMELabel.Name = "NAMELabel"
         NAMELabel.Size = New System.Drawing.Size(38, 13)
         NAMELabel.TabIndex = 2
@@ -172,7 +175,7 @@ Partial Class frmAdministration
         '
         COMMENTLabel.AutoSize = True
         COMMENTLabel.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        COMMENTLabel.Location = New System.Drawing.Point(174, 88)
+        COMMENTLabel.Location = New System.Drawing.Point(10, 57)
         COMMENTLabel.Name = "COMMENTLabel"
         COMMENTLabel.Size = New System.Drawing.Size(65, 13)
         COMMENTLabel.TabIndex = 4
@@ -182,7 +185,7 @@ Partial Class frmAdministration
         '
         WD_SEARCHLabel.AutoSize = True
         WD_SEARCHLabel.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        WD_SEARCHLabel.Location = New System.Drawing.Point(174, 128)
+        WD_SEARCHLabel.Location = New System.Drawing.Point(10, 97)
         WD_SEARCHLabel.Name = "WD_SEARCHLabel"
         WD_SEARCHLabel.Size = New System.Drawing.Size(89, 13)
         WD_SEARCHLabel.TabIndex = 6
@@ -192,7 +195,7 @@ Partial Class frmAdministration
         '
         REGEX_EXPRESSIONLabel.AutoSize = True
         REGEX_EXPRESSIONLabel.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        REGEX_EXPRESSIONLabel.Location = New System.Drawing.Point(174, 168)
+        REGEX_EXPRESSIONLabel.Location = New System.Drawing.Point(10, 137)
         REGEX_EXPRESSIONLabel.Name = "REGEX_EXPRESSIONLabel"
         REGEX_EXPRESSIONLabel.Size = New System.Drawing.Size(97, 13)
         REGEX_EXPRESSIONLabel.TabIndex = 8
@@ -202,7 +205,7 @@ Partial Class frmAdministration
         '
         ADDED_WHOLabel.AutoSize = True
         ADDED_WHOLabel.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        ADDED_WHOLabel.Location = New System.Drawing.Point(174, 208)
+        ADDED_WHOLabel.Location = New System.Drawing.Point(10, 177)
         ADDED_WHOLabel.Name = "ADDED_WHOLabel"
         ADDED_WHOLabel.Size = New System.Drawing.Size(65, 13)
         ADDED_WHOLabel.TabIndex = 10
@@ -212,7 +215,7 @@ Partial Class frmAdministration
         '
         ADDED_WHENLabel.AutoSize = True
         ADDED_WHENLabel.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        ADDED_WHENLabel.Location = New System.Drawing.Point(327, 208)
+        ADDED_WHENLabel.Location = New System.Drawing.Point(163, 177)
         ADDED_WHENLabel.Name = "ADDED_WHENLabel"
         ADDED_WHENLabel.Size = New System.Drawing.Size(73, 13)
         ADDED_WHENLabel.TabIndex = 12
@@ -222,7 +225,7 @@ Partial Class frmAdministration
         '
         CHANGED_WHOLabel.AutoSize = True
         CHANGED_WHOLabel.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        CHANGED_WHOLabel.Location = New System.Drawing.Point(174, 248)
+        CHANGED_WHOLabel.Location = New System.Drawing.Point(10, 217)
         CHANGED_WHOLabel.Name = "CHANGED_WHOLabel"
         CHANGED_WHOLabel.Size = New System.Drawing.Size(77, 13)
         CHANGED_WHOLabel.TabIndex = 14
@@ -232,7 +235,7 @@ Partial Class frmAdministration
         '
         CHANGED_WHENLabel.AutoSize = True
         CHANGED_WHENLabel.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        CHANGED_WHENLabel.Location = New System.Drawing.Point(327, 248)
+        CHANGED_WHENLabel.Location = New System.Drawing.Point(163, 217)
         CHANGED_WHENLabel.Name = "CHANGED_WHENLabel"
         CHANGED_WHENLabel.Size = New System.Drawing.Size(85, 13)
         CHANGED_WHENLabel.TabIndex = 16
@@ -242,54 +245,64 @@ Partial Class frmAdministration
         '
         Me.GroupBox1.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
             Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
-        Me.GroupBox1.Controls.Add(Me.btnaddSearch)
+        Me.GroupBox1.Controls.Add(Me.grpbxProfiles)
         Me.GroupBox1.Controls.Add(Me.GridControl1)
         Me.GroupBox1.Controls.Add(Me.TBCW_PROFILESBindingNavigator)
-        Me.GroupBox1.Controls.Add(GUIDLabel)
-        Me.GroupBox1.Controls.Add(Me.GUIDTextBox)
-        Me.GroupBox1.Controls.Add(NAMELabel)
-        Me.GroupBox1.Controls.Add(Me.NAMETextBox)
-        Me.GroupBox1.Controls.Add(COMMENTLabel)
-        Me.GroupBox1.Controls.Add(Me.COMMENTTextBox)
-        Me.GroupBox1.Controls.Add(WD_SEARCHLabel)
-        Me.GroupBox1.Controls.Add(Me.WD_SEARCHTextBox)
-        Me.GroupBox1.Controls.Add(REGEX_EXPRESSIONLabel)
-        Me.GroupBox1.Controls.Add(Me.REGEX_EXPRESSIONTextBox)
-        Me.GroupBox1.Controls.Add(ADDED_WHOLabel)
-        Me.GroupBox1.Controls.Add(Me.ADDED_WHOTextBox)
-        Me.GroupBox1.Controls.Add(ADDED_WHENLabel)
-        Me.GroupBox1.Controls.Add(Me.ADDED_WHENTextBox)
-        Me.GroupBox1.Controls.Add(CHANGED_WHOLabel)
-        Me.GroupBox1.Controls.Add(Me.CHANGED_WHOTextBox)
-        Me.GroupBox1.Controls.Add(CHANGED_WHENLabel)
-        Me.GroupBox1.Controls.Add(Me.CHANGED_WHENTextBox)
         Me.GroupBox1.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
         Me.GroupBox1.Location = New System.Drawing.Point(12, 12)
         Me.GroupBox1.Name = "GroupBox1"
-        Me.GroupBox1.Size = New System.Drawing.Size(570, 292)
+        Me.GroupBox1.Size = New System.Drawing.Size(570, 318)
         Me.GroupBox1.TabIndex = 0
         Me.GroupBox1.TabStop = False
         Me.GroupBox1.Text = "Profile"
         '
+        'grpbxProfiles
+        '
+        Me.grpbxProfiles.Controls.Add(GUIDLabel)
+        Me.grpbxProfiles.Controls.Add(Me.btnaddSearch)
+        Me.grpbxProfiles.Controls.Add(Me.CHANGED_WHENTextBox)
+        Me.grpbxProfiles.Controls.Add(CHANGED_WHENLabel)
+        Me.grpbxProfiles.Controls.Add(Me.CHANGED_WHOTextBox)
+        Me.grpbxProfiles.Controls.Add(CHANGED_WHOLabel)
+        Me.grpbxProfiles.Controls.Add(Me.GUIDTextBox)
+        Me.grpbxProfiles.Controls.Add(Me.ADDED_WHENTextBox)
+        Me.grpbxProfiles.Controls.Add(NAMELabel)
+        Me.grpbxProfiles.Controls.Add(ADDED_WHENLabel)
+        Me.grpbxProfiles.Controls.Add(Me.NAMETextBox)
+        Me.grpbxProfiles.Controls.Add(Me.ADDED_WHOTextBox)
+        Me.grpbxProfiles.Controls.Add(COMMENTLabel)
+        Me.grpbxProfiles.Controls.Add(ADDED_WHOLabel)
+        Me.grpbxProfiles.Controls.Add(Me.COMMENTTextBox)
+        Me.grpbxProfiles.Controls.Add(Me.REGEX_EXPRESSIONTextBox)
+        Me.grpbxProfiles.Controls.Add(WD_SEARCHLabel)
+        Me.grpbxProfiles.Controls.Add(REGEX_EXPRESSIONLabel)
+        Me.grpbxProfiles.Controls.Add(Me.WD_SEARCHTextBox)
+        Me.grpbxProfiles.Enabled = False
+        Me.grpbxProfiles.Location = New System.Drawing.Point(177, 48)
+        Me.grpbxProfiles.Name = "grpbxProfiles"
+        Me.grpbxProfiles.Size = New System.Drawing.Size(381, 264)
+        Me.grpbxProfiles.TabIndex = 20
+        Me.grpbxProfiles.TabStop = False
+        '
         'btnaddSearch
         '
         Me.btnaddSearch.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.btnaddSearch.Location = New System.Drawing.Point(497, 142)
+        Me.btnaddSearch.Location = New System.Drawing.Point(333, 111)
         Me.btnaddSearch.Name = "btnaddSearch"
         Me.btnaddSearch.Size = New System.Drawing.Size(28, 23)
         Me.btnaddSearch.TabIndex = 19
         Me.btnaddSearch.Text = "..."
         Me.btnaddSearch.UseVisualStyleBackColor = True
         '
-        'GridControl1
+        'CHANGED_WHENTextBox
         '
-        Me.GridControl1.DataSource = Me.TBCW_PROFILESBindingSource
+        Me.CHANGED_WHENTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBCW_PROFILESBindingSource, "CHANGED_WHEN", True))
-        Me.GridControl1.Location = New System.Drawing.Point(6, 17)
+        Me.CHANGED_WHENTextBox.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.GridControl1.MainView = Me.GridView1
+        Me.CHANGED_WHENTextBox.Location = New System.Drawing.Point(166, 233)
-        Me.GridControl1.Name = "GridControl1"
+        Me.CHANGED_WHENTextBox.Name = "CHANGED_WHENTextBox"
-        Me.GridControl1.Size = New System.Drawing.Size(162, 268)
+        Me.CHANGED_WHENTextBox.ReadOnly = True
-        Me.GridControl1.TabIndex = 18
+        Me.CHANGED_WHENTextBox.Size = New System.Drawing.Size(127, 21)
-        Me.GridControl1.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridView1})
+        Me.CHANGED_WHENTextBox.TabIndex = 17
         '
         'TBCW_PROFILESBindingSource
         '
@@ -301,6 +314,92 @@ Partial Class frmAdministration
         Me.MyDataset.DataSetName = "MyDataset"
         Me.MyDataset.SchemaSerializationMode = System.Data.SchemaSerializationMode.IncludeSchema
         '
+        'CHANGED_WHOTextBox
+        '
+        Me.CHANGED_WHOTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBCW_PROFILESBindingSource, "CHANGED_WHO", True))
+        Me.CHANGED_WHOTextBox.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.CHANGED_WHOTextBox.Location = New System.Drawing.Point(13, 233)
+        Me.CHANGED_WHOTextBox.Name = "CHANGED_WHOTextBox"
+        Me.CHANGED_WHOTextBox.ReadOnly = True
+        Me.CHANGED_WHOTextBox.Size = New System.Drawing.Size(147, 21)
+        Me.CHANGED_WHOTextBox.TabIndex = 15
+        '
+        'GUIDTextBox
+        '
+        Me.GUIDTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBCW_PROFILESBindingSource, "GUID", True))
+        Me.GUIDTextBox.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.GUIDTextBox.Location = New System.Drawing.Point(13, 33)
+        Me.GUIDTextBox.Name = "GUIDTextBox"
+        Me.GUIDTextBox.ReadOnly = True
+        Me.GUIDTextBox.Size = New System.Drawing.Size(47, 21)
+        Me.GUIDTextBox.TabIndex = 1
+        '
+        'ADDED_WHENTextBox
+        '
+        Me.ADDED_WHENTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBCW_PROFILESBindingSource, "ADDED_WHEN", True))
+        Me.ADDED_WHENTextBox.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.ADDED_WHENTextBox.Location = New System.Drawing.Point(166, 193)
+        Me.ADDED_WHENTextBox.Name = "ADDED_WHENTextBox"
+        Me.ADDED_WHENTextBox.ReadOnly = True
+        Me.ADDED_WHENTextBox.Size = New System.Drawing.Size(127, 21)
+        Me.ADDED_WHENTextBox.TabIndex = 13
+        '
+        'NAMETextBox
+        '
+        Me.NAMETextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBCW_PROFILESBindingSource, "NAME", True))
+        Me.NAMETextBox.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.NAMETextBox.Location = New System.Drawing.Point(66, 33)
+        Me.NAMETextBox.Name = "NAMETextBox"
+        Me.NAMETextBox.Size = New System.Drawing.Size(295, 21)
+        Me.NAMETextBox.TabIndex = 0
+        '
+        'ADDED_WHOTextBox
+        '
+        Me.ADDED_WHOTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBCW_PROFILESBindingSource, "ADDED_WHO", True))
+        Me.ADDED_WHOTextBox.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.ADDED_WHOTextBox.Location = New System.Drawing.Point(13, 193)
+        Me.ADDED_WHOTextBox.Name = "ADDED_WHOTextBox"
+        Me.ADDED_WHOTextBox.ReadOnly = True
+        Me.ADDED_WHOTextBox.Size = New System.Drawing.Size(147, 21)
+        Me.ADDED_WHOTextBox.TabIndex = 11
+        '
+        'COMMENTTextBox
+        '
+        Me.COMMENTTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBCW_PROFILESBindingSource, "COMMENT", True))
+        Me.COMMENTTextBox.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.COMMENTTextBox.Location = New System.Drawing.Point(13, 73)
+        Me.COMMENTTextBox.Name = "COMMENTTextBox"
+        Me.COMMENTTextBox.Size = New System.Drawing.Size(348, 21)
+        Me.COMMENTTextBox.TabIndex = 1
+        '
+        'REGEX_EXPRESSIONTextBox
+        '
+        Me.REGEX_EXPRESSIONTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBCW_PROFILESBindingSource, "REGEX_EXPRESSION", True))
+        Me.REGEX_EXPRESSIONTextBox.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.REGEX_EXPRESSIONTextBox.Location = New System.Drawing.Point(13, 153)
+        Me.REGEX_EXPRESSIONTextBox.Name = "REGEX_EXPRESSIONTextBox"
+        Me.REGEX_EXPRESSIONTextBox.Size = New System.Drawing.Size(348, 21)
+        Me.REGEX_EXPRESSIONTextBox.TabIndex = 3
+        '
+        'WD_SEARCHTextBox
+        '
+        Me.WD_SEARCHTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBCW_PROFILESBindingSource, "WD_SEARCH", True))
+        Me.WD_SEARCHTextBox.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.WD_SEARCHTextBox.Location = New System.Drawing.Point(13, 113)
+        Me.WD_SEARCHTextBox.Name = "WD_SEARCHTextBox"
+        Me.WD_SEARCHTextBox.Size = New System.Drawing.Size(314, 21)
+        Me.WD_SEARCHTextBox.TabIndex = 2
+        '
+        'GridControl1
+        '
+        Me.GridControl1.DataSource = Me.TBCW_PROFILESBindingSource
+        Me.GridControl1.Location = New System.Drawing.Point(6, 17)
+        Me.GridControl1.MainView = Me.GridView1
+        Me.GridControl1.Name = "GridControl1"
+        Me.GridControl1.Size = New System.Drawing.Size(162, 268)
+        Me.GridControl1.TabIndex = 18
+        Me.GridControl1.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridView1})
+        '
         'GridView1
         '
         Me.GridView1.Appearance.EvenRow.BackColor = System.Drawing.Color.Aqua
@@ -342,7 +441,7 @@ Partial Class frmAdministration
         Me.TBCW_PROFILESBindingNavigator.CountItem = Me.BindingNavigatorCountItem
         Me.TBCW_PROFILESBindingNavigator.DeleteItem = Nothing
         Me.TBCW_PROFILESBindingNavigator.Dock = System.Windows.Forms.DockStyle.None
-        Me.TBCW_PROFILESBindingNavigator.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.BindingNavigatorMoveFirstItem, Me.BindingNavigatorMovePreviousItem, Me.BindingNavigatorSeparator, Me.BindingNavigatorPositionItem, Me.BindingNavigatorCountItem, Me.BindingNavigatorSeparator1, Me.BindingNavigatorMoveNextItem, Me.BindingNavigatorMoveLastItem, Me.BindingNavigatorSeparator2, Me.BindingNavigatorAddNewItem, Me.BindingNavigatorDeleteItem, Me.TBCW_PROFILESBindingNavigatorSaveItem})
+        Me.TBCW_PROFILESBindingNavigator.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.BindingNavigatorMoveFirstItem, Me.BindingNavigatorMovePreviousItem, Me.BindingNavigatorSeparator, Me.BindingNavigatorPositionItem, Me.BindingNavigatorCountItem, Me.BindingNavigatorSeparator1, Me.BindingNavigatorMoveNextItem, Me.BindingNavigatorMoveLastItem, Me.BindingNavigatorSeparator2, Me.BindingNavigatorAddNewItem, Me.BindingNavigatorDeleteItem, Me.TBCW_PROFILESBindingNavigatorSaveItem, Me.ToolStripButton1})
         Me.TBCW_PROFILESBindingNavigator.Location = New System.Drawing.Point(177, 20)
         Me.TBCW_PROFILESBindingNavigator.MoveFirstItem = Me.BindingNavigatorMoveFirstItem
         Me.TBCW_PROFILESBindingNavigator.MoveLastItem = Me.BindingNavigatorMoveLastItem
@@ -350,7 +449,7 @@ Partial Class frmAdministration
         Me.TBCW_PROFILESBindingNavigator.MovePreviousItem = Me.BindingNavigatorMovePreviousItem
         Me.TBCW_PROFILESBindingNavigator.Name = "TBCW_PROFILESBindingNavigator"
         Me.TBCW_PROFILESBindingNavigator.PositionItem = Me.BindingNavigatorPositionItem
-        Me.TBCW_PROFILESBindingNavigator.Size = New System.Drawing.Size(287, 25)
+        Me.TBCW_PROFILESBindingNavigator.Size = New System.Drawing.Size(310, 25)
         Me.TBCW_PROFILESBindingNavigator.TabIndex = 1
         Me.TBCW_PROFILESBindingNavigator.Text = "BindingNavigator1"
         '
@@ -447,91 +546,14 @@ Partial Class frmAdministration
         Me.TBCW_PROFILESBindingNavigatorSaveItem.Size = New System.Drawing.Size(23, 22)
         Me.TBCW_PROFILESBindingNavigatorSaveItem.Text = "Daten speichern"
         '
-        'GUIDTextBox
+        'ToolStripButton1
         '
-        Me.GUIDTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBCW_PROFILESBindingSource, "GUID", True))
+        Me.ToolStripButton1.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
-        Me.GUIDTextBox.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.ToolStripButton1.Image = Global.DD_Clipboard_Watcher.My.Resources.Resources.refresh_16xLG
-        Me.GUIDTextBox.Location = New System.Drawing.Point(177, 64)
+        Me.ToolStripButton1.ImageTransparentColor = System.Drawing.Color.Magenta
-        Me.GUIDTextBox.Name = "GUIDTextBox"
+        Me.ToolStripButton1.Name = "ToolStripButton1"
-        Me.GUIDTextBox.ReadOnly = True
+        Me.ToolStripButton1.Size = New System.Drawing.Size(23, 22)
-        Me.GUIDTextBox.Size = New System.Drawing.Size(47, 21)
+        Me.ToolStripButton1.Text = "ToolStripButton1"
-        Me.GUIDTextBox.TabIndex = 1
-        '
-        'NAMETextBox
-        '
-        Me.NAMETextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBCW_PROFILESBindingSource, "NAME", True))
-        Me.NAMETextBox.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.NAMETextBox.Location = New System.Drawing.Point(230, 64)
-        Me.NAMETextBox.Name = "NAMETextBox"
-        Me.NAMETextBox.Size = New System.Drawing.Size(295, 21)
-        Me.NAMETextBox.TabIndex = 3
-        '
-        'COMMENTTextBox
-        '
-        Me.COMMENTTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBCW_PROFILESBindingSource, "COMMENT", True))
-        Me.COMMENTTextBox.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.COMMENTTextBox.Location = New System.Drawing.Point(177, 104)
-        Me.COMMENTTextBox.Name = "COMMENTTextBox"
-        Me.COMMENTTextBox.Size = New System.Drawing.Size(348, 21)
-        Me.COMMENTTextBox.TabIndex = 5
-        '
-        'WD_SEARCHTextBox
-        '
-        Me.WD_SEARCHTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBCW_PROFILESBindingSource, "WD_SEARCH", True))
-        Me.WD_SEARCHTextBox.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.WD_SEARCHTextBox.Location = New System.Drawing.Point(177, 144)
-        Me.WD_SEARCHTextBox.Name = "WD_SEARCHTextBox"
-        Me.WD_SEARCHTextBox.Size = New System.Drawing.Size(314, 21)
-        Me.WD_SEARCHTextBox.TabIndex = 7
-        '
-        'REGEX_EXPRESSIONTextBox
-        '
-        Me.REGEX_EXPRESSIONTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBCW_PROFILESBindingSource, "REGEX_EXPRESSION", True))
-        Me.REGEX_EXPRESSIONTextBox.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.REGEX_EXPRESSIONTextBox.Location = New System.Drawing.Point(177, 184)
-        Me.REGEX_EXPRESSIONTextBox.Name = "REGEX_EXPRESSIONTextBox"
-        Me.REGEX_EXPRESSIONTextBox.Size = New System.Drawing.Size(348, 21)
-        Me.REGEX_EXPRESSIONTextBox.TabIndex = 9
-        '
-        'ADDED_WHOTextBox
-        '
-        Me.ADDED_WHOTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBCW_PROFILESBindingSource, "ADDED_WHO", True))
-        Me.ADDED_WHOTextBox.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.ADDED_WHOTextBox.Location = New System.Drawing.Point(177, 224)
-        Me.ADDED_WHOTextBox.Name = "ADDED_WHOTextBox"
-        Me.ADDED_WHOTextBox.ReadOnly = True
-        Me.ADDED_WHOTextBox.Size = New System.Drawing.Size(147, 21)
-        Me.ADDED_WHOTextBox.TabIndex = 11
-        '
-        'ADDED_WHENTextBox
-        '
-        Me.ADDED_WHENTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBCW_PROFILESBindingSource, "ADDED_WHEN", True))
-        Me.ADDED_WHENTextBox.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.ADDED_WHENTextBox.Location = New System.Drawing.Point(330, 224)
-        Me.ADDED_WHENTextBox.Name = "ADDED_WHENTextBox"
-        Me.ADDED_WHENTextBox.ReadOnly = True
-        Me.ADDED_WHENTextBox.Size = New System.Drawing.Size(127, 21)
-        Me.ADDED_WHENTextBox.TabIndex = 13
-        '
-        'CHANGED_WHOTextBox
-        '
-        Me.CHANGED_WHOTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBCW_PROFILESBindingSource, "CHANGED_WHO", True))
-        Me.CHANGED_WHOTextBox.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.CHANGED_WHOTextBox.Location = New System.Drawing.Point(177, 264)
-        Me.CHANGED_WHOTextBox.Name = "CHANGED_WHOTextBox"
-        Me.CHANGED_WHOTextBox.ReadOnly = True
-        Me.CHANGED_WHOTextBox.Size = New System.Drawing.Size(147, 21)
-        Me.CHANGED_WHOTextBox.TabIndex = 15
-        '
-        'CHANGED_WHENTextBox
-        '
-        Me.CHANGED_WHENTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBCW_PROFILESBindingSource, "CHANGED_WHEN", True))
-        Me.CHANGED_WHENTextBox.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.CHANGED_WHENTextBox.Location = New System.Drawing.Point(330, 264)
-        Me.CHANGED_WHENTextBox.Name = "CHANGED_WHENTextBox"
-        Me.CHANGED_WHENTextBox.ReadOnly = True
-        Me.CHANGED_WHENTextBox.Size = New System.Drawing.Size(127, 21)
-        Me.CHANGED_WHENTextBox.TabIndex = 17
         '
         'GroupBox2
         '
@@ -778,7 +800,7 @@ Partial Class frmAdministration
         '
         'OFDWindreamsuche
         '
-        Me.OFDWindreamsuche.Filter = "windream-Suche|*.wdf|Alle Dateien|*.*"
+        Me.OFDWindreamsuche.Filter = "windream-Suche|*.wdf;*.wdfx|Alle Dateien|*.*"
         Me.OFDWindreamsuche.RestoreDirectory = True
         Me.OFDWindreamsuche.Title = "windream-Suche wählen"
         '
@@ -794,7 +816,7 @@ Partial Class frmAdministration
         Me.GroupBox3.Controls.Add(Me.txtPID)
         Me.GroupBox3.Controls.Add(Me.Label4)
         Me.GroupBox3.Controls.Add(Me.Label3)
-        Me.GroupBox3.Location = New System.Drawing.Point(12, 310)
+        Me.GroupBox3.Location = New System.Drawing.Point(12, 351)
         Me.GroupBox3.Name = "GroupBox3"
         Me.GroupBox3.Size = New System.Drawing.Size(570, 81)
         Me.GroupBox3.TabIndex = 2
@@ -940,7 +962,7 @@ Partial Class frmAdministration
         Me.GroupBox4.Controls.Add(Me.btndeleteProcessProfileLink)
         Me.GroupBox4.Controls.Add(Me.btnLinkProcessPRofile)
         Me.GroupBox4.Controls.Add(Me.GridControl3)
-        Me.GroupBox4.Location = New System.Drawing.Point(12, 397)
+        Me.GroupBox4.Location = New System.Drawing.Point(12, 438)
         Me.GroupBox4.Name = "GroupBox4"
         Me.GroupBox4.Size = New System.Drawing.Size(570, 308)
         Me.GroupBox4.TabIndex = 21
@@ -1047,9 +1069,11 @@ Partial Class frmAdministration
         Me.Text = "Administration"
         Me.GroupBox1.ResumeLayout(False)
         Me.GroupBox1.PerformLayout()
-        CType(Me.GridControl1, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.grpbxProfiles.ResumeLayout(False)
+        Me.grpbxProfiles.PerformLayout()
         CType(Me.TBCW_PROFILESBindingSource, System.ComponentModel.ISupportInitialize).EndInit()
         CType(Me.MyDataset, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.GridControl1, System.ComponentModel.ISupportInitialize).EndInit()
         CType(Me.GridView1, System.ComponentModel.ISupportInitialize).EndInit()
         CType(Me.TBCW_PROFILESBindingNavigator, System.ComponentModel.ISupportInitialize).EndInit()
         Me.TBCW_PROFILESBindingNavigator.ResumeLayout(False)
@@ -1159,4 +1183,6 @@ Partial Class frmAdministration
     Friend WithEvents Label6 As Label
     Friend WithEvents Label5 As Label
     Friend WithEvents ToolTip1 As ToolTip
+    Friend WithEvents ToolStripButton1 As ToolStripButton
+    Friend WithEvents grpbxProfiles As GroupBox
 End Class

app/DD_Clipboard_Searcher/frmAdministration.resx

@@ -286,7 +286,7 @@
     <value>930, 56</value>
   </metadata>
   <metadata name="TBCW_PROFILE_PROCESSTableAdapter.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
-    <value>1201, 56</value>
+    <value>17, 95</value>
   </metadata>
   <data name="btndeleteProcessProfileLink.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
     <value>
@@ -322,13 +322,13 @@
 </value>
   </data>
   <metadata name="BackgroundWorker1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
-    <value>17, 95</value>
+    <value>280, 95</value>
   </metadata>
   <metadata name="ToolTip1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
-    <value>180, 95</value>
+    <value>443, 95</value>
   </metadata>
   <metadata name="$this.TrayHeight" type="System.Int32, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
-    <value>255</value>
+    <value>139</value>
   </metadata>
   <data name="$this.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
     <value>

app/DD_Clipboard_Searcher/frmAdministration.vb

@@ -11,6 +11,9 @@ Public Class frmAdministration
         Try
             Me.TBCW_PROFILESTableAdapter.Connection.ConnectionString = MyConnectionString
             Me.TBCW_PROFILESTableAdapter.Fill(Me.MyDataset.TBCW_PROFILES)
+            If MyDataset.TBCW_PROFILES.Rows.Count >= 1 Then
+                grpbxProfiles.Enabled = True
+            End If
         Catch ex As Exception
             MsgBox("Unexpected Error in Load Profiles: " & vbNewLine & ex.Message, MsgBoxStyle.Critical)
         End Try
@@ -257,4 +260,32 @@ Public Class frmAdministration
             Refresh_Free_Users(0)
         End If
     End Sub
+
+    Private Sub BindingNavigatorDeleteItem_Click(sender As Object, e As EventArgs) Handles BindingNavigatorDeleteItem.Click
+        Dim swl = String.Format("EXEC PRCW_DELETE_PROFILE {0}", GUIDTextBox.Text)
+        Dim result As MsgBoxResult = MsgBox("Sind Sie sicher, dass Sie das Profil löschen wollen?", MsgBoxStyle.YesNo, "Bestätigung erforderlich:")
+        ' wenn Speichern ja
+        If result = MsgBoxResult.Yes Then
+            If clsDatabase.Execute_non_Query(swl) = True Then
+                Load_Profiles()
+            End If
+        End If
+
+
+    End Sub
+
+    Private Sub ToolStripButton1_Click(sender As Object, e As EventArgs) Handles ToolStripButton1.Click
+        Load_Profiles()
+        Refresh_Profile_user()
+        Try
+            Dim ID = CInt(GUIDTextBox.Text)
+        Catch ex As Exception
+            Exit Sub
+        End Try
+        Refresh_Free_Users(GUIDTextBox.Text)
+    End Sub
+
+    Private Sub BindingNavigatorAddNewItem_Click(sender As Object, e As EventArgs) Handles BindingNavigatorAddNewItem.Click
+        grpbxProfiles.Enabled = True
+    End Sub
 End Class