我的目的是想把一个整数integer,把它乘个小数,返回整数部分这么写报错
var i: Integer;
var j: Extended
begin
j:=Int(202*0.32);
// i:=Int(202*0.32);
//showmessage(inttostr(i));
end;
var i: Integer;
var j: Extended
begin
j:=Int(202*0.32);
// i:=Int(202*0.32);
//showmessage(inttostr(i));
end;
解决方案 »
- delphi xe2 怎么实现屏蔽ctrl+alt+del组合键
- 如何监视剪贴板中的jpg并显示呢?
- 求一数据控件
- 大家来帮忙看看!
- D版的同仁们,请大家给点意见,现在转vc,意义大吗?
- 为什么在有些字符串在9X中能够正常显示,但在2000中却只能显示一部分
- 大家觉得delphi6开发人员指南这本书如何?
- 新手求助!!各位高手帮帮忙
- 只要对http://www.csdn.net/expert/topic/205/205637.shtm发表评论,均给10分
- 请问在DBgrid中,如何让焦点移到指定的行与列当中?
- 请问开根号用什么函数
- zzlazio...先给你100分.原贴的要分些给其他跟帖的兄弟.
var j: Extended
begin
j:=Int(202*0.32);
i:=trunc(202*0.32);
showmessage(inttostr(i));
end;