如何动态设置cxGrid分组

[JonHua]

cxGrid分组需要手工拖动某列到Group Box 里，如何不需要手工设置分组，可以点击某列就自动设置按该列分组？

[dinoalex]

[Code=Delphi(Pascal)]
procedure TForm1.cxGrid1DBTableView1ColumnHeaderClick(
Sender: TcxGridTableView; AColumn: TcxGridColumn);
begin
AColumn.GroupIndex:= 0;
end;
[/Code]

[wxsan]

[Quote=引用 1 楼 dinoalex 的回复:]
Delphi(Pascal) codeprocedure TForm1.cxGrid1DBTableView1ColumnHeaderClick(
Sender: TcxGridTableView; AColumn: TcxGridColumn);begin
AColumn.GroupIndex:=0;end;
[/Quote]

楼上说的非常正确，AColumn.GroupIndex:= 0 表示按照第一个字段作来分组！