Einzelnen Beitrag anzeigen

lfriedrich

Registriert seit: 26. Jan 2005
10 Beiträge
 
Delphi XE Professional
 
#1

Fastreport PDF-Export Apend-Mode?

  Alt 28. Nov 2018, 08:44
Hallo,

ich werfe das Handtuch....... und brauche mal den einen oder anderen Tipp.
Ich erstelle mit Fastreport und Delphi 10.2 einen einfachen Report den ich dann mit PDFExport wandle und in eine Datei schreibe. Das alles klappt 100%. Wenn ich allerdings einen weiteren Report erstelle und exportiere, wird der alte Report nicht überschrieben sonden der neue Report wird an die Datei angehangen. Aus ehemals zwei Seiten sind nun vier geworden.

Auch wenn die Datei im Programm umgenannt wird, bleiben alle alten Reports erhalten und werden auch in die neue Datei geschrieben, als ob Fastreport den Speicher nicht löscht.

SaveDialog.InitialDir := Auswertungsverzeichnis;
SaveDialog.DefaultExt := 'pdf';
SaveDialog.FileName := Format('%s_Query_%s',[lb_Pruefmerkmal.Caption, lb_objekt.Caption]);
if not Savedialog.Execute then exit;

Report_query.Clear;
Report_query.LoadFromFile(Ausdruck_Query_File); // fr3-Datei mit Tabelle
PDFExport1.FileName := ExtractFileName(Savedialog.FileName); // PDF-Ablage
Report_query.PrepareReport(False); // Report ohne Ansicht erzeugen
Report_query.Export(PDFExport1); // Report auf Konverter ausgeben

Also, ich habe eben mal den "Report_query.Export(PDFExport1);" entfernt und einen normalen "Report_query.Print;" eingesetzt und den Report auf den Drucker gejagt. Auch hier das gleiche Ergebnis erst zwei, dann vier, sechs,acht Seiten..... alle alten Reportseiten wurden gespeichert und mit ausgedruckt.

Wie kann ich diese alten Reportdaten aus dem Speicher löschen ? Ein "Report.Clear" bringt nichts. Irgendwie habe ich ein dickes Brett vor dem Kopf, denn dieses Verhalten hatte ich noch im keinem Programm.

Grüße
Lothar
  Mit Zitat antworten Zitat