paweld/lazarus-ccr
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

fpspreadsheet: xlsx chart writer supports chart background color.

Browse Source 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@9277 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
wp_xxyyzz 2024-03-08 00:28:54 +00:00
parent ef0d96fa34
commit d3e74427df
1 changed files with 8 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
components/fpspreadsheet/source/common/xlsxooxmlchart.pas
View File

@ -2776,10 +2776,17 @@ begin
WriteChartLegendNode(AStream, AIndent + 2, chart.Legend); WriteChartLegendNode(AStream, AIndent + 2, chart.Legend);
AppendToStream(AStream, AppendToStream(AStream,
indent + ' <c:plotVisOnly val="1" />' + LE + indent + ' <c:plotVisOnly val="1" />' + LE +
indent + '</c:chart>' + LE indent + '</c:chart>' + LE
); );
// Write chart background
AppendToStream(AStream,
indent + '<c:spPr>' + LE +
GetChartFillAndLineXML(AIndent, chart, chart.Background, chart.Border) + LE +
indent + '</c:spPr>' + LE
);
chart.RotatedAxes := savedRotatedAxes; chart.RotatedAxes := savedRotatedAxes;
end; end;