我数据集里的SQL语句:
SELECT sum(SJB1.test) test, SJB1.ZD1
FROM SJB1
GROUP BY SJB1.ZD1
需要做如下修改:
需要在数据集的 OnGetFieldText 事件里写如下代码:
procedure TYWXX2.DataSetBZSJJ1GetFieldText(DataSet: TDataSet; Field: TDataField; var Text: string; DisplayText: Boolean);
begin
if Field.FieldName='test' then
Text := SysUtils.Format('%.2f', [Field.AsFloat]);
end;