Gets the values of the day and second from an interval.
procedure GetDaySecond(var Day: integer; var Hour: integer; var Min: integer; var Sec: integer; var FSec: integer);
Call the GetDaySecond procedure to get the values of the day and second from an interval.