Клуб программистов

    Delphi функция Abs возвращает абсолютную величину отрицательного или положительного числа (модуль). Это реализуется удалением отрицательного знака, если такой обнаружен.

    Число может быть любым числовым типом, также может быть Variant, он будет преобразован в число. Например, Variant строка - '-1.23' . Abs всегда преобразовывает Variant в Extended.

    Abs может использоваться для "Экстремальных" величин. Например, бесконечность (смотри пример). Функция Abs просто удаляет отрицательный знак и -INF становится INF.

var
   float, bigFloat : single;
   int : Integer;
   varVar : Variant;
begin
   float := -1.5; // Small negative floating point number
   bigFloat := -4.56E100; // Infinite negative floating point number
   int := -7; // Negative integer
   varVar := '-98'; // Variants are converted to floating point!

   ShowMessage('Abs(float) = '+FloatToStr(Abs(float)));
   ShowMessage('Abs(bigFloat) = '+FloatToStr(Abs(bigFloat)));
   ShowMessage('Abs(int) = '+FloatToStr(Abs(int)));

   // Variants are converted into Extended floating types
   float := Abs(varVar);
   ShowMessage('Abs(varVar) = '+FloatToStr(float));
end;

Abs(float) = 1.5
Abs(bigFloat) = INF
Abs(int) = 7
Abs(varVar) = 98