Fórum Data #219429

09/03/2004

0

Alguém sabe, como fazer pra subtrair 2 datas e retornar o número de dias entre elas, tipo assim:

ex:
Data 1: 06/03/2004 / Data 2: 09/03/2004

, ..., retornar 3 dias;

No evento onClick de um botão qq, coloquei o seguinte código:

procedure Tform1.Button1Click(Sender: TObject); begin showmessage(datetostr(strtodate(edtData2.Text) - strtodate(edtData1.Text))); end;


Com esse código está retornando 02/01/1900!!! Como fazer para retornar a diferença entre as datas, ou seja, 3 dias?


D4rk_schn31d3r

D4rk_schn31d3r

Responder

Posts

09/03/2004

Skaarj

showmessage(floattostr(strtodate(edit2.text)-strtodate(edit1.text)));


Responder

Gostei + 0

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

Aceitar