TXMLDocument als result ausgeben

[Saulmann]

Hallo,

ich versuche gerade ein verändertes XML Dokument mithilfe des Results einer Funktion an eine Procedure zu übergeben.

Delphi-Quellcode:

procedure aendere_XML(name: string);
var
  XML: TXMLDocument;
begin
  XML.FileName := ExtractFileName(openDialog1.FileName);

  //mache etwas

  XML := generiere_neueXML(XML);
  XML.SaveToFile(name+'.xml');
end;

function generiere_neueXML(XML: TXMLDocument): TXMLDocument;
var
  XML_neu: TXMLDocument;
begin
  //fülle xml
  
  result := XML_neu;
end;

Doch leider funktioniert dies nicht.
Ich erhalte folgenden Fehler: EXMLDocError mit der Meldung 'Kein aktives Dokument' aufgetreten.

Wenn ich die XML gleich in der funktion speichere klappt dies aber. Kann mir jemand sagen woran das liegt?

Delphi-Quellcode:

procedure generiere_neueXML(XML: TXMLDocument, name: string);
var
  XML_neu: TXMLDocument;
begin
  //fülle xml -> ergibt xml_neu
  
  XML_neu.SaveToFile(name+'.xml');
end;

[Der schöne Günther]

http://docwiki.embarcadero.com/Libra....TXMLDocument:

Zitat:

Wenn eine TXMLDocument-Instanz ohne Eigentümer (Owner) erstellt wird, verhält sie sich wie ein Objekt mit Interface-Unterstützung. Die Freigabe der Instanz erfolgt dann automatisch, nachdem alle Referenzen auf ihr Interface freigegeben wurden. Wird ein TXMLDocument-Objekt mit Eigentümer erstellt, ist dieser wie bei jeder anderen Komponente für die Freigabe verantwortlich

Ich tippe mal, du hast es mit Owner=nil erstellt?

[Saulmann]

@ Günther: update ... möglicherweise hatte ich zu wenig informationen gegeben.
Ich erstelle keine neue xml, sondern erweitere eine vorhandene xml-datei

[baumina]

Es geht um

Delphi-Quellcode:

XML_neu := TXMLDocument.Create;
XML_neu.Owner := ????

[TiGü]

Ändere mal die Definitionen von der Klasse auf das Interface.
TXMLDocument -> IXMLDocument aus XMLIntf.pas.
Einfach zu erzeugen durch newXMLDocument aus XMLDoc.pas.

Ich habe noch nie direkt mit der XML-Klasse gearbeitet.
Wahrscheinlich gibt sich bei dir irgendetwas selber frei?

[Der schöne Günther]

Ja, ich dachte das geht aus dem Hilfe-Zitat so hervor?