关于货币类型问题,在Edit文本框中怎么才可以显示成货币形式:

Question

关于货币类型问题,在Edit文本框中怎么才可以把从数据库读出货币数据显示成如下形式:
例如￥600,000,000.00
还有输入的时候怎么将文本框中的转换为ACCESS数据库中的货币类型.输入的时候文本框也是这种形式￥600,000,000.00

Answer 1

使用DBEdit与货币字段相关联，将此字段设置为货币，设置固定字段的显示和编辑格式：
  dataSetField1.DisplayFormat:='#,##0.00';
  dataSetField2.EditFormat:='#,##0.00';

Answer 2

1、var
     currMoney:Currency;
   begin
     currMoney := 12345.6789;
     Text1.Text := FormatFloat('￥#,##0.0000',currMoney);
   end;
2、自己写一个或者找一个控件，没有直接的方法，TMaskEdit控件无法实现你要的
   功能。至于字符串转换成货币类型用函数StrToCurr(str)即可。

Answer 3

楼上实现了从数据库中读取到EDit中,但是读到DBGrild.colums[n]中,怎么定义呢?
还有这个Edit如何定义默认输入格式呢?即添加记录时Edit中显示:￥后面只能输入数字,而且每3位会自动加入一个逗号.
还有3楼的我没想这样做,我是想运行时先把数据读到DBGrild中,选中那条记录,那条记录才显示在Edit中的.你的我还不知道怎么实现.