Delphi-Help

Описание

function Max ( const A, B : Integer|Int64|Single|Double|Extended ) : Integer|Int64|Single|Double|Extended;

Функция Max возвращает значение наибольшего из двух числовых параметров, A и B.

Эти параметры могут быть любыми из данных числовых типов. Результат будет приведён к соответствующему значению - с плавающей запятой, если какой-либо из параметров число с плавающей запятой.

Пример кода

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

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

Примечание