FastReport - mehrere DS in einer PDF-Datei-

[Lemmy]

Zitat von haentschman:

Viele Wege führen nach Rom. Friede sei mit uns...

siehste - 2 unterschiedliche Meinungen und doch denken wir das selbe

[HPB]

Zitat von Lemmy:

Zitat von haentschman:

Viele Wege führen nach Rom. Friede sei mit uns...

siehste - 2 unterschiedliche Meinungen und doch denken wir das selbe

Vielen Dank für Eure Anregungen.
Noch eine Frage an Lemmy.
So wie ich diesen Teil verstehe:

Delphi-Quellcode:

  frPart.LoadFromFile(<>);
  frPart.PrepareReport(true);
  frMain.Pages.AddPrepared(frPart.Page)

Werden zuerst alle zu erzeugenden Reports in eine Datei gespeichert und dann wieder eingelesen
und zu dem Report addiert? Werde ich nachher mal testen.

Mit Gruß
HPB

[Lemmy]

Zitat von HPB:

Werden zuerst alle zu erzeugenden Reports in eine Datei gespeichert und dann wieder eingelesen
und zu dem Report addiert? Werde ich nachher mal testen.

Nein.. du machst einen Schleife um deine Datensätze (Hauptdatensätze). Für jeden Datensatz erzeugst Du nun die eine Seite und speicherst diese dann in einer anderen frxReport Komponente "zwischen":

Delphi-Quellcode:

   
  while NOT qry.EOF do
  begin
    frPart.LoadFromFile('meinReport.fr3');
    frPart.PrepareReport(true);
    frMain.Pages.AddPrepared(frPart.Page);
    qry.Next;
  end;
  ExportToPDF(frMain);

[HPB]

Zitat von Lemmy:

Zitat von HPB:

Werden zuerst alle zu erzeugenden Reports in eine Datei gespeichert und dann wieder eingelesen
und zu dem Report addiert? Werde ich nachher mal testen.

Nein.. du machst einen Schleife um deine Datensätze (Hauptdatensätze). Für jeden Datensatz erzeugst Du nun die eine Seite und speicherst diese dann in einer anderen frxReport Komponente "zwischen":

Delphi-Quellcode:

   
  while NOT qry.EOF do
  begin
    frPart.LoadFromFile('meinReport.fr3');
    frPart.PrepareReport(true);
    frMain.Pages.AddPrepared(frPart.Page);
    qry.Next;
  end;
  ExportToPDF(frMain);

Meine Version von Fastreport kennt diesen Teil nicht:
    frMain.Pages.AddPrepared(frPart.Page); Dafür aber diese:

Delphi-Quellcode:

      frxrprtPart.LoadFromFile(PfadReport + '\' + 'bruder-daten.fr3');
      frxrprtPart.PrepareReport(True);
      frxReport1.Page.AssignAll(frxrprtPart.Page);

Ob dies das Richtige ist, werde ich nachher test.
Gruß und eine nette Woche
HPB

[HPB]

Zitat von HPB:

Zitat von Lemmy:

Zitat von HPB:

Werden zuerst alle zu erzeugenden Reports in eine Datei gespeichert und dann wieder eingelesen
und zu dem Report addiert? Werde ich nachher mal testen.

Nein.. du machst einen Schleife um deine Datensätze (Hauptdatensätze). Für jeden Datensatz erzeugst Du nun die eine Seite und speicherst diese dann in einer anderen frxReport Komponente "zwischen":

Delphi-Quellcode:

   
  while NOT qry.EOF do
  begin
    frPart.LoadFromFile('meinReport.fr3');
    frPart.PrepareReport(true);
    frMain.Pages.AddPrepared(frPart.Page);
    qry.Next;
  end;
  ExportToPDF(frMain);

Meine Version von Fastreport kennt diesen Teil nicht:
    frMain.Pages.AddPrepared(frPart.Page); Dafür aber diese:

Delphi-Quellcode:

      frxrprtPart.LoadFromFile(PfadReport + '\' + 'bruder-daten.fr3');
      frxrprtPart.PrepareReport(True);
      frxReport1.Page.AssignAll(frxrprtPart.Page);

Ob dies das Richtige ist, werde ich nachher test.
Gruß und eine nette Woche
HPB

Ich habe nun getestet.
Ich finde einfach keinen Weg.
 frxReport1.Page.AssignAll(frxrprtPart.Page) und dies frMain.Pages.AddPrepared(frPart.Page); geht mit meinem FastReport 4.0 nicht. FastReport bietet auch keine andere Optionen
wie z. B. "Page.Add" an.
Wie kann man das bloß lösen?
So langsam verzweifle ich.
Mit gruß HPB

[EarlyBird]

Kannst Du nicht einfach einen Master-Detail Report daraus machen?
Du übergibst dem Report die 32 Masterdaten und die entsprechenden Detaildaten.
Dann kann der Report automatisch pro Datensatz eine Seite erstellen.
Der PDF Export ist dann ganz einfach.
(oder habe ich da was wichtiges überlesen)

[HPB]

Zitat von EarlyBird:

Kannst Du nicht einfach einen Master-Detail Report daraus machen?
Du übergibst dem Report die 32 Masterdaten und die entsprechenden Detaildaten.
Dann kann der Report automatisch pro Datensatz eine Seite erstellen.
Der PDF Export ist dann ganz einfach.
(oder habe ich da was wichtiges überlesen)

Guten EarlyBird,
es sollen alle n-Datensätze in einer PDF-Datei zusammengefast werden.
Also nicht n-Einzelseiten sondern eine eizige Seite.
Mit Gruß
HPB

[Lemmy]

Zitat von HPB:

Ich habe nun getestet.
Ich finde einfach keinen Weg.

sorry, ich habe den COde aus einem alten Post von mir geklaut, ich war der Meinung dass der passt. Ich habe jetzt ne Stunde lang mein altes Repository durchsucht bis ich bemerkt habe, dass ich den Stand in dem ich das implementiert hatte, gar nicht mehr habe (nicht haben darf). Ich habe jetzt ein Ticket bei Fast-Report gemacht, weil es mich selbst interessieren würde wie das ging....

[madas]

Zitat von Lemmy:

Ich habe jetzt ein Ticket bei Fast-Report gemacht, weil es mich selbst interessieren würde wie das ging....

Warum denn nun dies? Alles was Du zur Lösung des Problems brauchst, wurde Dir hier doch mehr als einmal dargelegt.
Verstehe nun wirklich nicht was daran so schwer sein soll. Mal als Schnellschuss:

- frxReport-Komponente auf die Form gelegt
- frxPDF-Export-Komponente auf die Form gelegt und mit dem Report verknüpfen
- UIB Dataset für Masterdaten und UIB Dataset für Detaildaten auf die Form gelegt und mit den entsprechenden Query versehen; beim Masterdataset als Parameter die Liste mit den AdressIDs vorsehen und beim Detaildataset nur einen Parameter für die jeweils aktuelle AdressID vom MasterDataset
- für jedes UIB Dataset noch ein frxDataSet auf die Form gelegt und mit den UIB-Dataset verknüpfen
- beim UIB-Masterdataset noch den AfterScroll-Event abgreifen und dort das UIB-DetailDataset schließen, vom MasterDataset die aktuelle AdressID auslesen und dem vorher in der Detail-Query erstelltem Parameter zuweisen. DetailDataset wieder öffnen
- Im Report selber dann ein MasterDataBand auf den Report legen und das frxMasterDataset zuweisen; ein DetailBand darunter legen und ihm das frxDetailDataset
- beim MasterDataband die Eigenschaft für "StartNewPage" auf true setzen

Это все.