demobubble.lpr 535 B

12345678910111213141516171819202122
  1. program demobubble;
  2. {$MODE OBJFPC}
  3. {$MODESWITCH EXTERNALCLASS}
  4. uses
  5. ChartJS;
  6. var
  7. config: TChartConfiguration;
  8. dataset: TChartBubbleDataset;
  9. begin
  10. config := TChartConfiguration.new;
  11. config.type_ := 'bubble';
  12. dataset := TChartBubbleDataset.new;
  13. dataset.label_ := 'First Dataset';
  14. dataset.data := [TChartXYRData.new(20, 30, 15), TChartXYRData.new(40, 10, 10)];
  15. dataset.backgroundColor := 'rgb(255, 99, 132)';
  16. config.data := TChartData.new;
  17. config.data.datasets := [dataset];
  18. TChart.new('myChart', config);
  19. end.