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

LazReport, fix stack overflow problem when using column footer, from Tony Whyman, issue #27100

Browse Source 
git-svn-id: trunk@47024 -
This commit is contained in:
jesus 2014-11-28 22:39:08 +00:00
parent c0564de3f2
commit 9ec6293a92
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
components/lazreport/source/lr_class.pas
View File

@ -6490,7 +6490,8 @@ begin
DebugLn('ay+ColFoot.dy+ady=%d CurBottomY=%d',[ay+Bands[btColumnFooter].dy+ady,CurBottomY]);
{$ENDIF}
if not RowsLayout then begin
if ay + Bands[btColumnFooter].dy + ady > CurBottomY then
if (Parent.Bands[btColumnFooter] <> self) and
(ay + Bands[btColumnFooter].dy + ady > CurBottomY) then
begin
if not PBreak then
NewColumn(Self);