Out of storage problem

rbuser

When I run large reports, A3 size I get an error.:

"There is not enough storage left to complete this operation."

It goes away if I make the size smaller. I however need A3 reports.

I have tracked this down to the following piece of code:
_______________________________________________________________

Unit ppViewr
...........
procedure TppScreenDevice.CalculateScaledPageSize;
...........
{set page image width, greater of scaled page and scrollbox}
if (FScaledPageWidth + (liDeadArea * 2)) > FViewer.ScrollBox.Width
then
(It bombs on this line the 4th time it goes through here.
FScaledPageWidth is 2811)
----->FPageImage.Width := FScaledPageWidth + (liDeadArea * 2)
<------
else
FPageImage.Width := FViewer.ScrollBox.Width
........
end;
_______________________________________________________________________

It gives a GDIError when it tries to resize the bitmap which I suppose is
the PageImage.

This is an out of Memory error but my machine has 200 MB of free memory
left.

Can you please give me some pointers on how I can resolve this as quickly as
possible.

rbuser

I use Delphi 7 with the latest version of Report Builder.

nicocizik

Hi Gilbert,

If possible please send a small example of this behavior and I will try to
recreate the error on my machine. Please send the example in .zip format to
support@digital-metaphors.com.

--
Regards,

Nico Cizik
Digital Metaphors
http://www.digital-metaphors.com

rbuser

Will do momentarily