Trabalhar com duas datas

Delphi

30/08/2016

Boa tarde Pessoal!

Tenho 3 Edits

No Edit1 quero informar uma data (30/08/2016 data de aquisição)
No Edit2 quero informar a data de vencimento ( 25/03/2017)
No Edit3 Quero que apareça a diferença entre as duas datas. Alguem poderia me explicar? ou postar o código?

Desde já agradeço pela colaboração.

Obs. Banco de dados Access.
Mailson Janoca

Mailson Janoca

Curtidas 0

Respostas

Raimundo Pereira

Raimundo Pereira

30/08/2016

Exatamente o que você precisa
adapte de acordo com a sua necessidade
https://www.devmedia.com.br/diferenca-entre-duas-datas/356
GOSTEI 0
Natanael Ferreira

Natanael Ferreira

30/08/2016

Adicione DateUtils na uses do form.

Use a função DaysBetween.

Coloque no o código abaixo no evento OnClick de um button:

Edit3.Text := IntToStr(DaysBetween(StrToDate(Edit1.Text), StrToDate(Edit2.Text)));
GOSTEI 0
POSTAR