One second as a fraction of a day (suitable for TDateTime)
Source position: dateutil.inc line 50
const OneSecond = 1 / SecsPerDay;