paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-04-23 05:19:31 +02:00
Code Issues Packages Projects Releases Wiki Activity

TAChart: Fix RandomChartSource crashing if PointsNumber is 1.

Browse Source 
git-svn-id: branches/fixes_1_8@56554 -
This commit is contained in:
mattias 2017-11-30 14:39:59 +00:00
parent 6a1353ee78
commit d4de41bf7e
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
components/tachart/tasources.pas
View File

@ -803,7 +803,7 @@ begin
end;
while FCurIndex < AIndex do begin
FCurIndex += 1;
if XMax <= XMin then begin
if (XMax <= XMin) or (Count = 1) then begin
FCurItem.X := XMin;
for i := 0 to XCount - 2 do FCurItem.XList[i] := XMin;
end else begin