Important: The information in this document is obsolete and should not be used for new development.
GetDateTime
You can use theGetDateTimeprocedure to obtain the current date-time information, expressed as the number of seconds elapsed since midnight, January 1, 1904.
PROCEDURE GetDateTime (VAR secs: LongInt);
secs- On return, the number of seconds elapsed since midnight, January 1, 1904.
DESCRIPTION
TheGetDateTimeprocedure returns in thesecsparameter the number of seconds elapsed since midnight, January 1, 1904.The low-memory copy of the date and time information (expressed as the number of seconds elapsed since midnight, January 1, 1904) is also accessible through the global variable
Time.SEE ALSO
For an example that uses theGetDateTimeprocedure to get the current date and time, see Listing 4-1 on page 4-10.