[Overview][Constants][Procedures and functions][Index] |
Calculate the approximate number of minutes between two TDateTime values.
Source position: dateutil.inc line 289
function MinuteSpan( |
const ANow: TDateTime; |
const AThen: TDateTime |
):Double; |
ANow |
|
First moment in time |
AThen |
|
Second moment in time |
Number (fractions included) of minutes between ANow and AThen
MinuteSpan returns the number of minutes between ANow and AThen, including any fractional parts of a minute.
|
Calculate the approximate number of years between two TDateTime values. |
|
|
Calculate the approximate number of months between two TDateTime values. |
|
|
Calculate the approximate number of weeks between two TDateTime values. |
|
|
Calculate the approximate number of days between two TDateTime values. |
|
|
Calculate the approximate number of hours between two TDateTime values. |
|
|
Calculate the approximate number of seconds between two TDateTime values. |
|
|
Calculate the approximate number of milliseconds between two TDateTime values. |
|
|
Calculate the number of whole minutes between two TDateTime values. |
Program Example68; { This program demonstrates the MinuteSpan function } Uses SysUtils,DateUtils; Procedure Test(ANow,AThen : TDateTime); begin Write('Number of minutes between '); Write(TimeToStr(AThen),' and ',TimeToStr(ANow)); Writeln(' : ',MinuteSpan(ANow,AThen)); end; Var D1,D2 : TDateTime; Begin D1:=Now; D2:=D1-(59*OneSecond); Test(D1,D2); D2:=D1-(61*OneSecond); Test(D1,D2); D2:=D1-(122*OneSecond); Test(D1,D2); D2:=D1-(306*OneSecond); Test(D1,D2); D2:=D1-(5.4*OneMinute); Test(D1,D2); D2:=D1-(2.5*OneMinute); Test(D1,D2); End.