JZTXT

(05)UniGUI何输出FastReport的pdf

发布时间 2023-06-16 15:36:53作者: 涂磊

拖一个frxPDFExport1和frxReport1到界面 上

 

rocedure TMainForm.UniButton2Click(Sender: TObject);
begin
  with frxPDFExport1 do
  begin
    DefaultPath := 'D:\';
    FileName := '1.pdf';
    ShowDialog := False;
    ShowProgress := False;
  end;

//if frxReport1.LoadFromFile('D:\1.fr3') then
  if frxReport1.PrepareReport() then
    frxReport1.Export(frxPDFExport1);
end;

就会在D:\生成一个1.pdf文件。