So, hab auch das Problem gelöst:
Delphi-Quellcode:
// ... ganz viel kram
// execute report
rvProject.Execute();
rvProject.Close();
// clean up
rvPDF.Free();
rvCcOutputs.Free();
rvSystem.Free();
rvProject.Free();
Wenn ich die ganzen Objekte wieder manuell mit Free frei gebe, kommt bei der 2. Datei auch wieder alles richtig bei raus.
Dazu habe ich aber 1 Frage:
Normalerweise kenne ich das so, dass Delphi lokale Variable im Var-Teil einer Funktion am Ende automatisch wieder frei gibt.
Warum hier nicht?
Delphi-Quellcode:
procedure TIWUserSession.generatePDF();
var
rvProject: TRvProject;
rvSystem: TRvSystem;
rvPDF: TRvRenderPDF;
rvCcOutputs: TRvCustomConnection;
begin
// init components
rvProject := TRvProject.Create(self);
rvSystem := TRvSystem.Create(self);
rvCcOutputs := TRvCustomConnection.Create(self);
rvPDF := TRvRenderPDF.Create(self);
// ... ganz viel Kram
// clean up
rvPDF.Free();
rvCcOutputs.Free();
rvSystem.Free();
rvProject.Free();
end;
cu
Patrick