unidbgrid grouping at runtime

[Skepsis IT]

Hi,

I need to create all the columns on a dbgrid dynamically and also have some grouping. Everythings works fine but no grouping.

For example after I create columns dynamically

  for I := 0 to cds.Fields.Count-1 do
  begin
    grdData.Columns.Add;
    grdData.Columns[i].FieldName:=cds.Fields[i].FieldName;
    grdData.Columns[i].Alignment:=cds.Fields[i].Alignment;
    grdData.Columns[i].Sortable:=True;
    .....
  end;
  grdData.Grouping.FieldName:='athletename';
  grdData.Grouping.ShowCaption:=True;
  grdData.Grouping.ShowValue:=True;
  grdData.Grouping.Enabled:=True;
  grdData.DataSource:=Datasource1;
  grdData.Refresh;

 

Anyone have a clue?

Regards

[Skepsis IT]

Nobody....?

[sertatar76]

did you solve the problem? 

[sertatar76]

add source code:

  UniDBGrid1.Grouping.Enabled := True;
  UniDBGrid1.Grouping.FieldName := 'COUNTRY';
  UniDBGrid1.OnColumnSort := UniDBGrid1ColumnSort;

not work.

If in desing add     UniDBGrid1.Grouping.Enabled = True then it`s work.

What should I write in  UniDBGrid1.JSInterface.JSCode(...) ?

 

GridGroup_Test.zip