MaxValue: DateTime;
Свойство MaxValue возвращает максимальное значение типа DateTime.
Sub Main;
Var
d: DateTime;
Begin
d := DateTime.MaxValue;
End Sub Main;
После выполнения примера в переменной «d» будет храниться максимальное значение даты - "31.12.9999".
См. также: