ansonsten beim Create den Dateinamen nicht angeben und erst zum Schluß mit .SaveToFile speichern
Delphi-Quellcode:
XMLCFG := TXMLDocument.Create(nil);
XMLCFG.Active := True;
XMLCFG.Version := '1.0';
XMLCFG.Encoding := 'ISO-8859-1';
...
XMLCFG.SaveToFile(Dateiname);
XMLCFG.Free; // Free kann bei Verwendung von IXMLDocument
// statt TXMLDocument, für XMLCFG, entfallen