paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-19 16:40:54 +02:00
Code Issues Packages Projects Releases Wiki Activity

Merged revision(s) 49019-49020 #fd258ffc81-#fd258ffc81 from trunk:

Browse Source 
TAChart: Fix crash of IDE if TPieSeries is linked to a TUserDefinedChartSource
........
TAChart: Fix crash of IDE if TFitSeries is linked to a TUserDefinedChartSource
........

git-svn-id: branches/fixes_1_4@49037 -
This commit is contained in:
maxim 2015-05-15 21:55:59 +00:00
parent a85d06d750
commit 4956f8383e
2 changed files with 3 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
components/tachart/tafuncseries.pas
View File

@ -1414,6 +1414,7 @@ var
ns := Source.Count; ns := Source.Count;
if (np <= 0) or (ns = 0) or (ns < np) then exit; if (np <= 0) or (ns = 0) or (ns < np) then exit;
CalcXRange(xmin, xmax); CalcXRange(xmin, xmax);
if xmin = xmax then exit;
n := 0; n := 0;
for i := 0 to ns - 1 do for i := 0 to ns - 1 do

2
components/tachart/taradialseries.pas
View File

@ -499,6 +499,8 @@ begin
// This is a workaround for db source invalidating the cache due to // This is a workaround for db source invalidating the cache due to
// unnecessary "dataset changed" events. // unnecessary "dataset changed" events.
total := Source.ValuesTotal; total := Source.ValuesTotal;
if total = 0 then
exit;
for i := 0 to Count - 1 do begin for i := 0 to Count - 1 do begin
di := Source[i]; di := Source[i];
if IsNan(di^.Y) then continue; if IsNan(di^.Y) then continue;