1234567891011121314151617181920212223 |
- program demodoughnut;
- {$MODE OBJFPC}
- {$MODESWITCH EXTERNALCLASS}
- uses
- ChartJS;
- var
- config: TChartConfiguration;
- dataset: TChartDoughnutDataset;
- begin
- config := TChartConfiguration.new;
- config.type_ := 'doughnut';
- config.data := TChartData.new;
- config.data.labels := ['Red', 'Blue', 'Yellow'];
- dataset := TChartDoughnutDataset.new;
- dataset.data := [300, 50, 100];
- dataset.backgroundColor := ['rgb(255, 99, 132)', 'rgb(54, 162, 235)',
- 'rgb(255, 205, 86)'];
- config.data.datasets := [dataset];
- TChart.new('myChart', config);
- end.
|