mORMot Open Source

esmondb

Member

From: London

Registered: 2010-07-20

Posts: 299

TGDIPages.ShowPreviewForm

The report preview form is shown with a default width a little less than a report page width. This causes a horizontal scrollbar to appear and cuts off the side of the report.

I've found changing line 4410 in mORMotReport.pas from:

 PreviewForm.Width := (cx*PreviewForm.Height) div y+(64+PANELWIDTH);

to:

 PreviewForm.Width := (cx*PreviewForm.Height) div y+(64+PANELWIDTH)+PANELWIDTH;

solves the problem but I don't fully understand the calculation. Why is the form height used to calculate PreviewForm.Width?