Eu normalmento faço tudo numa string composta assim:
Select .............
WHERE  C.PEFECTIVO Is Null '+
      ' And (Q.Seq_Int=:Seq_Int) And '+
      ' Q.DatPaga BETWEEN Cast("'+ wDataInicio.Text +'" As Date) '+
      ' And  Cast("'+ wDataFinal.Text +'" As Date) '+
      ' Order by Q.Seq_Int, Q.DatPaga '


e até hoje não falhou. Experimente assim:


wStm := 'Where Campo_Data =: cast("'+WData+'"as Date)'


AdoQuery.SQL.Add(wStm);

Cumprimentos

Mário

-----Original Message-----
From: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
On Behalf Of Wroger
Sent: segunda-feira, 16 de Janeiro de 2006 17:15
To: delphi-br@yahoogrupos.com.br
Subject: [delphi-br] Passando Parâmetro para Query em Tempo de EXECUÇÃO.

Alguém sabe como faço para que o Parâmetro
passado para esta Query,
seja reconhecido em Tempo de Execução ??

Var wStm: String;

Begin

AdoQuery.Close;
AdoQuery.SQL.Clear;
AdoQuery.SQL.Add('Select * from CLIENTES');




AdoQuery.SQL.Add('where data =:wData);

AdoQuery.Parameters.ParamByName('wData').Value   := '01/01/2006';
AdoQuery.Open;

End ;

Obrigado.
[ ]'s
Roger.


        

        
                
_______________________________________________________ 
Yahoo! doce lar. Faça do Yahoo! sua homepage. 
http://br.yahoo.com/homepageset.html 



-- 
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>


 
Links do Yahoo! Grupos




 





-- 
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>

<*> Para ver as mensagens antigas, acesse:
    http://br.groups.yahoo.com/group/delphi-br/messages

<*> Para falar com o moderador, envie um e-mail para:
    [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

<*> Para visitar o site do seu grupo na web, acesse:
    http://br.groups.yahoo.com/group/delphi-br/

<*> Para sair deste grupo, envie um e-mail para:
    [EMAIL PROTECTED]

<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
    http://br.yahoo.com/info/utos.html

 



Responder a