Delphi Programming RTL Reference|By Category|Alphabetically|By Unit
function DaysBetween(const ANow, AThen: TDateTime): Integer;
Gives the number of whole days between two specified dates.
Function counts only whole days. What this means is that it will return 0 as the result for difference between 05/01/2003 23:59:59 and 05/01/2003 23:59:58 - where the actual difference is one *whole* day minus 1 second.
var dtNow, dtBirth : TDateTime;
DaysFromBirth : integer;
dtNow := Now;
dtBirth := EncodeDate(1973, 1, 29);
DaysFromBirth := DaysBetween(dtNow, dtBirth);
ShowMessage('Zarko Gajic "exists" ' +
IntToStr(DaysFromBirth) + ' whole days!');
|
EncodeDate, IncMonth, Now, DaySpan, WithinPastDays
| Free Delphi code snippet inside every Delphi Newsletter! |
|
|
| Got some code to share? Got a question? Need some help? |
|
|
