Important: The information in this document is obsolete and should not be used for new development.
LongDateToSeconds
You can use theLongDateToSecondsprocedure to convert a date and time to the number of seconds elapsed since midnight, January 1, 1904.
PROCEDURE LongDateToSeconds (lDate: LongDateRec; VAR lSecs: LongDateTime);
lDate- The long date-time record containing the date and time to convert.
lSecs- On return, the number of seconds elapsed since midnight, January 1, 1904, and the time specified in the
lDateparameter.DESCRIPTION
TheLongDateToSecondsprocedure converts the representation of the date-time information from a date and time, specified in thelDateparameter, to the number of seconds elapsed since midnight, January 1, 1904. The number of seconds are returned as a long date-time value in thelSecsparameter. For example, specifying the date and time 5:50 A.M. on June 13, 1990 results in 41627 being returned in thelSecsparameter.The
LongDateToSecondsprocedure is also available as theLongDate2Secsprocedure.SEE ALSO
To learn more about the long date-time value, see page 4-25. For more information on the long date-time record, see page 4-26.