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

LCL: editbtn: fix regression after r54191 #0da26ddcc1 (filter wasn't applied).

Browse Source 
git-svn-id: trunk@54204 -
This commit is contained in:
ondrej 2017-02-19 21:04:44 +00:00
parent d6ec634142
commit aa9e36d48e
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
lcl/editbtn.pas
View File

@ -1155,10 +1155,10 @@ end;
procedure TCustomControlFilterEdit.SetFilter(const AValue: string);
begin
if Text=AValue then
Button.Enabled:=AValue<>'';
if fFilter=AValue then
Exit;
Text:=AValue;
fFilter:=AValue;
ApplyFilter;
end;