Delphi中返回大于或等于指定数值的最小整数

程序中，一般处理小数取整的解决方法都是四舍五入，即使用RoundTo这样的方法；

今天遇到这样的情况，数值如果有小数则进一，如：2.593 -> 3    3.001 -> 4      1.000 -> 1

Delphi中可以使用 Ceil 函数，属于Math单元的函数

　　　　function Ceil(const X: Extended):Integer;

如果数值是数据库中查询出来的，则可以在SQL语句中使用Ceiling函数，返回大于或等于指定数值的最小整数，http://msdn.microsoft.com/zh-cn/library/ms189818(v=SQL.100).aspx