Pivot Dimensions

var
  Summary: TSummary;
  GroupBy: TGroupBy;
begin
  Summary := TSummary.Create(nil);
  try
    // Add from data item
    GroupBy := Summary.AddGroupBy(Data['Category']);
    
    // Add from expression
    GroupBy := Summary.AddGroupBy(Year(Data['Date']));
  finally
    Summary.Free;
  end;
end;

type
  TGroupByLayout = (Automatic, Rows, Items);

GroupBy.Layout := TGroupByLayout.Rows;  // Always in rows

var
  GroupBy: TGroupBy;
begin
  GroupBy := Summary.AddGroupBy(Data['OrderDate']);
  
  // Group by year
  GroupBy.DatePart := TDateTimePart.Year;
  
  // Other options:
  // TDateTimePart.Month
  // TDateTimePart.Quarter
  // TDateTimePart.Week
  // TDateTimePart.Day
  // TDateTimePart.DayOfWeek
  // TDateTimePart.Hour
end;

var
  GroupBy: TGroupBy;
begin
  GroupBy := Summary.AddGroupBy(Data['Price']);
  
  // Configure histogram
  GroupBy.Histogram.Active := True;
  GroupBy.Histogram.NumBins := 10;      // 10 intervals
  GroupBy.Histogram.BinSize := 100;     // $100 per bin
  GroupBy.Histogram.Minimum := 0;
  GroupBy.Histogram.Maximum := 1000;
end;

begin
  // Rows: Region -> Country
  Summary.AddGroupBy(Data['Region']);
  Summary.AddGroupBy(Data['Country']);
  
  // Columns: Year -> Quarter
  GroupBy := Summary.AddGroupBy(Data['Year']);
  GroupBy.Layout := TGroupByLayout.Items;
  
  GroupBy := Summary.AddGroupBy(Data['Quarter']);
  GroupBy.Layout := TGroupByLayout.Items;
end;

var
  SortItem: TSortItem;
begin
  SortItem := Summary.SortBy.Add(Data['Category']);
  SortItem.Ascending := False;  // Descending order
end;

GroupBy.Active := False;  // Temporarily disable