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

TAChart: Fix expected behavior of Axis.Marks.AtDataOnly if series does not set its AxisIndexes (http://forum.lazarus.freepascal.org/index.php/topic,35606.0.html)

Browse Source 
git-svn-id: trunk@54023 -
This commit is contained in:
wp 2017-01-28 12:44:54 +00:00
parent 8a1b0e7f4a
commit aad2a41b76
1 changed files with 3 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
components/tachart/tachartaxis.pas
View File

@ -585,6 +585,9 @@ begin
// FIXME: Intersect axisMin/Max with the union of series extents.
// wp: - I think this is fixed in what follows...
GetChart.Notify(CMD_QUERY_SERIESEXTENT, self, nil, rng{%H-});
// Safe-guard against series having no AxisIndexX/AxisIndexY
if IsInfinite(rng.FStart) then rng.FStart := axisMin;
if IsInfinite(-rng.FEnd) then rng.FEnd := axisMax;
UpdateBounds(rng.FStart, rng.FEnd);
d.FMin := rng.FStart;
d.FMax := rng.FEnd;