ClipboardWatcher: Version 1.1.0.1

GUIs.ClipboardWatcher/My Project/AssemblyInfo.vb

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

GUIs.ClipboardWatcher/ProfileFilter.vb

@@ -150,11 +150,14 @@ Public Class ProfileFilter
                         oProcesses.Add(oProcess)
 
                         ' Set Profile matched
-                        oProfile.IsCatchAll = True
                         oProfile.IsMatched = True
                         oProfile.MatchedProcessID = oProcess.Guid
 
                     End If
+
+                    If oIsCatchAll Then
+                        oProfile.IsCatchAll = True
+                    End If
                 Next
                 If oFilteredProfiles.Count > 0 Then
                     oProfile.Processes = oProcesses

GUIs.ClipboardWatcher/frmMatch.vb

@@ -132,24 +132,33 @@ Public Class frmMatch
 
                 Dim oProfileMatch As Boolean = False
 
+                _Logger.NewBlock($"Profile {oProfile.Name}")
+
                 If oProfile.ProfileType = ProfileType.ANY Or oProfile.ProfileType = ProfileType.DOCS_ONLY Then
-                    _Logger.Debug("Docs only or ProfileTypeAny")
+                    _Logger.Debug("ProfileType: DOCS_ONLY or ANY")
+
                     If oProfile.CountDocs > 0 Then
                         Dim oItem = CreateTile(oProfile, $"{oProfile.CountDocs} Dateien")
                         oDocumentGroup.Items.Add(oItem)
                         oCreatedTiles += 1
                         oProfileMatch = True
+
+                        _Logger.Debug("{0} Doc-Results!", oProfile.CountDocs)
                     Else
                         _Logger.Debug("NO Doc-Results!")
                     End If
                 End If
 
                 If oProfile.ProfileType = ProfileType.ANY Or oProfile.ProfileType = ProfileType.DATA_ONLY Then
+                    _Logger.Debug("ProfileType: DATA_ONLY or ANY")
+
                     If oProfile.CountData > 0 Then
                         Dim oItem = CreateTile(oProfile, $"{oProfile.CountData} Datensätze")
                         oDataGroup.Items.Add(oItem)
                         oCreatedTiles += 1
                         oProfileMatch = True
+
+                        _Logger.Debug("{0} Data-Results!", oProfile.CountData)
                     Else
                         _Logger.Debug("NO Data-Results!")
                     End If