fastReport Summary1切换图片代码

如果您想在FastReport的Summary1事件中切换图片，可以使用TfrxPictureView对象和TfrxReport对象的事件。以下是一些示例代码：

1.在FastReport设计器中添加一个TfrxPictureView对象，并将其添加到报表页面中。命名为PictureView1。

2.在TfrxReport对象的BeforePrint事件中加载您要切换的所有图像。以下是一些示例代码：

  procedure TMyReport.BeforePrint;
  begin
    inherited;
    PictureView1.Picture.LoadFromFile('C:\Images\MyImage1.png');
    PictureView1.Tag := 1;
    PictureView1.Visible := True;
    PictureView2.Picture.LoadFromFile('C:\Images\MyImage2.png');
    PictureView2.Tag := 2;
    PictureView2.Visible := False;
  end;

3.在TfrxReport对象的AfterPrint事件中使用以下代码切换图片：

  procedure TMyReport.AfterPrint;
  begin
    inherited;
    if PictureView1.Tag = 1 then
    begin
      PictureView1.Visible := False;
      PictureView2.Visible := True;
    end
    else
    begin
      PictureView2.Visible := False;
      PictureView1.Visible := True;
    end;
  end;

这些代码会在每次打印报表时循环切换两个图像。您可以根据需要添加更多图像和逻辑。