摘要：
4.4.变量(Variables)UnitNativeXml; cDefaultBinaryEncoding:TBinaryEncodingType = xbeBase64; cDefaultDropCommentsOnParse:boolean = False; cDefaultEncodingString:UTF8String = 'UTF-8'; cDefaultExternalEncoding:TStringEncodingType = seUTF8; cDefaultFloatAllowScientific:boolean = True; cDefaultFloatS 阅读全文
摘要：
4.3.类型(Types)4.3.1.PBigByteArray Unit NativeXml PBigByteArray =^TBigByteArray;4.3.2.PUnicodeChar Unit NativeXml PUnicodeChar = PWideChar;4.3.3.RawByteString Unit NativeXml RawByteString = AnsiString;4.3.4.TBigByteArray Unit NativeXml TBigByteArray =array[0..MaxInt - 1] of byte; TBigByteArr... 阅读全文
摘要：
4.2.30.sdDateTimeFromStringDefault UnitNativeXml functionsdDateTimeFromStringDefault(const ADate: UTF8String; ADefault: TDateTime;UseLocalBias: Boolean): TDateTime; 根据W3C日期/时间规范，转换UTF8String类型的ADate为日期时间(TDateTime)类型，可以在http://www.w3.org/TR/NOTE-datetime找到该规范。如果有一个转换错误，返回缺省值ADefault。4.2.31.sdDat... 阅读全文
摘要：
4.2.函数(Functions)4.2.1.ComponentCreateFromXmlFile unit NativeXmlObjectStorage functionComponentCreateFromXmlFile(const FileName: string; Owner: TComponent; constName: string): TComponent; 从文件名称为FileName的XML文件读取并创建组件。为了成功地从头开始创建组件，组件的类必须事先调用RegisterClass进行登记。添加到指定Owner组件的子组件列表。这通常是一个形式。指定Name作为创建... 阅读全文
摘要：
4.1.17.TXmlNodeList TXmlNodeList= class(TList) TXmlNodeList是一个继承自TList的工具。 例子如下：procedure FindAllZips(ANode: TXmlNode);var i: integer; AList: TXmlNodeList;begin AList := TXmlNodeList.Create; try // Get a list of all nodes named 'ZIP' ANode.NodesByName('ZIP', AList); for i := 0 to ALi 阅读全文
摘要：
4.1.16.60.NodeByAttributeValue functionNodeByAttributeValue(const NodeName: UTF8String; const AttribName: UTF8String;const AttribValue: UTF8String; ShouldRecurse: boolean): TXmlNode; 这个函数返回子节点中第一个节点名等于NodeName，并且名为AttribName属性的值为AttribValue的节点。如果ShouldRecurse为True(缺省)，则函数自身递归。4.1.16.61.NodeByElem... 阅读全文
摘要：
4.1.16.90.ReadPen procedure ReadPen(constAName: UTF8String; APen: TPen); virtual; 从名字为AName的子节点中读取Color、Mode和Style信息到TPen类型的APen中。4.1.16.91.ReadString function ReadString(constAName: UTF8String; const ADefault: UTF8String): UTF8String; virtual; 从名字为AName的子节点中读取并且转换值为UTF8字符串(UTF8String)类型，如果子节点没... 阅读全文
摘要：
4.1.16.TxmlNode类 TXmlNode =class(TPersistent) 该TXmlNode代表在XML文件中的元素。每个TNativeXml拥有一个根(Root)元素。在根元素下面，子元素可以嵌套（没有限制有多深）。ElementType属性定义这个节点是什么类型的元素。4.1.16.1.AttributeByName property AttributeByName[const AName: UTF8String]: UTF8String; AttributeByName返回的指定属性名称AName的属性的值。设置AttributeByName可以添加这个属性到... 阅读全文
摘要：
4.1.16.30.ValueDirect property ValueDirect:UTF8String; ValueDirect是从流里面解析的原始文本值。如果有多行文本，将在ValueDirect中用CR符号分割。4.1.16.31.WriteOnDefault property WriteOnDefault:boolean; WriteOnDefault属性值用于返回或设置父文档(Parent Document)的WriteOnDefault 属性值。4.1.16.32.Assign procedure Assign(Source:TPersistent); overrid... 阅读全文
摘要：
4.1.10.TsdSurplusReader类 TsdSurplusReader = class TsdSurplusReader是一个简单的类，它可以存储少许字符，并可以在读取基础流前，返回这些字符。4.1.10.1.Surplus property Surplus:UTF8String;4.1.10.2.Create constructor Create(AStream:TStream);4.1.10.3.ReadChar function ReadChar(var Ch:AnsiChar): integer;4.1.10.4.ReadCharSkipBlanks func... 阅读全文
摘要：
4.1.3.TPersistentAccess类 TPersistentAccess =class(TPersistent)4.1.4.TReaderAccess类 TReaderAccess =class(TReader)4.1.5.TsdBufferedReadStream类 TsdBufferedReadStream =class(TStream) TsdBufferedReadStream是一个流的缓冲，它为另外的TStream建立读取缓冲区，并从流读取到缓冲区。此流类型只能支持读取。4.1.5.1.Create constructor Create(AStream:TSt... 阅读全文
摘要：
符号引用(Symbol Reference)4.1.类(Classes)4.1.1.TComponentAccess类 TComponentAccess =class(TComponent)4.1.1.1.ComponentState property ComponentState;4.1.1.2.SetComponentState procedureSetComponentState(const AState: TComponentState);4.1.2.TNativeXml类 TNativeXml =class(TPersistent) TNativeXml是XML文件的载体... 阅读全文
摘要：
引自百度使用NativeXml的例子3.1.例子A:XML的装载、存储和导出 这个例子显示如何加载一个XML文档，然后以可读格式导出到一个TMemo领域。 拖放一个TEdit（Edit1），TButton（Button1）和一个TMemo到你的窗体，然后连接到下面的按钮的OnClick事件代码。填写文件名到Edit1，然后按一下按钮，您会看到在memo控件中列出XML文件的内容。procedure TForm1.Button1Click(Sender: TObject);var ADoc: TNativeXml;begin Memo1.Lines.Clear; ADoc := TNati... 阅读全文
摘要：
xml.FloatSignificantDigits := 7;这用来控制浮点类型的小数位数，经测试，发现：value：=123.123456789（共13个数字，不含点）如果 xml.FloatSignificantDigits：=1，则为100；为2，则为120，为3则为123，为4，则为123.1.....为7，则为123.1234.....是不是有点怪异？呵呵以下引自万一：安装包中的 NativeXmlObjectStorage.pas 是 NativeXml 的扩展应用，可以把组件、对象和窗体序列化为 Xml 文件。其中方便使用的是两个类：TsdXmlObjectWriter、Ts. 阅读全文
摘要：
以下引自万一：关于NativeXML的编辑操作：SourceURL:http://www.cnblogs.com/del/archive/2011/03/25/1995863.htmlXml (10)锛氱紪杈� - 涓囦竴 - 鍗氬鍥�uses NativeXml; var xml: TNativeXml; const xmlStr = '<?xml version="1.0" encoding="UTF-8"?>' + '<List>' + '<item ID="No.1 阅读全文
摘要：
八、属性、注释以及内容的添加添加属性:node := xml.Root.NodeNew('item'); node.AttributeAdd('ID', '1'); node.AttributeAdd('age', '11'); node.Value := '张三'; node := xml.NodeNewTextAttr('item', '张三', [xml.AttrText('ID', '1'), xml.AttrInt(' 阅读全文
摘要：
继续研究NativeXML：NativeXml的方法属性:ANativeXml := TNativeXml.Create(Self);//创建ANativeXml.XmlFormat := xfReadable; //格式ANativeXml.EncodingString := 'UTF-8';//编码ANativeXml.ExternalEncoding := seUTF8;ANativeXml.LoadFromFile();//从文件夹中导入XML文件ANativeXml.SaveToFile();//XML文件保存到文件夹节点的方法属性:ANativeXml.Root;/ 阅读全文
摘要：
原来自己是个一个菜鸟。 Delphi操作XMl，只要使用 NativeXml。我是用的版本是4.02。NativeXML的使用方法比较简单，但是功能很强大。XE2的话，要在simdesign.inc后面加上： // Delphi XE2 / 16 {$ifdef VER230} {$define D7UP} {$defineD10UP} {$define D15UP} {$endif}一、使用 1) Copy the NativeXml files from the NativeXml directory into your project folder. Copy additional .. 阅读全文