Help! PageSetupBtnClick goes wrong.

k59k59
edited 2:20AM in FastReport 2.xx VCL
In previewing report, I push "PageSetup" button and change papersize from
A4 to Letter, then error popup: "List index out of bounds (0)"

I found the codes below in fr_view.pas KILL the "Pages" which is going to be "ReDrawAll" and "FormResize":

procedure TfrPreviewForm.PageSetupBtnClick(Sender: TObject);
...
...
if PageSetupDlg(psd) then
begin
...
...
TfrReport(Doc).PrepareReport;
TfrEMFPages(EMFPages).Free;
EMFPages := nil;
Connect(Doc);
RedrawAll(True);
end;
end;

Anyone can help?

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.

Home • FastReport 2.xx VCLComment As ...

© Vanilla Keystone Theme 2024