level 12
夜行兰若寺
楼主
各位大神帮忙看下，需要输出xml文件如下：
<?xml version="1.0" standalone="no"?>
<!DOCTYPE svg PUBLIC "-//W3C/DTD SVG 1.1//EN" "http://www.w3.org/Graphics/SVG/1.1/DTD/svg11.dtd">
<svg version="1.1"
xml:space="preserve"
xmlns:xlink="http://www.w3.org/1999/xlink" xmlns="http://www.w3.org/2000/svg"
>
.......
代码如下：
var
Hfile:file;
i,j,k:integer;
OutXMLDoc:IXMLDocument;
Root,Parent_Node,Child_Node,ChildChild_Node,temp_Node,temp_Node1,temp_Node2:IXMLNode;
begin
OutXMLDoc := TXMLDocument.Create(nil);
OutXMLDoc.Active := true;
OutXMLDoc.Version:='1.0';
//OutXMLDoc.Encoding:= 'GB2312';
OutXMLDoc.standalone:='no';
OutXMLDoc.Options := OutXMLDoc.Options + [doNodeAutoIndent];
Root := OutXMLDoc.AddChild('svg'); //建根结点
Root.SetAttributeNS('version','','1.1');
Root.SetAttributeNS('xml:space','','preserve');
Root.SetAttributeNS('xmlns:xlink','','http://www.w3.org/1999/xlink');
......
end
xml version 和根节点svg之间的<!DOCTYPE svg PUBLIC "-//W3C/DTD SVG 1.1//EN" "http://www.w3.org/Graphics/SVG/1.1/DTD/svg11.dtd">怎么输出啊，刚接触delphi不久，IXMLDocument不是很熟悉....
2014年05月21日 11点05分
1
<?xml version="1.0" standalone="no"?>
<!DOCTYPE svg PUBLIC "-//W3C/DTD SVG 1.1//EN" "http://www.w3.org/Graphics/SVG/1.1/DTD/svg11.dtd">
<svg version="1.1"
xml:space="preserve"
xmlns:xlink="http://www.w3.org/1999/xlink" xmlns="http://www.w3.org/2000/svg"
>
.......
代码如下：
var
Hfile:file;
i,j,k:integer;
OutXMLDoc:IXMLDocument;
Root,Parent_Node,Child_Node,ChildChild_Node,temp_Node,temp_Node1,temp_Node2:IXMLNode;
begin
OutXMLDoc := TXMLDocument.Create(nil);
OutXMLDoc.Active := true;
OutXMLDoc.Version:='1.0';
//OutXMLDoc.Encoding:= 'GB2312';
OutXMLDoc.standalone:='no';
OutXMLDoc.Options := OutXMLDoc.Options + [doNodeAutoIndent];
Root := OutXMLDoc.AddChild('svg'); //建根结点
Root.SetAttributeNS('version','','1.1');
Root.SetAttributeNS('xml:space','','preserve');
Root.SetAttributeNS('xmlns:xlink','','http://www.w3.org/1999/xlink');
......
end
xml version 和根节点svg之间的<!DOCTYPE svg PUBLIC "-//W3C/DTD SVG 1.1//EN" "http://www.w3.org/Graphics/SVG/1.1/DTD/svg11.dtd">怎么输出啊，刚接触delphi不久，IXMLDocument不是很熟悉....
