Fórum Filtrando Tabelas!! #183295
20/09/2003
0
[color=blue:76dc0b8830]Olá Amigos!!
Peguei um projeto em que é usado o procedimento Filter para realizar filtro por vários campos da tabela. Acontece que sempre trabalhei com Sql para fazer filtros e gostaria de compreender mais sobre esse procedimento existente no Table e tbm na Query.
NrFiltros := 0;
Filtro := ´´;
// Filtro do Nr Banco
If consED1.Text <> ´´ then
begin
If NrFiltros <> 0 then Filtro := Filtro + ´ and ´;
Filtro := Filtro + ´NumeroBanco = ´ + ´´´´ + consED1.Text + ´´´´;
Inc(NrFiltros);
end;
// Filtro da Data Recebimento
If consCheck1.Checked = True then
begin
If NrFiltros <> 0 then Filtro := Filtro + ´ and ´;
Filtro := Filtro + ´DataRecebimento >= ´ + ´´´´ + DatetoStr (consED5.Date) + ´´´´ + ´ and DataRecebimento <= ´ + ´´´´ + DatetoStr(consED6.Date) + ´´´´;
Inc(NrFiltros);
end;
// Monta Filtro
dm.tbLancamentos.Filter := Filtro;
dm.tbLancamentos.Filtered := True;
dm.tbLancamentos.First;
Oq sei é que ele recebe uma String. Pq se usa tantas aspas para separar um argumento do outro!!
Obrigado[/color:76dc0b8830]
Peguei um projeto em que é usado o procedimento Filter para realizar filtro por vários campos da tabela. Acontece que sempre trabalhei com Sql para fazer filtros e gostaria de compreender mais sobre esse procedimento existente no Table e tbm na Query.
NrFiltros := 0;
Filtro := ´´;
// Filtro do Nr Banco
If consED1.Text <> ´´ then
begin
If NrFiltros <> 0 then Filtro := Filtro + ´ and ´;
Filtro := Filtro + ´NumeroBanco = ´ + ´´´´ + consED1.Text + ´´´´;
Inc(NrFiltros);
end;
// Filtro da Data Recebimento
If consCheck1.Checked = True then
begin
If NrFiltros <> 0 then Filtro := Filtro + ´ and ´;
Filtro := Filtro + ´DataRecebimento >= ´ + ´´´´ + DatetoStr (consED5.Date) + ´´´´ + ´ and DataRecebimento <= ´ + ´´´´ + DatetoStr(consED6.Date) + ´´´´;
Inc(NrFiltros);
end;
// Monta Filtro
dm.tbLancamentos.Filter := Filtro;
dm.tbLancamentos.Filtered := True;
dm.tbLancamentos.First;
Oq sei é que ele recebe uma String. Pq se usa tantas aspas para separar um argumento do outro!!
Obrigado[/color:76dc0b8830]
Gviking
Curtir tópico
+ 0
Responder
Posts
21/09/2003
Motta
é a sintaxe , veja no help TClientDataSet.Filter,tem boa documentação (até sobre os outros DataSet´s)
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)