fix #176 - reg, message filter case sensitvity issue

This commit is contained in:
Basile Burg 2017-08-06 16:48:28 +02:00
parent d2b032447f
commit 26b44a2f0e
No known key found for this signature in database
GPG Key ID: 1868039F415CB8CF
1 changed files with 2 additions and 2 deletions

View File

@ -7,7 +7,7 @@ interface
uses
Classes, SysUtils, Forms, Controls, Graphics, Dialogs, ExtCtrls, ComCtrls,
EditBtn, lcltype, ce_widget, ActnList, Menus, clipbrd, AnchorDocking, math,
TreeFilterEdit, Buttons, GraphType, fgl,
TreeFilterEdit, Buttons, GraphType, fgl, strutils,
ce_ddemangle, ce_writableComponent, ce_common, ce_synmemo, ce_interfaces,
ce_observer, ce_sharedres, ce_stringrange, ce_dsgncontrols;
@ -1016,7 +1016,7 @@ begin
itm := List.Items.Item[i];
if fFiltering then
itm.Visible := itemShouldBeVisible(itm, aCtxt) and
itm.Text.Contains(TreeFilterEdit1.Filter)
AnsiContainsText(itm.Text, TreeFilterEdit1.Filter)
else
itm.Visible:= itemShouldBeVisible(itm, aCtxt);
itm.Selected := false;