四舍五入在delphi中如何实现 呵呵function Round(X: Extended): Int64; 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 Round是四舍五入Trunc是返回整数部分,如Trunc(1.7)=1呵呵 还又Int,返回是个Realvar R: Real;begin R := Int(123.456); { 123.0 } R := Int(-123.456); { -123.0 }end; 同意Noall的 Edit2.Text:=FormatFloat('#,##0.00',strtofloat(edit1.text)); 求一个线程和主界面的交互的演示代码 最近在学习组件方面的开发,各位推荐几本关于这方面的书或资料啊? 怎样使应用程序全屏显示 我在fastreport中用A3大小设计的,但打印是若是选择A4,就只能打印一部分,怎么才能自适应呢?多谢 ̄ VCL与MFC在标准控件引上有区别吗? 菜鸟问题,在线等 急!在线等待200分~!~!谁做过IC卡的项目,请教如何调用DLL 请问如何改MainMenu的背景色. 如何分割某一格式的文本? Windows2000怎样实现重启和关机? 怎样从4字节的integer变量中获取高字和低字? QRDBText1Print事件为什么没有执行?
Trunc是返回整数部分,如Trunc(1.7)=1
呵呵
begin
R := Int(123.456); { 123.0 }
R := Int(-123.456); { -123.0 }
end;