小数格式：

1、 FloatToStrF(list.Items[i].Distance / 1000,ffFixed,12,2);
2、FormatFloat('0.00',aResult.MILEAGE/1000); //本人喜欢这个会四舍五入的。

formatfloat('0', strtofloat(diff))

3、 Format('%.2f',[item.Mileage / 1000]);
fileName := Format('%s_%s.csv',[item.RegNo , FormatDateTime('yyyy-MM-dd', date)]);