очень неудоюно с этими дробями в типе TDateTime... секунда = 1/86400 может как то можно будет сделать опреацию MSToTime или что та вроде этого.. которая превращает милисекунды в класс времени... ато скрипты есть в которых без этого проста не обойтись.. Now+-n
Также обрати внимание, что в Pascal Script округляет результат.
Т.е выражения вида a:=1/1440; в результате получишь целый результат. т.е число a будет равно нулю.
Чтобы получить результат в вещественном виде - надо написать так:
a:=1.0/1440;
тогда Pascal Script поймет, что тебе нужен результат в вещественном виде.