我需要操作浮点型数据! 把变量定义为 real 型!
可是我把几个浮点数相加! 然后在相应的减去着几个浮点数,直到减到0,
可是当它减到最后一个数的时候 ,就不能减了!!(我是用if语句判断最后的剩余数字和要减的数字相不相等!)!!为什么~!怎么解决!v

解决方案 »

  1.   

    偶不太明白你的意思,代码贴出来See!
      

  2.   

    real,后面还有很小的小数,
    MathCategoryArithmetic routinesfunction SameValue(const A, B: Single; Epsilon: Single = 0): Boolean; overload;
    比较的时候用SameValue这个函数比较,不能直接用if 相等,real后面实际还有小数
      

  3.   

    请教,这个函数是delphi的标准函数吗?还有最后一个参数是什么意思啊?
    能否给出使用源码啊?overload什么意思啊,不是重载吧比如现在有A,B两个数
    怎么使用这个函数呢
    var
    bFlag:boolean;
    begin
    bFlag=SameValue(A,B,最后一个参数是比较模式吗?(不懂这个参数怎么用啊)
    if (bFlag) then
    begin
    //相等处理代码
    end
    else
    //不相等时的处理代码
    end;
    =================================
    麻烦解释一下啊