Cross-tab infinite loop

Hello all,

I have a cross-tab object on Fastreports 5.6.8.

If the cross-tab goes beyond the width of one page, it tries to re-print the same report an infinite number of times.

I've had it work a couple of times, depending on what kind of band the cross-tab is in, but usually it just crashes with a stack overflow.


To re-produce, create a cross-tab with 1 row, 3 columns, 1 cell, and the following checked:

Show Corner
Column Header
Row Header
Auto size
Border around cells
Reprint headers on new page
side-by-side cells

Then add this code:

procedure Cross1OnBeforePrint(Sender: TfrxComponent);
begin

Cross1.AddValue(,,[5]);
Cross1.AddValue(,,[5]);
Cross1.AddValue(,,[5]);
Cross1.AddValue(,,[5]);
Cross1.AddValue(,,[5]);
Cross1.AddValue(,,[5]);
Cross1.AddValue(,,[5]);
Cross1.AddValue(,,[5]);
Cross1.AddValue(,,[5]);
Cross1.AddValue(,,[5]);
Cross1.AddValue(,,[5]);
Cross1.AddValue(,,[5]);
Cross1.AddValue(,,[5]);
Cross1.AddValue(,,[5]);
Cross1.AddValue(,,[5]);
Cross1.AddValue(,,[5]);
Cross1.AddValue(,,[5]);
Cross1.AddValue(,,[5]);
Cross1.AddValue(,,[5]);
Cross1.AddValue(,,[5]);
Cross1.AddValue(,,[5]);
Cross1.AddValue(,,[5]);
Cross1.AddValue(,,[5]);
Cross1.AddValue(,,[5]);
Cross1.AddValue(,,[5]);
Cross1.AddValue(,,[5]);
Cross1.AddValue(,,[5]);
Cross1.AddValue(,,[5]);
Cross1.AddValue(,,[5]);
Cross1.AddValue(,,[5]);

end;

Infinite loop.

Anybody else get this?

What is the fix?

thanks


Leave a Comment

Rich Text Editor. To edit a paragraph's style, hit tab to get to the paragraph menu. From there you will be able to pick one style. Nothing defaults to paragraph. An inline formatting menu will show up when you select text. Hit tab to get into that menu. Some elements, such as rich link embeds, images, loading indicators, and error messages may get inserted into the editor. You may navigate to these using the arrow keys inside of the editor and delete them with the delete or backspace key.