Fórum Atribuir resultado da Query a uma variável #191988

31/10/2003

0

Gente !

Estou tentando atribuir o resultado de uma query a uma variável para fazer uma subtração.
O resultado da query é uma data, mas na tabela está definida como string.
No form eu recebo uma data e vou fazer a subtração para descobrir o intervalo em dias entre as duas datas.
Tipo,
1.Recebo a data do form.
2. Verifico se a data recebida é maior que a data que tenho na tabela. Estou fazendo isso aqui:
IF (edtDataNasc.Text > qryData.Fields[0].Astring) then begin
datamaior := strtodate(edtDataNasc.Text);
datamenor := qryData.Fields[0].AsDateTime;
dias := trunc(datamaior - datamenor);
END;

datamaior e datamenor são TDate.
dias é integer.

Se não ficou claro, posso tentar explicar melhor.
Quem puder me ajudar...

:shock:
Ana Davis


Ana Davis

Ana Davis

Responder

Posts

31/10/2003

Fabio.hc

Para vc fazer o IF tem que converter para data:

Tente assim:
datamaior := strtodate(edtDataNasc.Text); 
datamenor := strtodate(qryData.Fields[0].Astring); 

IF (datamaior > datamenor ) then begin 
   dias := (datamaior - datamenor); 
END; 


datamaior e datamenor são TDate.
dias é double.


Responder

Gostei + 0

31/10/2003

Ana Davis

VALEU FABIO, VOU TENTAR...
ACHO Q VAI DAR CERTO SIM !
:wink:


Responder

Gostei + 0

02/11/2003

Ana Davis

Agora minha dúvida é:

como converter um tipo double para string ????
Preciso jogar o conteúdo de dias em um edit.


:cry:


Responder

Gostei + 0

02/11/2003

Fabio.hc

[quote:d787f0f130=´Ana Davis´]Agora minha dúvida é:

como converter um tipo double para string ????
Preciso jogar o conteúdo de dias em um edit.


:cry:[/quote:d787f0f130]

Edit1.text:=floattostr(dias);



Responder

Gostei + 0

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

Aceitar