关于小数点格式

Question

我想让数字按统一格式显示,有小数的显示两位小数,整数就在后面加上".00'
以前在设计时直接打开数据库，在ADOTable中直接加入了字段，然后可以直接设置字段的DisplayFormat属性为“0.00”，就可以了，例如：在窗口中放一个ADOTable1,加入数据表中的字段price，Delphi即会生成一个ADOTable1price,就可直接设置ADOTable1price.DisplayFormat属性了。
现在在设计时不打开数据库，而是在运行时才打开，好像就不能设置DisplayFormat属性了，哪位大虾知道如何解决，请帮帮忙！！！问题急，在线等待！！！
QQ：40456230
E-mail:[email protected]

Answer 1

try this:
(TFloatField(AdoTable1.FieldByName('Price'))).DisplayFormat := '0.00';

Answer 2

AdoTable1.FieldByName('Price').DisplayFormat := '0.00'

Answer 3

Agree with Rijie(做人真难)
I did it just like that several times

Answer 4

Agree with Rijie(做人真难)
I did it just like that several times

Answer 5

chechy
我现在也是这样做的，能显示,可打印不出来呀！！！
我用的是QuickReport

Answer 6

如果是QuickReport，建议在OnPrint事件中这么写
Value := FormatFloat('0.00', StrToFloat(value));

Answer 7

不用那么麻烦，在运行过程中：
ADOQyery1.Open;
TBCDField(ADOQyery1.FieldByName('Price')).DisplayFormat:='0.00';一切搞定！顺便提醒你：不要在设计阶段将数据源打开，否则你当再次打开时如果数据源无法激活则属性自动修改，最好用代码手动打开数据源！