DaysApart Function
Returns the Number of Days between DT2 and DT1.

Unit
QESBPCSDateTime

Declaration
Function DaysApart(const DT1, DT2: TDateTime): LongInt;

Description
If result is 0 then they are the same Date, if result is negative then DT2 occurs before DT1. Today and yesterday are 1 day apart.

Parameters
DT1 First Date/Time to process.
DT2 Second Date/Time to process.

Category
Date/Time Arithmetic Routines

Implementation

function DaysApart (const DT1, DT2: TDateTime): LongInt;
begin
     Result := Trunc (DT2) - Trunc (DT1);
End;


HTML generated by Time2HELP
http://www.time2help.com