Fórum Atribuir resultado da Query a uma variável #191988
31/10/2003
0
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
Curtir tópico
+ 0Posts
31/10/2003
Fabio.hc
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.
Gostei + 0
31/10/2003
Ana Davis
ACHO Q VAI DAR CERTO SIM !
:wink:
Gostei + 0
02/11/2003
Ana Davis
como converter um tipo double para string ????
Preciso jogar o conteúdo de dias em um edit.
:cry:
Gostei + 0
02/11/2003
Fabio.hc
como converter um tipo double para string ????
Preciso jogar o conteúdo de dias em um edit.
:cry:[/quote:d787f0f130]
Edit1.text:=floattostr(dias);
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)