使用Delphi 2007在运行时将IXMLDOMDocument3保存到xml文件

时间:2012-05-28 13:22:27

标签: delphi delphi-2007

如果我想将运行时的IXMLDOMDocument3保存到我的硬盘上的文件中,那么它的语法是什么?

E.g。像IXMLDOMDocument3.save('c:\ test.xml')

或者甚至可能吗?

祝你好运!

1 个答案:

答案 0 :(得分:4)

下面的示例代码演示了如何在运行时加载和保存IXMLDomDocument3 XML。它使用Delphi-2010的msxml头文件。 IXMLDomDocument3继承自IXMLDomDocument并具有Save方法(正如您在问题中所写)。如果method参数是一个字符串,那么它指定文件名(它创建或替换目标文件)。

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.