begin 
    Memo69.lines.Clear; 
    if   [qryHead."BqCount"]=0   then 
        Memo69.lines.Clear 
    else 
        Memo69.lines.add([qryHead."BqCount"]) 
end 
请大家帮我把这条语句修该为   输出的统计信息能进行 
四舍五入(算术四舍五入不是银行的四舍六入)

解决方案 »

  1.   

    begin   
            Memo69.lines.Clear;   
            if       [qryHead."BqCount"]=0       then   
                    Memo69.lines.Clear   
            else   
                    Memo69.lines.add(inttostr(round([qryHead."BqCount"])))   
    end  
      

  2.   

    都说了 不是银行的四舍六入 ,应该用以下这个!
    FormatFloat('0.00',   StrToFloat(FloatToStr(a)));即可
    begin      
                    Memo69.lines.Clear;      
                    if               [qryHead."BqCount"]=0               then      
                                    Memo69.lines.Clear      
                    else      
                                    Memo69.lines.add(inttostr(FormatFloat('0.00',   StrToFloat(FloatToStr([qryHead."BqCount"])))))      
    end