*****************************************************} { } { Delphi VCL Extensions (RX) } { } { Copyright (c) 1996 AO ROSNO } { } {*******************************************************} {$I RX.INC} {$N+
Max -
MaxDateTime -
MaxFloat -
MaxInteger -
MaxOf -
Min -
MinDateTime -
MinFloat -
MinInteger -
MinOf -
SwapInt -
SwapLong -
function Max(A, B: Longint): Longint;
function MaxDateTime(const Values: array of TDateTime): TDateTime;
function MaxFloat(const Values: array of Extended): Extended;
function MaxInteger(const Values: array of Longint): Longint;
function MaxOf(const Values: array of Variant): Variant;
function Min(A, B: Longint): Longint;
function MinDateTime(const Values: array of TDateTime): TDateTime;
function MinFloat(const Values: array of Extended): Extended;
function MinInteger(const Values: array of Longint): Longint;
function MinOf(const Values: array of Variant): Variant;
procedure SwapInt(var Int1, Int2: Integer);
procedure SwapLong(var Int1, Int2: Longint);