ESBFloor Function
Returns the Floor of X, ie Integral Value Below.

Unit
QESBPCSMath

Declaration
Function ESBFloor(const X: Extended): Extended;

Parameters
Float to process

Category
Arithmetic Routines for Floats

Implementation

function ESBFloor (const X: Extended): Extended;
begin
     Result := Int (X);
     if Result > X then
          Result := Result - 1.0;
End;


HTML generated by Time2HELP
http://www.time2help.com