Fast Report: Vorschau bei Batch-Reports

[Nersgatt]

Moin,

ich benutze Fast Report 5.1 und versuche einen Batchreport zu erstellen.
Dies funktioniert auch, allerdings nur, wenn ich mit der TfrxReport-Komponente kein TfrxPreview verbinde, also das interne Preview-Formular benutze.
Nutze ich aber die TfrxPreview-Komponente, dann zeigt er mir nur den letzten Report an.

Etwas Quellcode:

Delphi-Quellcode:

procedure TForm8.Button1Click(Sender: TObject);
begin

  // Hier wird nur der letzte Report angezeigt
  frxReport1.Preview := frxPreview1;
  CreateReport;
  frxReport1.ShowPreparedReport;

end;

procedure TForm8.Button2Click(Sender: TObject);
begin

  // das funktioniert
  frxReport1.Preview := nil;
  CreateReport;
  frxReport1.ShowPreparedReport;

end;

procedure TForm8.CreateReport;
begin
  frxReport1.LoadFromFile(ExtractFilePath(Application.ExeName) + '1.fr3');
  frxReport1.PrepareReport;

  frxReport1.LoadFromFile(ExtractFilePath(Application.ExeName) + '2.fr3');
  frxReport1.PrepareReport(false);

end;

Jemand ne Idee?

Danke!

[Nersgatt]

Die Antwort:

Delphi-Quellcode:

frxReport1.Preview

muss vor dem erzeugen der Reports auf nil gesetzt sein. Vor dem

Delphi-Quellcode:

.ShowPreparedReport

kann man dann

Delphi-Quellcode:

frxReport1.Preview := frxPreview1

setzen.
Interessant ist, dass es auch dann nicht funktioniert, wenn man auf der Form im Designer vorher frxReport1.Preview mit frxPreview1 verbunden hat. Es reicht also nicht, vorher im Code das auf nil zu setzen. Das ist also zu beachten.