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

TAChart: Fix lower bound calculation for unsorted chart sources

Browse Source 
git-svn-id: trunk@27728 -
This commit is contained in:
ask 2010-10-17 06:43:53 +00:00
parent 96e84da1eb
commit d8afe5e250
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

@ -478,7 +478,7 @@ begin
while (ALB < Count) and (Item[ALB]^.X < AXMin) do while (ALB < Count) and (Item[ALB]^.X < AXMin) do
Inc(ALB); Inc(ALB);
AUB := Count - 1; AUB := Count - 1;
while (AUB > 0) and (Item[AUB]^.X > AXMax) do while (AUB >= 0) and (Item[AUB]^.X > AXMax) do
Dec(AUB); Dec(AUB);
end; end;
end; end;