Einzelnen Beitrag anzeigen

Errraddicator

Registriert seit: 26. Jun 2008
161 Beiträge
 
Delphi 2007 Professional
 
#3

Re: Rave: CustomConnection zur Laufzeit hinzufügen?

  Alt 12. Nov 2008, 15:04
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
  Mit Zitat antworten Zitat