paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-10-01 03:49:22 +02:00
Code Issues Packages Projects Releases Wiki Activity

TAChart: In TBSplineSeries, draw error bars only for YIndex=0, issue #35077.

Browse Source 
git-svn-id: trunk@60448 -
This commit is contained in:
wp 2019-02-18 16:05:08 +00:00
parent 7938907a0b
commit 836fbcfc4f
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
components/tachart/tafuncseries.pas
View File

@ -1103,7 +1103,7 @@ var
Styles.Apply(ADrawer, AStyleIndex);
splineStart := 0;
splineEnd := -2;
while NextNumberSeq(FGraphPoints, splineStart, splineend) do begin
while NextNumberSeq(FGraphPoints, splineStart, splineEnd) do begin
ADrawer.MoveTo(ParentChart.GraphToImage(FGraphPoints[splineStart]));
for j := splineStart to splineEnd + Degree - 1 do begin
startIndex := j;
@ -1128,7 +1128,7 @@ begin
for i := 1 to Source.YCount-1 do begin
UpdateGraphPoints(i-1, false);
DrawSpline(i);
DrawErrorBars(ADrawer);
// error bars supported only for YLevel = 0 -- no DrawErrorBars here.
DrawLabels(ADrawer, i);
DrawPointers(ADrawer, i, true);
end;