Справочник функций и процедур Delphi: IsInfinite
  Навигация по первой букве:

A  B  C  D  E  F  G  H  I  J  K  L  M  N  O  P  Q  R  S  T  U  V  W  X  Y  Z
  Навигация по категории:

Compiler directives, Directives, Keywords / Types, Variables, Constants / Functions, Procedures

IsInfinite
Функция		 Проверяет, является ли число с плавающей точкой бесконечным Math unit
  function IsInfinite ( const FloatNumber : Double ) : Boolean;

Delphi Sources

Описание
Функция IsInfinite возвращает True, если значение числа FloatNumber бесконечно.
Похожие команды
Infinity  Значение плавающей запятой бесконечного размера

IsNaN  Выясняет, содержит ли число с плавающей запятой настоящее число

NaN  Не число

  
Пример кода : Присвоение числу Infinity, и затем использование IsInfinite
var
  float : Double;

begin
  // Присвоение бесконечности числу
  float := Infinity;     // Эквивалентно 1.0/0.0

  // Хотя бесконечно, мы всё таки можем отобразить его
  ShowMessage('float = '+FloatToStr(float));

  // И мы можем проверить бесконечно ли оно
  if IsInfinite(float)
  then ShowMessage('float бесконечно')
  else ShowMessage('float = '+FloatToStr(float));
end;
float = INF
float бесконечно