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