Ajuda com Filtro

21/05/2003

0

Olá, pessoal
Código abaixo está dando erro, ele fala que o Data Set não suporta a aritimetica. Mas quando coloco o valor da string dentro, Ex: Table1.Filter := ´Data_Pagamento = Null AND Data_Vencimento <= 01/01/04´ ele aceita normal. Obs: não posso fazer este código em SQL, pois, é um trabalho de escola e o professor ensinou até aí.

procedure TQRVENDVencidas.Table1BeforeOpen(DataSet: TDataSet);
var
inp : String;
begin
inp := InputBox(´Data de Vencimento´,´Digite a Data´,´´);
Table1.Filter := ´Data_Pagamento = Null AND Data_Vencimento <= ´ + inp;
end;

Se alguém já teve o mesmo problema, me ajudem.

Obrigado

Marcelo Pomarolli


Pomarolli

Pomarolli

Responder

Assista grátis a nossa aula inaugural

Assitir aula

Saiba por que programar é uma questão de
sobrevivência e como aprender sem riscos

Assistir agora

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar