Fastreport: ExportPDF im TTask

[Uwe Raabe]

Zitat von haentschman:

Was habe ich übersehen?

• FReport.Export (oder FReport an sich) ist vielleicht nicht thread-sicher?
• FGhostscript.PDFShrink ist nicht thread-sicher?
• Print.PDF.FilePath und/oder Print.PDF.FileName enthalten bei Ausführen der Task nicht mehr den erwarteten Wert?

Letzteres könnte man mit folgendem Code beheben:

Delphi-Quellcode:

function TPrintBase.MakeExportPDF(FilePath, FileName: string):TProc;
begin
  Resulr := 
    procedure
    begin
      ExportPDF(FilePath, FileName); // Archiv
    end)
end;

...

TTask.Run(MakeExportPDF(Print.PDF.FilePath, Print.PDF.FileName)); // FilePath und FileName sofort auflösen