paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-04-08 10:58:16 +02:00
Code Issues Packages Projects Releases Wiki Activity

LazControls: Tweak TTreeFilterEdit. Issue #40257.

Browse Source
This commit is contained in:
Juha 2023-05-15 20:59:02 +03:00
parent c862941d4e
commit 34a99c8781
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
components/lazcontrols/treefilteredit.pas
View File

@ -484,7 +484,7 @@ begin
if Assigned(fOnFilterNode) then
Pass := fOnFilterNode(Node, Done);
if not Done then
Pass := Pass or DoFilterItem(Node.Text, Node.Data);
Pass := {Pass or} DoFilterItem(Node.Text, Node.Data);
if Pass and (fFirstPassedNode=Nil) then
fFirstPassedNode:=Node;
// Recursive call for child nodes.