Não querendo ser indelicado com o colega Rodinei... não deveria ser:
a := 'select * from mapafatura where wsunidade='+''''+edit2.text+''''+' and CAMPODATA between :ini and :fim'; dmagenda.adoquerymapadefatura.close; dmagenda.adoquerymapadefatura.sql.clear; dmagenda.adoquerymapadefatura.sql.add( a ); Assim o conteúdo de edit2.text ficaria entre aspas... pois é uma string!!! Acho que faria diferença na hora da substituição no momento da montagem da instrução SQl... Sds Emanuel Couitnho Rodinei (MSN) escreveu: > > a := 'select * from mapafatura where wsunidade='+edit2.text+' and > CAMPODATA between :ini and :fim'; > dmagenda.adoquerymapadefatura.close; > dmagenda.adoquerymapadefatura.sql.clear; > dmagenda.adoquerymapadefatura.sql.add( a ); > > abs e boa sorte > > Rodinei Amorim > Programador Delphi > rodinei_amo...@hotmail.com <mailto:rodinei_amorim%40hotmail.com> > (11) 8208-9503 - (11) 2024-2723 > > From: Sergio - Jundiai / SP > Sent: Sunday, January 04, 2009 10:32 PM > To: delphi-br@yahoogrupos.com.br <mailto:delphi-br%40yahoogrupos.com.br> > Subject: [delphi-br] Filtro > > Alquem poderia me dar uma luz no filto abaixo. > > dmagenda.ADOQueryMapadefatura.active := false; > dmagenda.ADOQueryMapadefatura.sql.clear; > dmagenda.ADOQueryMapadefatura.sql.add ('select * from Mapafatura where > usunidade = edit2.text between :ini and :fim' ); > params.ParamByName('ini').AsDate:= date1.date; > params.ParamByName('fim').AsDate:= date2.date; > dmagenda.ADOQueryMapadefatura.active := true; > > [As partes desta mensagem que não continham texto foram removidas] > > [As partes desta mensagem que não continham texto foram removidas] > >