在運行時用Delphi 2007將IXMLDOMDocument3保存到xml文件中

Question

如果我想在運行時將IXMLDOMDocument3保存到硬盤上的文件，那麼語法是什麼？

E.g.像IXMLDOMDocument3.save（'c：\ test.xml'）

或者它甚至有可能嗎？

此致敬禮！

Answer 1

下面的示例代碼演示瞭如何在運行時加載和保存IXMLDomDocument3 XML。它使用Delphi-2010的msxml頭文件。 IXMLDomDocument3繼承自IXMLDomDocument並且有Save方法（就像你在你的問題中寫的那樣）。如果方法參數是一個字符串，那麼它指定文件名（它創建或替換目標文件）。

program Project3; 
{$APPTYPE CONSOLE} 

uses SysUtils, msxml, comObj, activex; 

    procedure LoadAndSaveXML(LoadFile, SaveFile : string); 
    var xml : IXMLDOMDocument3; 
     tn : IXMLDOMElement; 
    begin 
     xml := CreateComObject(CLASS_DOMDocument60) as IXMLDOMDocument3; 
     xml.load(LoadFile); 
     xml.save(SaveFile); 
    end; 
begin 
    try 

    CoInitialize(nil); 
    try 
     LoadAndSaveXML('D:\in.xml', 'D:\out.xml'); 
    finally 
     CoUninitialize(); 
    end; 
    except 
    on E: Exception do begin 
     Writeln(E.ClassName, ': ', E.Message); 
     readln; 
    end; 
    end; 
end.