TCheckBox to filter dataset by a field

Question

I'm trying to filter a dataset by one field when ticking a checkbox, the following is code what I have put together and thought was correct but it doesn't appear to be working, it brings back 0 records.

procedure TfrmCustomers.cbClick(Sender: TObject);
if cbActive.Checked = True then
with dmod.cds do
begin
  DisableControls;
  try
    Filtered := False;
    FilterOptions := [foCaseInsensitive,foNoPartialCompare];
    Filter := ('active LIKE true');
    Filtered := True;
  finally
    EnableControls;
  end;
end;
end;

The name of the field in the dataset is called 'active' and it stores a string of either 'true' or 'false'.

Any help would be much appreciated.

Thanks,

score 3 · Accepted Answer · answered Jul 22 '15 at 14:40

3

If the field 'active' holds a string you should write:

Filter := ('active = ''true''');

Right now you are filtering on the boolean value True. Also, why don't you use a boolean / bit field for this Active field?

answered Jul 22 '15 at 14:40

Birger

4,343
21
35

sddk · Answer 2 · 2015-07-22T19:17:48.273

0

Change filter line like this

Filter := ('active = ''true''');

edited Jul 22 '15 at 19:17

answered Jul 22 '15 at 14:40

sddk

1,115
1
10
20

1

No. `LIKE` is slower, and is meant for use when you're using a wild card. If you're doing a match to specific content, use `=` instead. – Ken White Jul 22 '15 at 18:04

TCheckBox to filter dataset by a field

2 Answers2