Restar dos fechas en delphi

[[nlsgarcia]]

jeremiselxi,

Empezado por jeremiselxi

...Restar dos fechas en Delphi 2009...

Revisa este código:

Código Delphi [-]
...
uses DateUtils;
...
var
  fromdate, toDate : TDateTime;

begin
  // Set up our date variables
  fromDate := EncodeDateTime(2000, 02, 26, 10, 0, 0, 0);
  toDate   := EncodeDateTime(2000, 02, 29,  9, 0, 0, 0);

  // Display these dates and the days between them
  ShowMessage('From date = '+DateTimeToStr(fromDate));
  ShowMessage('To   date = '+DateTimeToStr(toDate));
  ShowMessage('Whole days difference = '+
              IntToStr(DaysBetween(toDate, fromDate))+' days');
end;
...

Tomado de DaysBetween

Revisa esta información:

Dates and Times

Espero sea útil

Nelson.