pascal/lazarus-ccr
1
0
Fork 0
Code Issues Releases Activity

RxFPC:RxDBGrid - work on new filter style rxfstManualEdi

Browse Source 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@6087 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
alexs75
2017-12-05 12:25:42 +00:00
parent e6fe123d75
commit 676caaafef
2 changed files with 13 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
components/rx/trunk/rxdb/rxdbgrid.pas
View File

@ -5486,8 +5486,16 @@ procedure TRxDBGrid.FFilterSimpleEditOnChange(Sender: TObject);
begin
with TRxColumn(Columns[Columns.RealIndex(FFilterSimpleEdit.Col)]).Filter do
begin
CurrentValues.Text:=FFilterSimpleEdit.Text;
State:=rxfsFilter;
if FFilterSimpleEdit.Text = '' then
begin
CurrentValues.Clear;
State:=rxfsAll;
end
else
begin
CurrentValues.Text:=FFilterSimpleEdit.Text;
State:=rxfsFilter;
end;
end;
DataSource.DataSet.DisableControls;