Разное
Облака / Clouds
The bast cloud service
Get 20 GB free!!!
Support WebDav.
Show more >>
time-tested cloud storage
Support WebDav.
Последние книги
Самое популярное
Все бесплатно
Все ссылки на файлы, расположенные на страницах сайта, добавлены пользователями и доступны для бесплатного скачивания. За содержание этих файлов администрация сайта ответственности не несет.
Навигация
Вопросы
BDE. Расположение БД по псевдониму
Категория: Базы данных
Категория: Базы данных
Компонент SpeedButton
Категория: Компоненты
Категория: Компоненты
Процедуры и функции для рабты с файлами
Категория: Файловая система
Категория: Файловая система
Округление времени до 5 мин
Категория: Базы данных
Категория: Базы данных
Удалить свой же exe-шник
Категория: Приложение
Категория: Приложение
Компоненты TrackBar и ScrollBar
Категория: Компоненты
Категория: Компоненты
Listbox - элементы вверх-вниз
Категория: Компоненты
Категория: Компоненты
Вычисление интеграла с заданной точностью алгоритмом Симпсона.
Категория: Математика
Категория: Математика
Удалить лишние символы из строки
Категория: Текст и строки
Категория: Текст и строки
Удаление файла в корзину
Категория: Файловая система
Категория: Файловая система
Delphi - Справочник: Max
Max
|
function Max ( const A, B : Integer|Int64|Single|Double|Extended ) : Integer|Int64|Single|Double|Extended; |
Функция (Unit Math)
|
Выдает максимальное число из двух целых значений
|
Описание:
|
Функция Max возвращает значение наибольшего из двух числовых параметров, A и B. Эти параметры могут быть любыми из данных числовых типов. Результат будет приведён к соответствующему значению - с плавающей запятой, если какой-либо из параметров число с плавающей запятой. |
Пример кода: Пример
|
Пример кода : Иллюстрация использования Max с Integer var int1, int2, int3 : Integer; begin int1 := 37; int2 := 38; int3 := Max(int1, int2); ShowMessage('int1 = '+IntToStr(int1)); ShowMessage('int2 = '+IntToStr(int2)); ShowMessage('Max(int1, int2) = '+IntToStr(int3)); end; //int1 = 37 //int2 = 38 //Max(int1, int2) = 38 //Пример кода : Иллюстрация Max с смешанными типами чисел var int1 : Integer; float1 : single; begin int1 := 37; float1 := 37.5; float1 := Max(float1, int1); ShowMessage('Max(float1, int1) = '+FloatToStr(float1)); end; //Max(float1, int1) = 37.5
Результат:
|
int1 = 37 int2 = 38 Max(int1, int2) = 38 Max(float1, int1) = 37.5 |