【搞定】用代码动态创建统计字段**

kmtaoyufei

如题。
代码如下：

procedure TMainForm.BizFormShow(Sender: TObject);
begin
// DataSetBroker1.DataSet.Close;
  //DataSetBroker2.DataSet.Open;
  test;
end;

procedure TMainForm.test;
var
  lBizField: TBizField;
begin

  lBizField := TExprCalcField.Create(TBizDataSet(DataSetBroker1.DataSet));  //创建计算字段
  lBizField.DataSet := TBizDataSet(DataSetBroker1.DataSet);
  lBizField.ID := 'Total';
  lBizField.DataType := TDataType.dtFloat;
  lBizField.Size := 0;
  lBizField.DisplayName := 'Total';
  TExprCalcField(lBizField).Expression.Text := 'Max(KCSL)';
end;

procedure TMainForm.Button1Click(Sender: TObject);
var
  i:integer;
begin
//DataSetBroker1.DataSet.Refresh;
  DataSetBroker1.DataSet.Close;
  DataSetBroker1.DataSet.Open;
//Dialogs.ShowMessage(SysUtils.FloatTostr(DataSetBroker1.DataSet.FieldByName('Total').AsFloat));
end;

点击button按钮，错误提示如下：
---------------------------
X3 Studio
---------------------------
运行物资存储的时候发生异常：符号“Max(KCSL)”没有定义。

类型：EExpr。
---------------------------
确定   
---------------------------

kmtaoyufei

帮忙顶一下吗。

jiahaiminghr

楼主，TExprCalcField是表达式计算字段，
统计字段是TAggField

jiahaiminghr

楼主，还有问题吗？
没有就结贴了