paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-14 21:59:07 +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]); DebugLn('ay+ColFoot.dy+ady=%d CurBottomY=%d',[ay+Bands[btColumnFooter].dy+ady,CurBottomY]);
{$ENDIF} {$ENDIF}
if not RowsLayout then begin 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 begin
if not PBreak then if not PBreak then
NewColumn(Self); NewColumn(Self);