| ESBFloor Function | 
Unit
QESBPCSMath
Declaration
Function ESBFloor(const X: Extended): Extended;
| Parameters | 
| X | Float to process | 
Category
Arithmetic Routines for FloatsImplementation
 
| function ESBFloor (const X: Extended): Extended;
begin
     Result := Int (X);
     if Result > X then
          Result := Result - 1.0;
End; | 
|  |