procedure TGridCxImport.GetDisplayDataSet;
var
  i: integer;
  j: integer;
  k: integer;
  rowInfo: TcxRowInfo;
  fieldName: string;
  col: TcxGridColumn;
  grValues: TcxDataSummaryValues;
  grValue: string;
begin
  fDisplayDataSet.Open;
   for i := 0 to fcxGridTableView.DataController.RowCount - 1 do
   begin
     fDisplayDataSet.Append;
     rowInfo := fcxGridTableView.DataController.GetRowInfo(i);

     for j := 0 to fcxGridTableView.VisibleColumnCount - 1 do
     begin
       col := fcxGridTableView.VisibleColumns[j];
       if col.Visible then
       begin
         if col is TcxGridDBColumn then
           fieldName := TcxGridDBColumn(col).DataBinding.FieldName
         else // col is TcxGridDBBandedColumn
           fieldName := TcxGridDBBandedColumn(col).DataBinding.FieldName;
         k := col.Index;
         if  rowInfo.Level = fcxGridTableView.DataController.Groups.GroupingItemCount then  //Значение из строки данных
           fDisplayDataSet.FieldByName(fieldName).Value := copy(fcxGridTableView.DataController.GetRowDisplayText(rowInfo, k), 1, 250)
         else    //Значение из строки группы
         begin
           // !!!!!!!! Тут нужно получить значение суммы для каждого столбца Col
           fcxGridTableView.DataController.GetGroupValues(rowInfo.RecordIndex, grValues);
           grValue := grValues[k];  // !!!! Тут почему-то массив из одного элемента, название товара
           fDisplayDataSet.FieldByName(fieldName).Value := copy(grValue, 1, 250)
         end
       end;
     end;
     fDisplayDataSet.Post;
   end;
end;