profile filter logging

This commit is contained in:
Jonathan Jenne 2019-10-29 10:39:36 +01:00
parent 28ce2af63d
commit c54830c4a3
2 changed files with 7 additions and 1 deletions

View File

@ -498,7 +498,8 @@ Public Class frmAdministration
Try
Select Case oTabName
Case TabPageProcessAssignment.Name
'CtrlApplicationAssignment1.Process_Load(PROFILE_IDTextBox.Text)
CtrlApplicationAssignment1.Process_Load(PROFILE_IDTextBox.Text)
RibbonGroup_Profile.Enabled = False
RibbonGroup_User.Enabled = False
RibbonGroup_Group.Enabled = False

View File

@ -155,11 +155,16 @@ Public Class frmStart
Dim oProfiles = oProfileFilter.Profiles.AsEnumerable()
oProfiles = oProfileFilter.FilterProfilesByClipboardRegex(oProfiles, ClipboardContents)
oProfiles = oProfileFilter.LogRemainingProfiles(oProfiles, "FilterProfilesByClipboardRegex")
oProfiles = oProfileFilter.FilterProfilesByProcess(oProfiles, oWindowInfo.ProcessName)
oProfiles = oProfileFilter.LogRemainingProfiles(oProfiles, "FilterProfilesByProcess")
oProfiles = oProfileFilter.FilterWindowsByWindowTitleRegex(oProfiles, oWindowInfo.WindowTitle)
oProfiles = oProfileFilter.LogRemainingProfiles(oProfiles, "FilterWindowsByWindowTitleRegex")
oProfiles = oProfileFilter.FilterProfilesByFocusedControl(oProfiles, ClipboardContents, Handle)
oProfiles = oProfileFilter.LogRemainingProfiles(oProfiles, "FilterProfilesByFocusedControl")
oProfiles = oProfileFilter.ClearNotMatchedProfiles(oProfiles)
oProfiles = oProfileFilter.ClearDuplicateProfiles(oProfiles)
oProfiles = oProfileFilter.LogRemainingProfiles(oProfiles, "CleanUp")
oProfiles = oProfiles.ToList()
CURRENT_MATCHING_PROFILES = oProfiles