财务软件版1楼: 如何删除小数点两位后数字,而不四舍五入？
谢谢!

2楼: strtoint(copy(floattostr(10.23),0,length(floattostr(10.23))-3)) 如饭店管理软件下载

3楼: 不太明白，是删除两位后的数字？还是删除最后两位数字？
用Trunc()就不会四舍五入，直接保留整数部分

4楼: strtoint(copy(floattostr(10.235210),0,indexof(floattostr(＇＇10.235210＇＇),＇＇.＇＇)+3))=10.23

5楼: 恩,回去试试看呢,比如0.7或0.71,要补成0.700和0.710不晓得怎么办哇!

6楼: uses
Math;

var
floatValue: Real;

1. Floor(floatValue * 100) / 100
2. Trunc(floatValue * 100) / 100

财务软件版7楼: 无头骑士的也回去试试看的.
谢谢!

8楼: 比如0.7或0.71,要补成0.700和0.710不晓得怎么办哇!
Format(＇＇%.3f＇＇, [0.71]);

9楼: Format(＇＇%.3f＇＇,[Num]);一个就够了。
Format格式化函数。
%.3f:指后面是3为前面没有，所以不写。
Num：为Double类型。
如果不会，参考delphi的Format及FormatString解释。

10楼: gear1023:
Floor和有Trunc有什么具体的区别呢？

11楼: 谢谢以上几位,给分太少啊

12楼: 最直观的：

Floor(-10.9)=-11
Trunc(-10.9)=-10
正数情况一样
另外要想使用Floor需要引用Math单元 如进销存财务软件

13楼: 一人5分吧,不好意思了啊!