如图所示,fastreport提示错误

Question

function  TFrm_bz.dy:boolean;
begin
         begin
        frxreport1.Clear;
 frxreport1.LoadFromfile(extractfilepath(application.ExeName)+'report\Middle.fr3');
   frxreport1.PrepareReport;
   frxreport1.Print;
  end;
  result:=true;
     exit;
end;
打开程序第一次打印正常，当第二次打印时就会出现如图所示错误，怎么回事

Answer 1

为什么一开始就两个begin呢？？？

Answer 2

真的好像少了，第二个bagin，end是干什么的，还有最后的exit
frxreport1.PrepareReport;后面加个TRUE呢
frxreport1.PrepareReport(true);