在BDE中把Enabled BCD设为True
解决方案 »
- Delphi DLL 的问题啊?急啊~~~!@!
- 【开源项目】数据库连接配置管理组件ConnectionManager V2.1
- DBCHART MouseMove 取X轴日期类型数值问题
- 编译有这种提示,什么原因???
- 超级菜问:关于函数调用格式。如何实现点击button时调用另一个button的click函数。
- 求救!原代码下载!
- 怎样通过局域网进行数据通讯
- 请潍坊华光照排公司的朋友,留下QQ号交流.
- 请问高手,一个文档和数据库的问题
- 如何在QRPreview的表單中實現動態改變報表的邊界寬度﹖
- 求助,在简体98上开发的软件要用于繁体98,该如何是好?有何解决方案?
- Download kylix 1.0 now!!!
如果是Sql server 可
decimal (18,2)
Table.Open;
TNumericField(Table.FieldByName('Price')).DisplayFormat:='0.00';
即可。
var a:double;a:=1.23456789;
a:=StrToFloat(FormatFloat('#.##',a); // 这时 a=1.23;
table1.Fieldbyname('fieldname').asfloat:=a;
字段名 字段类型
Price N
var a:double;
s:String;a:=1.23456789;
s:=FormatFloat('#.##',a); // 这时 s='1.23';
table1.Fieldbyname('fieldname').asstring:=s; // 写入;s:= table1.Fieldbyname('fieldname').asstring // 读出, s='1.23' ;
a:=StrToFloat(s); // a=1.23 ;