直接进入代码吧,红字都是注意的地方
var
xml:TXmlDocument;
xmlNode:IxmlNode;
begin
xml:=TXmlDocument.Create(nil);
try
xml.Active:=True;
xml.Version:='1.0';
xml.Encoding:='UTF-8';
xml.DocumentElement:=xml.CreateElement('Top_node','namespace');
xmlNode:=xml.DocumentElement.AddChild('child_node');
xml.SaveToFile('new_name.xml');
finally
xmlNode:=nil;
xml.Free;
end;
end;