level 3
delphi 7 求逢分进角的写法如 1.22怎么转换成1.30
2014年03月20日 11点03分
1
level 11
这个问题不应该很麻烦吧,调用Math库的RoundTo函数就可以解决,如下代码:
function GetTrunc(AValue : Real):Real;
begin
Result := RoundTo(AValue+0.04,-1);
end;
2014年03月20日 16点03分
5
成功了,一时没想到这一块,谢谢了。
2014年03月21日 03点03分