导航:
论坛 -> DELPHI技术
斑竹:liumazi,sephil
作者:
2003/11/23 1:25:59
标题:
加入我的收藏
楼主:
是这样的,在DELPHI中,怎样定义数组的属性,可以使,数组内的数在显示出来时是有限的小数位数,定义为什么类型?? 比如我要使它计算结果显示为12.12 我应该怎么定义?? 谢谢啦 我刚开始学。。。。
----------------------------------------------
-
作者:
2003/11/23 6:54:35
1楼:
real就行了,显示的时候用format()就行了。
----------------------------------------------
-
作者:
2003/11/23 10:35:24
2楼:
我用了REAL 啦,可是还是么有办法只显示两位小数啊,怎么办??请大家帮忙啊,,,, 还有,DELPHI里定义数据有几种基本类型呢?? 我找的书里讲的不太清楚。 谢谢啦
----------------------------------------------
-
作者:
bios (阿贡)
★☆☆☆☆
-
盒子中级会员
2003/11/23 10:59:10
3楼:
strtofloatdef('12345.12345', 0)//控制小数点 请多看DELPHI的帮助
此帖子包含附件: 大小: 70.8K
----------------------------------------------
作者:
2003/11/23 11:00:26
3楼:
format('%.2f',[a])
----------------------------------------------
-
作者:
bios (阿贡)
★☆☆☆☆
-
盒子中级会员
2003/11/23 11:03:50
4楼:
T
此帖子包含附件: 大小: 69.5K
----------------------------------------------
作者:
2003/11/23 11:32:19
5楼:
谢谢啦。。。 非常感谢!!
----------------------------------------------
-
作者:
2003/11/23 11:38:27
6楼:
可是,如果,我的这个结果要在LISTBOX里显示,我应该怎么修改呢?? 比如原来我是这么显示的listbox3.items.add(x); 那现在我应该怎么改动呢?? 谢谢!
----------------------------------------------
-
作者:
2003/11/23 11:46:27
7楼:
listbox3.items.add(format('%.2f',[x]))
----------------------------------------------
-
作者:
2003/11/23 13:38:43
8楼:
请各位再指导一下 还是不行啊 老提示错误。。 谢谢
----------------------------------------------
-
作者:
2003/11/23 13:50:06
10楼:
format '%.2f' invalid or incompatible with argument.
----------------------------------------------
-
作者:
2003/11/23 14:03:44
11楼:
怎样?? 请帮忙一下
----------------------------------------------
-
作者:
bios (阿贡)
★☆☆☆☆
-
盒子中级会员
2003/11/23 14:15:26
12楼:
var f1,f2,f3:extended; begin f1:=StrToFloatDef('12.567',2); f2:=StrToFloatDef('57.123',2); f3:=f1+f2; edit1.Text :=floattostr(f3); edit2.Text :=Format('%2.2f',[f3]); end;
----------------------------------------------
作者:
2003/11/23 14:30:46
13楼:
出现那个错误的原因是你后面的x的类型不对。你再确定下他是不是real的啊? 另外StrToFloatDef的作用主要是进行convert。当convert不成功时。返回第二个参数的值。 比如StrToFloatDef('12.567x',2.0)。由于'12.567x'不能被convert。所以就返回后面的2.0。这个你可以试下。 StrToFloatDef的定义如下: function StrToFloatDef(const S: string; const Default: Extended): Extended; begin if not TextToFloat(PChar(S), Result, fvExtended) then Result := Default; end;
----------------------------------------------
-