纯粹表格的展现方式很难看出数据内在的结构,通过分组可以更清晰的看出内容,比如:
按方案显示的结果:
按项目显示:
涉及表格栏位的分组、显示、分组框、分组汇总等内容,以下为代码:
procedure TForm1.SetGridGroup(AGroupFields: array of string; ASumFields: array of string);
var
i, j: Integer;
item: TcxGridTableSummaryItem;
begin
tv1.OptionsView.GroupByBox := True;
tv1.OptionsView.GroupFooters:= gfVisibleWhenExpanded;
for i := 0 to tv1.ColumnCount - 1 do
begin // 全部取消分组
if tv1.Columns[i].GroupIndex > -1 then
begin