cxGird adding footer dynamically

Dec 24, 2016 22:19 · 21 words · 1 minute read

    if dbgehMainDBTableView1.DataController.DataSet.Fields[i].DataType = ftFloat then
    begin
      cxGridDBTableSummaryItem := dbgehMainDBTableView1.DataController.Summary.FooterSummaryItems.Add as TcxGridDBTableSummaryItem;
      cxGridDBTableSummaryItem.Column := dbgehMainDBTableView1.columns[i];
      cxGridDBTableSummaryItem.FieldName := dbgehMainDBTableView1.DataController.DataSet.Fields[i].DisplayName;
      cxGridDBTableSummaryItem.Kind := skSum;
    end;