Tentou assim

 

Var

  Filtro: String;

Begin

  Filtro := cds.Filter;

 

cdsFilter := Filtro + ‘ novo filtro ‘;

 

 

 

  _____  

De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em
nome de jccj2...@ymail.com
Enviada em: terça-feira, 30 de junho de 2009 21:26
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Filtrar após já ter filtrado

 






Olá...Pessoal
Alguém poderia me ajudar,como consigo criar uma rotina para filtrar um
ClientDataSet e mostrar em um DBGrid,e logo depois de ter filtrado ,filtrar
mais uma vez(só que agora com dados que estão no DBGrid, ou seja filtrar
mais de uma vez sem perder o primeiro filtro)
Obs:o primeiro filtro já fiz,abaixo segue o código do primeiro filtro.

procedure TForm1.BtnPesquisarClick(Sender: TObject);
begin
ClientDataSet1.FilterOptions:=[focaseinsensitive];
ClientDataSet1.Filter:='Nome like'+QuotedStr(Edit1.Text + '%');
ClientDataSet1.Filtered:=True;
end;



Verificado por AVG - www.avgbrasil.com.br
Versão: 8.5.375 / Banco de dados de vírus: 270.12.94/2208 - Data de
Lançamento: 06/29/09 05:54:00




[As partes desta mensagem que não continham texto foram removidas]

Responder a