标题:[求助]请教int与trunc的问题!!
只看楼主
无敌小胖牛
Rank: 1
等 级:新手上路
帖 子:5
专家分:0
注 册:2007-9-22
 问题点数:0 回复次数:24 
[求助]请教int与trunc的问题!!
各位大师!

有个程序用int就报错,用trunc就没报错。请问是什么原因。

报错的程序
y:=c*d/90000;
if y>int(y) then
N:=int(y)+1
else ----------------------〉报错的地方
N:=int(y);
test5.Text:=inttostr(N);

正常的程序
y:=c*d/90000;
if y>trunc(y) then
N:=trunc(y)+1
else
N:=trunc(y);
test5.Text:=inttostr(N);
搜索更多相关主题的帖子: int trunc 
2007-09-22 14:25
缘吇弹
Rank: 16Rank: 16Rank: 16Rank: 16
来 自:地球
等 级:版主
威 望:43
帖 子:3038
专家分:27
注 册:2007-7-2
得分:0 

delphi里好像没前面那样表达的吧.
我想LZ之前是学VB的.

[此贴子已经被作者于2007-9-22 20:37:56编辑过]


Repeat  Life=Study;Until (death);
2007-09-22 20:19
multiple1902
Rank: 8Rank: 8
等 级:贵宾
威 望:42
帖 子:4881
专家分:671
注 册:2007-2-9
得分:0 
好像符合pascal的语法……
2007-09-22 20:43
无敌小胖牛
Rank: 1
等 级:新手上路
帖 子:5
专家分:0
注 册:2007-9-22
得分:0 
哦?delphi是不是就是类pascal的语言表达方式呢?
2007-09-22 22:09
缘吇弹
Rank: 16Rank: 16Rank: 16Rank: 16
来 自:地球
等 级:版主
威 望:43
帖 子:3038
专家分:27
注 册:2007-7-2
得分:0 
delphi用的就是纯种的pascal语言.

Repeat  Life=Study;Until (death);
2007-09-22 23:33
无敌小胖牛
Rank: 1
等 级:新手上路
帖 子:5
专家分:0
注 册:2007-9-22
得分:0 
请问,我问的问题能否得到您们的解答啊~~~?
2007-09-23 22:16
sky_yang_sky
Rank: 3Rank: 3
等 级:论坛游民
威 望:8
帖 子:481
专家分:16
注 册:2007-5-30
得分:0 
test5.Text:=inttostr(N); 改為test5.Text:=floattostr(N);應可以了


你微笑的面對整個世界,整個世界也將會微笑的面對你。
2007-09-24 16:45
缘吇弹
Rank: 16Rank: 16Rank: 16Rank: 16
来 自:地球
等 级:版主
威 望:43
帖 子:3038
专家分:27
注 册:2007-7-2
得分:0 
以下是引用sky_yang_sky在2007-9-24 16:45:09的发言:
test5.Text:=inttostr(N); 改為test5.Text:=floattostr(N);應可以了

Delphi的语法要求很严格,这种方法不可以.不信你可以试试.

[此贴子已经被作者于2007-10-6 9:35:36编辑过]


Repeat  Life=Study;Until (death);
2007-10-06 09:31
缘吇弹
Rank: 16Rank: 16Rank: 16Rank: 16
来 自:地球
等 级:版主
威 望:43
帖 子:3038
专家分:27
注 册:2007-7-2
得分:0 
以下是引用无敌小胖牛在2007-9-23 22:16:04的发言:
请问,我问的问题能否得到您们的解答啊~~~?

当然可以咯.论坛是交流的地方.

你上边的问题是数据类型转换的问题,学delphi的可不要忘了有一种叫variant的数据类型.

将你上边的 y,N:variant 即可.


Repeat  Life=Study;Until (death);
2007-10-06 09:34
purana
Rank: 16Rank: 16Rank: 16Rank: 16
来 自:广东-广州
等 级:版主
威 望:66
帖 子:6039
专家分:0
注 册:2005-6-17
得分:0 
学vb的也不要忘了有一种叫variant的数据类型

我的msn: myfend@
2007-10-06 09:36



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-172065-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.209684 second(s), 7 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved