用query对一数据库表进行查询，查询结果用DBGrid如何用四舍五入进行显示。

Question

1）你查询的物理表（QUERY）中设置计算字段，计算方法就是四舍五入。
2）在DBGRID中直接显示。
DELPHI6的四舍五入函数是ROUNDTO（原值，-小数位数）。下次问问题多加些分，这样我们更兴趣些。回答的也更仔细些。用SQL语句先进行计算也中！（更快些）谢谢你的30分先。

Answer 1

设好query的sql后，双击query，在弹出的字段编辑器中加入所有字段，选中你想四舍五入的字段，在属性编辑其中设置其DisplayFormat，如设成：
  #.##
则只显示两位小数；看看帮助。

Answer 2

请问r3(去留无意)
如何动态实现？
即如果我的sql语句是动态添加的呢？

Answer 3

if (Query.FieldByName('Field') is TNumericField) then
  (Query.FieldByName('Field') as TNumericField).DisplayFormat := '0.00';

Answer 4

TO windindance(风舞轻扬) 
我如何动态实现呢？

Answer 5

var
  I: Integer;
begin
  for I := 0 to DBGrid1.Columns.Count - 1 do
    case DBGrid1.Columns[I].Field.DataType of
      ftFloat, ftCurrency, ftBCD:
        TNumericField(DBGrid1.Columns[I].Field).DisplayFormat := '0.00';
    end;
end;

Answer 6

或者在程序中使用FORMATFLOAT，或者设置DBGRID的DISPLAYFORMAT属性