Como saber dia?

Delphi

06/10/2004

Como consigo saber o número de dias restantes para uma data futura?
Ex:
06/10/2004 para 06/12/2004 faltam ´60 dias´.

Obridado!


Jowjow

Jowjow

Curtidas 0

Respostas

Rjun

Rjun

06/10/2004

Utilize a função DaysBetween da unit DateUtils.


GOSTEI 0
Lucas Silva

Lucas Silva

06/10/2004

procedure TForm1.Button1Click(Sender: TObject);
var data: TDateTime;
    dias: Real;
begin
   data  := StrToDate(´01/10/2004´);
   dias := data - date;
   ShowMessage(FloatToStr(Dias));
end;



GOSTEI 0
Jowjow

Jowjow

06/10/2004

Valeu Rjun. Funcionou legal.


GOSTEI 0
POSTAR