Облака / Clouds
    Go to Copy.com
    Copy.com
    The bast cloud service
    Get 20 GB free!!!
    Support WebDav.
    Show more >>

    Go to Dropbox.com
    Dropbox.com
    time-tested cloud storage
    Support WebDav.
Все бесплатно
    Все ссылки на файлы, расположенные на страницах сайта, добавлены пользователями и доступны для бесплатного скачивания. За содержание этих файлов администрация сайта ответственности не несет.



Вопросы
  Подсветить часть текста в DBGrid
   Категория: Компоненты
  Число четное или нечетное
   Категория: Математика
  Получить имена всех папок и файлов в директории
   Категория: Файловая система
  Как произвести поиск файлов во вложенных папках
   Категория: Файловая система
  Удалить лишние символы из строки
   Категория: Текст и строки
  Удаление файла в корзину
   Категория: Файловая система
  Как соединить несколько файлов в один
   Категория: Файловая система

Delphi - Справочник: Infinity

ABCDEFGHIJKLMNOPQRSTUVWXYZ

  << Вернуться  

 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

  << Вернуться