소스 검색

* Show two lines

Michaël Van Canneyt 3 년 전
부모
커밋
e8092ce662
1개의 변경된 파일8개의 추가작업 그리고 2개의 파일을 삭제
  1. 8 2
      demo/chartjs/demoline.lpr

+ 8 - 2
demo/chartjs/demoline.lpr

@@ -8,7 +8,7 @@ uses
 
 
 var
 var
   config: TChartConfiguration;
   config: TChartConfiguration;
-  dataset: TChartLineDataset;
+  dataset, d2: TChartLineDataset;
 begin
 begin
   config := TChartConfiguration.new;
   config := TChartConfiguration.new;
   config.type_ := 'line';
   config.type_ := 'line';
@@ -21,6 +21,12 @@ begin
   dataset.fill := False;
   dataset.fill := False;
   dataset.borderColor := 'rgb(75, 192, 192)';
   dataset.borderColor := 'rgb(75, 192, 192)';
   dataset.lineTension := 0.1;
   dataset.lineTension := 0.1;
-  config.data.datasets := [dataset];
+  d2 := TChartLineDataset.new;
+  d2.label_ := 'My other dataset';
+  d2.data := [35, 49, 90, 70, 55, 45, 20];
+  d2.fill := False;
+  d2.borderColor := 'rgb(255, 192, 192)';
+  d2.lineTension := 0.1;
+  config.data.datasets := [dataset,d2];
   TChart.new('myChart', config);
   TChart.new('myChart', config);
 end.
 end.