Is a TClientDataset filter possible using an insensitive case?

Question

I need to filter TClientDataset, in fact I use this code.

  if Value<>'' then
  begin
      ClientDataSet1.DisableControls;
      try
        ClientDataSet1.Filtered := False;
        ClientDataSet1.Filter   := 'Value LIKE ' + QuotedStr('%'+Value+'%');
        ClientDataSet1.Filtered := True;
      finally
        ClientDataSet1.EnableControls;
      end;
  end;

but the filter works in case-sensitive mode, is it possible to filter a record that ignores the case?

Answer 1

You must use a property FilterOptionswith a value foCaseInsensitive.

  ClientDataSet1.DisableControls;
  try
    ClientDataSet1.Filtered := False;
    ClientDataSet1.FilterOptions := [foCaseInsensitive];
    ClientDataSet1.Filter   := 'Value LIKE ' + QuotedStr('%'+Value+'%');
    ClientDataSet1.Filtered := True;
  finally
    ClientDataSet1.EnableControls;
  end;