保留小数点两位,在线急等.请路过高手指点!!!!!

Question

我在delphi里做运算 如下:
cos(atan(max(num_kvah)-min(num_kvah))/(max(num_kwh)-min(num_kwh)))
结果为0.998765
但是我只要0.99,要求不四舍五入,请问用什么函数解决呢????

Answer 1

呵呵错了，是round(100*0.998765)/100

Answer 2

if cbBldf.Checked=true then
      edtMoney.text:=FormatFloat('0.00',strtoint(edtPurch.text)*
                          qryUser.fieldbyname('PriceValue').ascurrency)
    else
      edtMoney.text:=currtostr(strtoint(edtPurch.text)*
                          qryUser.fieldbyname('PriceValue').ascurrency)
这样应该可以吧

Answer 3

trunc 是不可识别的函数名.

Answer 4

int(0.998765*100)/100  总行了吧！

Answer 5

或者
USE MATH
RoundTo(0.998765,-2)
即可！

Answer 6

晕！！
对不起，上面都写错了！！
Trunc(0.998765*100)/100 ;
或者
Round(0.998765*100-0.5)/100;

Answer 7

用Format吧，我用过的，好使····

Answer 8

fromat(%.2f,[edtPurch.text])；
就ok了！！！

Answer 9

format多好使
trunc就取整了

Answer 10

但是我是直接在delphi里做的运算，用的sql语句cos(atan(max(num_kvah)-min(num_kvah))/(max(num_kwh)-min(num_kwh)))，所以用直接用format就是无法识别的函数．因为sql里没有format函数．