Облака / 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.
Все бесплатно
    Все ссылки на файлы, расположенные на страницах сайта, добавлены пользователями и доступны для бесплатного скачивания. За содержание этих файлов администрация сайта ответственности не несет.



Вопросы
  Дата изменения файла
   Категория: Файловая система
  Тpансляция ошибок в BDE
   Категория: Базы данных
  Как соединить несколько файлов в один
   Категория: Текст и строки
  Что значит Paramstr
   Категория: Приложение
  Получить версию программы VersionInfo
   Категория: Приложение
  Сохраняем Bitmap в поле dbase
   Категория: Базы данных
  Как подключить или отключить сетевой диск
   Категория: Интернет и Сети
  Определение размера каталога
   Категория: Файловая система
  Как получить код HTM страницы зная ее URL
   Категория: Интернет и Сети

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

ABCDEFGHIJKLMNOPQRSTUVWXYZ

  << Вернуться  

 Round
function Round ( const Number : Extended ) : Int64;
Функция (Unit System)
Округление чисел с плавающей запятой до целого числа
Описание:
Функция Round округляет число с плавающей запятой (Number) до целого значения.

Округление использует банковские правила, где точная половина значения вызывает округление к четному числу:

12.4 округляется до 12
12.5 округляется до 12
12.6 округляется до 13

13.4 округляется до 13
13.5 округляется до 14
13.6 округляется до 14
Пример кода: Простой пример

begin ShowMessage('Round(12.75) = '+IntToStr(Round(12.75))); ShowMessage('Trunc(12.75) = '+IntToStr(Trunc(12.75))); ShowMessage(' Int(12.75) = '+FloatToStr(Int(12.75))); ShowMessage(' Frac(12.75) = '+FloatToStr(Frac(12.75))); end;

Результат:
Round(12.75) = 13
Trunc(12.75) = 12
Int(12.75) = 12
Frac(12.75) = 0.75
Примечание:
Функция Trunc делает то же самое, но возвращает целое число в Integer значении.

  << Вернуться