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