如何将Edit1中的文本内容(小数点后所有的数字都舍去即取整)
代码应如何写?例如:23.632 取整为23
4252.2685 取整为4252
代码应如何写?例如:23.632 取整为23
4252.2685 取整为4252
解决方案 »
- rave报表,如何不显示选择画面直接打印。
- 怎么取得本机当前使用网卡的MAC地址?适用于98/me/2000/xp/2003。。。急。。
- 如何取的机器的 hostid?
- 我是初学者,以前用的是VB,现在想改学DEPHI,请问哪本讲DP7的书比较好些?最好有对现有控件进行介绍的,谢谢
- 如何得到当前产生事件组件的指针?(不用找焦点的方法)
- 热点点击 赶快行动 我在线送分
- ★★★用Toolbar组件制作工具拦的一个问题。■◆■●
- 有经验的高手,关于串口通迅的问题,非常棘手。请各位帮忙瑞
- 散分1500,喜欢练功的过来...
- 要实现远程数据库访问 在NT上需要安装远程访问服务吗?
- Delphi8如何调用c#写的dll?
- listview的一个小问题--初学者请教。
需Trunc是将实型值截取为整型值
i:=StrToDate('2004-1-1');
i:=now;
...
依次show下看看
这个贴子本来想回“晕”的
都可以,但是有区别
trunc直接去处小数部分
round则可以做四舍五入
s := copy(s,1,pos('.',s)-1);
ShowMessage(s);
如果是数 急用 trunc函数
原型:function Int(X: Extended): Extended
例:
ShowMessage(FloatToStr(Int(1.565)));//1,实为1.0