GUi CW PRofileFilter

This commit is contained in:
Developer01 2025-01-30 16:06:18 +01:00
parent c4d0b17564
commit cb1c9d957f
2 changed files with 7 additions and 7 deletions

View File

@ -82,7 +82,7 @@ Public Class ProfileFilter
Dim oFilteredProfiles As New List(Of ProfileData) Dim oFilteredProfiles As New List(Of ProfileData)
Dim oRootNode As TreeNode = New TreeNode() With { Dim oRootNode As TreeNode = New TreeNode() With {
.Text = $"easyFLOW Search with term [{ClipboardContents}]", .Text = $"easyFLOW Search with term: '{ClipboardContents}'",
.Tag = NODE_ROOT, .Tag = NODE_ROOT,
.ImageIndex = ImageIndex.Root .ImageIndex = ImageIndex.Root
} }
@ -579,7 +579,7 @@ Public Class ProfileFilter
oList.Add(New ProfileData() With { oList.Add(New ProfileData() With {
.Guid = oRow.Item("GUID"), .Guid = oRow.Item("GUID"),
.Regex = oRow.Item("REGEX_EXPRESSION"), .Regex = oRow.Item("REGEX_EXPRESSION"),
.Name = oRow.ItemEx("NAME", String.Empty), .Name = oRow.ItemEx("PROFIL_NAME", "Check_Function_TransformProfiles"),
.Comment = oRow.ItemEx("COMMENT", String.Empty), .Comment = oRow.ItemEx("COMMENT", String.Empty),
.ProfileType = oRow.ItemEx("PROFILE_TYPE", String.Empty), .ProfileType = oRow.ItemEx("PROFILE_TYPE", String.Empty),
.Processes = oProcessList, .Processes = oProcessList,

View File

@ -28,7 +28,7 @@ Public Class ProfileMatch
_Logger.Debug("New Profile Node for Profile {0}", Profile.Name) _Logger.Debug("New Profile Node for Profile {0}", Profile.Name)
Dim oNode As New TreeNode() With { Dim oNode As New TreeNode() With {
.Text = $"Checking profile: {Profile.Name}", .Text = $"Checking profile with name: '{Profile.Name}'",
.ImageIndex = ProfileFilter.ImageIndex.Profile, .ImageIndex = ProfileFilter.ImageIndex.Profile,
.Tag = Profile.Name & "-PROFILE" .Tag = Profile.Name & "-PROFILE"
} }
@ -39,7 +39,7 @@ Public Class ProfileMatch
Public Function NewClipboardRegexNode(Profile As ProfileData, IsMatch As Boolean) As TreeNode Public Function NewClipboardRegexNode(Profile As ProfileData, IsMatch As Boolean) As TreeNode
_Logger.Debug("New Clipboard Regex Node for Profile {0}", Profile.Name) _Logger.Debug("New Clipboard Regex Node for Profile {0}", Profile.Name)
Dim oText = $"{GetMatchText(IsMatch)} on Global Clipboard Regex [{Profile.Regex}]" Dim oText = $"{GetMatchText(IsMatch)} on Global Clipboard Regex: '{Profile.Regex}'"
Dim oNode As New TreeNode() With { Dim oNode As New TreeNode() With {
.Text = oText, .Text = oText,
.ImageIndex = ProfileFilter.ImageIndex.Clipboard, .ImageIndex = ProfileFilter.ImageIndex.Clipboard,
@ -56,7 +56,7 @@ Public Class ProfileMatch
If IsCatchAll Then If IsCatchAll Then
oText = $"{GetMatchText(IsMatch)} on Catch-All Process" oText = $"{GetMatchText(IsMatch)} on Catch-All Process"
Else Else
oText = $"{GetMatchText(IsMatch)} on ProcessName [{Process.ProcessName}]" oText = $"{GetMatchText(IsMatch)} on ProcessName: '{Process.ProcessName}'"
End If End If
Dim oNode As New TreeNode() With { Dim oNode As New TreeNode() With {
@ -73,7 +73,7 @@ Public Class ProfileMatch
_Logger.Debug("New Window Node for Profile {0} and WindowTitle {1}", Profile.Name, Window.Title) _Logger.Debug("New Window Node for Profile {0} and WindowTitle {1}", Profile.Name, Window.Title)
Dim oMatchText = IIf(IsMatch, "MATCH", "NO MATCH") Dim oMatchText = IIf(IsMatch, "MATCH", "NO MATCH")
Dim oText = $"{GetMatchText(IsMatch)} on WindowTitle [{Window.Title}]" Dim oText = $"{GetMatchText(IsMatch)} on WindowTitle: '{Window.Title}'"
Dim oNode As New TreeNode() With { Dim oNode As New TreeNode() With {
.Text = oText, .Text = oText,
.ImageIndex = ProfileFilter.ImageIndex.Window, .ImageIndex = ProfileFilter.ImageIndex.Window,
@ -88,7 +88,7 @@ Public Class ProfileMatch
_Logger.Debug("New Control Node for Profile {0} and Control {1}", Profile.Name, Control.Description) _Logger.Debug("New Control Node for Profile {0} and Control {1}", Profile.Name, Control.Description)
Dim oMatchText = IIf(IsMatch, "MATCH", "NO MATCH") Dim oMatchText = IIf(IsMatch, "MATCH", "NO MATCH")
Dim oText = $"{GetMatchText(IsMatch)} on Control [{Control.Description}]" Dim oText = $"{GetMatchText(IsMatch)} on Control: '{Control.Description}'"
Dim oNode As New TreeNode() With { Dim oNode As New TreeNode() With {
.Text = oText, .Text = oText,