我想用DELPHI写 XML声明部分<?xml version="1.0" encoding="UTF-8"?>
<xs:schema xmlns:xs="http://www.w3.org/2001/XMLSchema" elementFormDefault="qualified" attributeFormDefault="unqualified">,怎么写
<xs:schema xmlns:xs="http://www.w3.org/2001/XMLSchema" elementFormDefault="qualified" attributeFormDefault="unqualified">,怎么写
解决方案 »
- ServiceApplication打开MySQL连接出错???
- 大家给一个能正确把43.065四舍五入到分为43.07的四舍五入函数
- 实例分享:调用DLL中的MDI子窗体,大家多讨论啊
- 如何把分公司每天的SQL SVR上的数据传到总公司的SQL SVR上 ?
- 怎么回事?自从csdn改版后,我的可用分一直是0?
- 急急急,高手请进!!!系统开发完了,打包时怎么定制BDE,我只要FOXBASE的数据库引擎!!
- 请问哪有delphi6.0企业汉化版的安装程序下载?急用,在线等待
- 在Delphi中怎样设置Excel单元格的 底色????
- 请问:什么是COM技术,具体是什么含义?
- 急,求助!!!在线高分相送!!!
- 关于kylix3下MessageBox的问题
- 其实弃用Delphi改用Lazarus也很不错
把
<?xml version="1.0" encoding="UTF-8"?>
<xs:schema xmlns:xs="http://www.w3.org/2001/XMLSchema" elementFormDefault="qualified" attributeFormDefault="unqualified">放到一个TMemo控件中(名为Memo1),需要时:使用 Memo1.Text 即可取出来。
其实用String类型的变量保存也没有问题啊:var
aHeader:String;
begin
aHeader:='<?xml version="1.0" encoding="UTF-8"?>';
aHeader:=aHeader+'<xs:schema xmlns:xs="http://www.w3.org/2001/XMLSchema" ';
aHeader:=aHeader+'elementFormDefault="qualified" ';
aHeader:=aHeader+'attributeFormDefault="unqualified">'
//到此,字符串变量aHeader中所存储的即为XML的头了。
//不能一次写在一行,因为每行Delphi代码的长度不能超过255字节。
end;
xmlDoc :IXMLDocument;
RootNode, TAXPAYERSNode, TAXPAYERNode :IXMLNode;
Directory :String;
begin
xmlDoc:=TXMLDocument.Create(nil);
try
xmlDoc.Active:=True;
xmlDoc.Version:='1.0';
xmlDoc.Encoding:='UTF-8';
RootNode:=xmlDoc.AddChild('xs');
RootNode.SetAttributeNS('elementFormDefault', '', 'XXXXX');
RootNode.SetAttributeNS('attributeFormDefault', '', 'XXXXX');
xmlDoc.SaveToFile('RZ.xml');
finally
xmlDoc:=nil;
end;
end;
又来你的ini了 -_-||| 老兄不要把xml看的太扁,xml是有好处的,光批判是没有进步的