cxGird adding footer dynamically

1
2
3
4
5
6
7
    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;
objectpascal
Licensed under CC BY-NC-SA 4.0
记录平时瞎折腾遇到的各种问题, 方便查找
使用 Hugo 构建
主题 Stack 3.29.0Jimmy 设计