一、 在主窗体添加frxReport1、OpenPictureDialog1、Button1三个组件。

二、Button1的OnClick单击事件

procedure TForm1.Button1Click(Sender: TObject);

begin

  if OpenPictureDialog1.execute then

  begin

    TfrxPictureView(frxReport1.FindObject('Picture1')).Picture.loadfromfile(OpenPictureDialog1.filename);

    frxReport1.ShowReport();

    frxReport1.Print;

  end;

end;

 

三、双击frxReport1组件进行布局设计