delphireal数据类型转换为integer

如题怎么把real数据类型的字符转换为integer？delphi不是很熟所以用例子说吧！我想做个real数据之间的运算（+ - * /等）然后在得到结果后我要保存3位小数，有时还要取整数位（不是四舍五入）想知道具体函数和做法

取3位小数，可以使用 FormatFloat('0.000',y) ，y就是real，这样做会四舍五入。如果你不想四舍五入的话，就使用 trunc 先取整数。比如 0.168 想取 0.16 而不是 0.17，就先用0.168乘以100，然后trunc取整，再除以100。 trunc(0.168*100)/100 这样得到的结果就是 0.16了

保留三位小数只要*1000截整再/1000就ok

比如

var

  n: real;

begin

  n := 1.23456789;

  n := trunc(n * 1000) / 1000;

endl.

取整数位直接用函数trunc截取整数部分