DELPHI盒子
!实时搜索: 盒子论坛 | 注册用户 | 修改信息 | 退出
检举帖 | 全文检索 | 关闭广告 | 捐赠
技术论坛
 用户名
 密  码
自动登陆(30天有效)
忘了密码
≡技术区≡
DELPHI技术
lazarus/fpc/Free Pascal
移动应用开发
Web应用开发
数据库专区
报表专区
网络通讯
开源项目
论坛精华贴
≡发布区≡
发布代码
发布控件
文档资料
经典工具
≡事务区≡
网站意见
盒子之家
招聘应聘
信息交换
论坛信息
最新加入: eyang11
今日帖子: 1
在线用户: 5
导航: 论坛 -> DELPHI技术 斑竹:liumazi,sephil  
作者:
男 arikasendoh (dd) ★☆☆☆☆ -
普通会员
2003/11/23 1:25:59
标题:
我是菜鸟,问题请教大侠! 浏览:3308
加入我的收藏
楼主: 是这样的,在DELPHI中,怎样定义数组的属性,可以使,数组内的数在显示出来时是有限的小数位数,定义为什么类型??
比如我要使它计算结果显示为12.12
我应该怎么定义??
谢谢啦
我刚开始学。。。。
----------------------------------------------
-
作者:
男 test006 ( ) ★☆☆☆☆ -
普通会员
2003/11/23 6:54:35
1楼: real就行了,显示的时候用format()就行了。
----------------------------------------------
-
作者:
男 arikasendoh (dd) ★☆☆☆☆ -
普通会员
2003/11/23 10:35:24
2楼: 我用了REAL 啦,可是还是么有办法只显示两位小数啊,怎么办??请大家帮忙啊,,,,

还有,DELPHI里定义数据有几种基本类型呢??
我找的书里讲的不太清楚。

谢谢啦
----------------------------------------------
-
作者:
男 bios (阿贡) ★☆☆☆☆ -
盒子中级会员
2003/11/23 10:59:10
3楼: strtofloatdef('12345.12345', 0)//控制小数点

请多看DELPHI的帮助
此帖子包含附件:
JPEG 图像
大小:70.8K
----------------------------------------------
按此在新窗口浏览图片
按此在新窗口浏览图片
作者:
男 kingking (kk) ★☆☆☆☆ -
普通会员
2003/11/23 11:00:26
3楼: format('%.2f',[a])
----------------------------------------------
-
作者:
男 bios (阿贡) ★☆☆☆☆ -
盒子中级会员
2003/11/23 11:03:50
4楼: T
此帖子包含附件:
JPEG 图像
大小:69.5K
----------------------------------------------
按此在新窗口浏览图片
按此在新窗口浏览图片
作者:
男 arikasendoh (dd) ★☆☆☆☆ -
普通会员
2003/11/23 11:32:19
5楼: 谢谢啦。。。
非常感谢!!
----------------------------------------------
-
作者:
男 arikasendoh (dd) ★☆☆☆☆ -
普通会员
2003/11/23 11:38:27
6楼: 可是,如果,我的这个结果要在LISTBOX里显示,我应该怎么修改呢??
比如原来我是这么显示的listbox3.items.add(x);
那现在我应该怎么改动呢??
谢谢!
----------------------------------------------
-
作者:
男 kingking (kk) ★☆☆☆☆ -
普通会员
2003/11/23 11:46:27
7楼: listbox3.items.add(format('%.2f',[x]))
----------------------------------------------
-
作者:
男 arikasendoh (dd) ★☆☆☆☆ -
普通会员
2003/11/23 13:38:43
8楼: 请各位再指导一下
还是不行啊
老提示错误。。

谢谢
----------------------------------------------
-
作者:
男 arikasendoh (dd) ★☆☆☆☆ -
普通会员
2003/11/23 13:50:06
10楼: format '%.2f' invalid or incompatible with argument.
----------------------------------------------
-
作者:
男 arikasendoh (dd) ★☆☆☆☆ -
普通会员
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;
----------------------------------------------
按此在新窗口浏览图片
按此在新窗口浏览图片
作者:
男 kingking (kk) ★☆☆☆☆ -
普通会员
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;
----------------------------------------------
-
信息
登陆以后才能回复
Copyright © 2CCC.Com 盒子论坛 v3.0.1 版权所有 页面执行93.75毫秒 RSS