PositiveInfinity: Double;
Свойство PositiveInfinity возвращает значение, эквивалентное положительной бесконечности.
Sub Main;
Var
D:Double;
Begin
D := Double.PositiveInfinity;
End Sub Main;
После выполнения примера в переменной «D» будет содержаться значение, эквивалентное положительной бесконечности, т.е. значение 1.#INF.
См. также: