Export Excel
Posted: Wed Nov 30, 2016 9:08 am
hi,
the Export to Excel doesn't work, we can't open the file.
the Export to Excel doesn't work, we can't open the file.
Code: Select all
uses TeeExcelSource;
procedure TForm2.Button1Click(Sender: TObject);
Var excelExp : TSeriesDataXLSObject;
begin
excelExp := TSeriesDataXLSObject.Create(TCustomChart(Chart1));
excelExp.IncludeIndex := true;
excelExp.IncludeHeader:= true;
excelExp.IncludeColors := true;
excelExp.IncludeLabels := true;
excelExp.SaveToFile('C:\tmp\excel.xlsx');
end;