É meu camarada, vc já deve ter resolvido seu problema, pois as dicas
aqui funcionam. Vai mais uma:
dmPrincipal.cdsDatas.Active := false;
dmPrincipal.SQLQDatas.Active := false;
dmPrincipal.SQLQDatas.SQL.Clear;
dmPrincipal.SQLQDatas.SQL.Add('SELECT Data, Descricao FROM'
+
'DATASCOMEMORATIVAS WHERE Data = ' + DateToStr(DataAtual));
Boa sorte.
Fraterno Abraço.
Carlos
--- Em delphi-br@yahoogrupos.com.br, "Adenes I. Freire Junior"
<[EMAIL PROTECTED]> escreveu
>
> Está dando erro em DataAtual, como faço para fazer essa filtragem
usando uma
> variável?
>
> DataAtual := Calendario.date;
> dmPrincipal.cdsDatas.Active := false;
> dmPrincipal.SQLQDatas.Active := false;
> dmPrincipal.SQLQDatas.SQL.Clear;
> dmPrincipal.SQLQDatas.SQL.Add('SELECT '
> +
> 'Data, ' +
> 'Descricao ' +
> 'FROM ' +
>
'DATASCOMEMORATIVAS ' +
> 'WHERE ' +
> 'Data = DataAtual');
> ----------
>
>
>
> ---
> avast! Antivirus: Outbound message clean.
> Virus Database (VPS): 000755-0, 09/07/2007
> Tested on: 1/1/2007 09:35:55
> avast! - copyright (c) 1988-2007 ALWIL Software.
> http://www.avast.com
>
>
>
>
>
> [As partes desta mensagem que não continham texto foram removidas]
>
