Calcular qtd de dias entre duas datas.. Como?

Delphi

07/07/2004

Pessoal, preciso criar um rotina que calcule o número de dias entre a data de vencimento e data base
(data de vencimento menos data base)
ex.
VENCIMENTO - 04-07-2000
DATA BASE - 07-10-1997
resultado 1001

alguem pode me ajudar?


Chas

Chas

Curtidas 0

Respostas

Marcio.theis

Marcio.theis

07/07/2004

Um exemplo seria assim

//
edt.Text:=IntToStr(Round(dtIni.Date - dtFim.date));
//

dtIni e dtFim (componente TDateTimePicker), sendo que você tb pode fazer com campos da base.


GOSTEI 0
Tnaires

Tnaires

07/07/2004

Ou
DaysBetween(Data1, Data2);



GOSTEI 0
Chas

Chas

07/07/2004

valeu pessoal


GOSTEI 0
POSTAR