以下代码错在哪里? int函数的返回值是Extended类型,不是整型a := 167 div 34;b := 167 mod 34;就可以了。如果想把Extended转化为整型,用Trunc函数就可以了 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 a := 167 div 34;b := 167 mod 34;在DELPHI中Int函数并不是将变量类型强型转换为整数 a:=Trunc(167 div 34);b:=Trunc(167 mod 34);//int()虽然是取整,但返回的类型是实数类型//Trunc()是切尾取整,Round()好象是四舍五入取整 var a,b:integer;begin a:=integer(167 div 34);//或者去掉Integer b:=integer(167 mod 34); edit3.text:=inttostr(a); edit4.text:=inttostr(b);end; 当然div 和 mod 运算的结果都是整数类型就没有必要用取整函数了 :) 拖曳操作的问题 如何在文件夹下做循环读取操作???????????? 中秋快乐~~~~~~~~ query 的 fileter屬性 是不是不支持 in ? 着急!!! 各位,问一下你们平时收集资料(编程方面的)都用怎么软件管理? 动态生成控件问题? 数据库访问的问题 各位仁兄,请看一下我的程序出错在哪里,这个窗口应该如何建立,不胜感激! fastreport可以多列打印,但如何均分为两列?比如共8条记录,两列各打四条记录 在c/s应用程序中,如何动态连接Informix数据库并屏蔽用户名和密码输入的对话框? 我有一个新控件,但以前的老控件占了它的位置,装不上 求教高手
b := 167 mod 34;
在DELPHI中Int函数并不是将变量类型强型转换为整数
b:=Trunc(167 mod 34);
//int()虽然是取整,但返回的类型是实数类型
//Trunc()是切尾取整,Round()好象是四舍五入取整
a,b:integer;
begin
a:=integer(167 div 34);//或者去掉Integer
b:=integer(167 mod 34);
edit3.text:=inttostr(a);
edit4.text:=inttostr(b);
end;