Olá pessoal, hoje vou falar sobre o uso de filtros em DataSets.
Este é um recurso muito interessante disponível em qualquer
componente descendente do TDataSet. Com ele podemos diminuir a
necessidade de uso de SQL direto no Delphi.
Vamos por exemplo utilizar o ClientDataSet ou o FDMemTable se preferir.
Observe que estes componentes possuem duas propriedades:
Filter e Filtered.
O Filter é utilizado para especificar um restrição nos dados de um
dataset, fazendo que o dataset exiba apenas os registros que atendem
as condições.
A propriedade Filter do dataset recebe uma string que descreve a
condição da restrição. Está opção é bem parecida com as clausulas
que normalmente são utilizadas para montar um “where” numa query SQL.
Para ajudar a exemplificar, veja a tabela abaixo:
Para utilizar estes comandos no Filtro, veja o exemplo abaixo:
1
2
3
4
5
procedure TForm1.BtnFiltrarClick(Sender:TObject);begin
CDSAgenda.Filter:='CODCLIENTE = 2 AND DATA=''01/01/2015''';
CDSAgenda.Filtered:=True;end;
procedure TForm1.BtnFiltrarClick(Sender: TObject);
begin
CDSAgenda.Filter := 'CODCLIENTE = 2 AND DATA=''01/01/2015''';
CDSAgenda.Filtered := True;
end;
Veja que a propriedade Filtered = True, diz que estamos utilizando o filtro,
caso você altere ela para False, o filtro será ignorado.
Também é possível o uso de curingas, para ignorar acentos, por exemplo:
This website uses cookies so that we can provide you with the best user experience possible. Cookie information is stored in your browser and performs functions such as recognising you when you return to our website and helping our team to understand which sections of the website you find most interesting and useful.
Strictly Necessary Cookies
Strictly Necessary Cookie should be enabled at all times so that we can save your preferences for cookie settings.
If you disable this cookie, we will not be able to save your preferences. This means that every time you visit this website you will need to enable or disable cookies again.