XML Objekte Freigeben

[Tod787]

Hallo ich habe ein ähnliches Problem. Ich verwende meinen XML-Aufruf in einer Unit.
Und wollte eigentlich die Instanz immer lokal erstellen und wieder freigeben, was ja bekanntlich nicht geht.
Da ich die Funtkion zyklisch aufrufe läuft mein Speicher voll.

Delphi-Quellcode:

function XMLLesen(PfadXML: String): Integer;
var
  Daten: IXMLWinCosJobType;
  XMLDoc : TXMLDocument;
begin
  try
    XMLDoc := TXMLDocument.Create(nil);
    XMLDoc.LoadFromFile(Pfad);
    Daten := GetWinCosJob(XMLDoc);
  finally
    XMLDoc .Free  // geht bekanntlich nicht 
  end;

Die Lösung

Zitat:

Statt ein Objekt zu erschaffen, benutze ich jetzt das Interface und weise ihm am Anfang

xml := newXMLDocument;

habe ich allerdings nicht ganz verstanden.

Was ist damit gemeint?

[Der schöne Günther]

Genau was dort steht:

Deine Zeile XMLDoc := TXMLDocument.Create(nil); wird zu XMLDoc := NewXMLDocument(); Und den Try-Block mitsamt seinem finally und XmlDoc.Free() entfernst du. Fertig.

Wenn die Methode verlassen wird, wird deine IXMLDocument -Instanz automatisch freigegeben.

[Tod787]

Vielen Dank!!! Stand auf dem Schlauch