Visualization Overview

uses
  VCLBI.Chart, BI.DataItem;

var
  Chart: TBIChart;
  Data: TDataItem;
begin
  Chart := TBIChart.Create(Owner);
  Chart.Parent := Self;
  
  // TeeBI automatically chooses chart type
  Chart.Data := Data;
end;

type
  TBIChartMode = (Automatic, XY, ThreeD, Financial, Geographic);

Chart.Options.Mode := TBIChartMode.ThreeD;

Chart.Data := MyData;

var
  Items: TDataArray;
begin
  SetLength(Items, 3);
  Items[0] := Data['Sales'];
  Items[1] := Data['Quantity'];
  Items[2] := Data['Region'];
  
  Chart.Fill(Items);
end;

var
  Summary: TSummary;
begin
  Summary := TSummary.Create(nil);
  try
    Summary.AddGroupBy(Data['Region']);
    Summary.AddMeasure(Data['Sales'], TAggregate.Sum);
    
    // Visualize pivot results
    Chart.Fill(Summary);
  finally
    Summary.Free;
  end;
end;

var
  Histogram: THistogram;
begin
  Histogram := THistogram.Create;
  try
    Histogram.Active := True;
    Histogram.NumBins := 10;
    
    Chart.Fill(Histogram, Data['Price']);
  finally
    Histogram.Free;
  end;
end;

var
  Chart: TBIChart;
begin
  Chart := TBIChart.Create(Owner);
  
  with Chart.Options do
  begin
    Mode := TBIChartMode.XY;
    Dimensions := TBIChartDimensions.View3D;
    Legend := TBIChartLegend.Show;
    Marks := TBIChartMarks.Hide;
    SeriesDirection := TBISeriesDirection.Horizontal;
  end;
end;

// VCL
uses VCLBI.Chart, VCLBI.Grid;

// FireMonkey  
uses FMXBI.Chart, FMXBI.Grid;