Разное
Облака / Clouds

The bast cloud service
Get 20 GB free!!!
Support WebDav.
Show more >>

time-tested cloud storage
Support WebDav.
Последние книги
Самое популярное
Все бесплатно
Все ссылки на файлы, расположенные на страницах сайта, добавлены пользователями и доступны для бесплатного скачивания. За содержание этих файлов администрация сайта ответственности не несет.
Навигация
Вопросы
Delphi - Справочник: Infinity
Infinity
|
const Infinity = 1.0 / 0.0; |
Константа (Unit Math)
|
Значение плавающей запятой бесконечного размера
|
Описание:
|
Константа Infinity специальное бесконечное число с плавающей запятой, отмеченная как бесконечная в размере. Она может быть назначена и рассчитана, но для сравнений используйте IsInfinite. |
Пример кода: Иллюстрация использования Infinity
|
var float1, float2 : single; begin float1 := Infinity; float2 := 23; ShowMessage('float1 = '+FloatToStr(float1)); ShowMessage('float2 = '+FloatToStr(float2)); ShowMessage('float1 - float2 = '+FloatToStr(float1 - float2)); ShowMessage('-float1 = '+FloatToStr(-float1)); end;
Результат:
|
float1 = INF float2 = 23 float1 - float2 = INF -float1 = -INF |