date in delphi

[p87]

Potrebbe risultare più comodo utilizzare la funzione:
DaysBetween(primaData, secondaData);