Fastreport: ExportPDF im TTask

[TiGü]

CoInitializeEx(nil,COINIT_MULTITHREADED); und CoUninitialize; innerhalb des Task/Threadkontextes aufrufen?

Delphi-Quellcode:

function TPrintBase.MakeExportPDF(FilePath, FileName: string):TProc;
begin
  Result :=
    procedure
    begin
      CoInitializeEx(nil,COINIT_MULTITHREADED);  
      ExportPDF(FilePath, FileName); // Archiv
      CoUninitialize;
    end)
end;

...

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

[TiGü]

Vielleicht hilfreich: https://www.danysoft.com/estaticos/f...on%20hilos.pdf

[haentschman]

Danke...

Im Prinzip habe ich das auch so...bis auf das CoInitialize.
...heute nicht mehr.