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

TAChart: More cleanup

Browse Source 
git-svn-id: trunk@54017 -
This commit is contained in:
wp 2017-01-27 22:54:06 +00:00
parent aec0265173
commit 20ffdb1e45
1 changed files with 1 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
components/tachart/tamultiseries.pas
View File

@ -486,7 +486,7 @@ var
item: PChartDataItem;
clipR: TRect;
irect: TRect;
dummyR: TRect;
dummyR: TRect = (Left:0; Top:0; Right:0; Bottom:0);
ext: TDoubleRect;
begin
if Source.YCount < 2 then exit;
@ -504,7 +504,6 @@ begin
item := Source[i];
if not GetBubbleRect(item, irect) then
continue;
// if not RectIntersectsRectAlt(clipR, irect) then
if not IntersectRect(dummyR, clipR, irect) then
continue;
if bocPen in OverrideColor then