现在开始吧,启动Delphi 6,在主菜单上选择File | New - Other,然后在仓库中选择XML Data Binding,如图1所示。 向导有三个页面。第一页定义XML纲(Schema)或XML文件(本例用Clinic.xml),如图2所示。 在资源输入框内输入XML纲(Schema)或XML文件。“选项”(Options)对话框定义编码选项和数据类型映射关系(Data Type ...
1.用TClientDataSet操作XML;TClientDataSet是个好东西,用它操作XML是很简单的事,不过缺点是只能操作固定格式的XML,它适合操作表结构的数据,如果你需要把数据表导出成XML那用TClientDataSet是个好主意,比如下面是一个数据集导出成XML的方法: procedure ExportToXML(SrcDataSet:TDataSet;const XMLFileName:String); var tmp...
首先,我要操作的XML为stock.xml,它是一个关于股票方面的文件,内容如下: <?xml version="1.0" encoding="gb2312"?> <StockList> <StockItem Name="股票名称1" Code="股票代码1">股票例子1</StockItem> </StockList> 在主菜单上选择File New->Other,然后在仓库中选择XML Data Binding,会启动Delphi的XML绑...
下面是用TMDataSetProxy实现的数据集的XML持久化。免去了需要通过TClientDataSet进行的麻烦,并且采用的是用Node记录字段的方式,.net也是采用这样的方式,与TClientDataSet所用的用Attribute记录字段的方式不同。虽然这样生成的 XML文件将会略大一些,但是好处也是显而易见的,特别是我是准备用在Web应用中的,用Node方式记录的...
之前我一直是用DELPHI提供的XML Data binding来做的,基本做法是:先用工具(如XMLSPY)做好一个XML Schema(XSD),然后用XML Data binding生成DELPHI的接口和类。当然,一旦生成好就很方便了,在程序里我只要操作这个接口就好了,其中各个Field都会被变成属性,并且类型也都如我在XSD中的定义。但问题在于程序在开发过程中,...
TData=recordsCatalog:string; sReserved: Stringend;varForm1: TForm1;implementation{$R *.dfm}functionTForm1.CreateTreeview(XmlNode: IXMLNode; TreeNode: TTreeNode): TTreeNode;vari: integer; ParentTreeNode, CurrentTreeNode: TTreeNode;
function CreateTreeview(XmlNode: IXMLNode; TreeNode: TTreeNode):TTreeNode;{ Private declarations } public { Public declarations } end;type pRec = ^TData;TData = record sCatalog: string;sReserved: String end;var Form1: TForm1;implementation {$R *.dfm} function TForm1.CreateTreeview(Xml...
我把它称为自己解析法;二、用控件提供的XML Data Binding Wizard来创建一个适合用户自己的接口单元,...
去年我在试图开发一个基于XML的WEB框架时,一直是用DELPHI提供的XML Data binding来做的。基本的做法是:先用工具(如XMLSPY)做好一个XML Schema(XSD),然后用XML Data binding wizard生成DELPHI的接口和类。当然,一旦生成就可以很方便地使用了,只要在程序里操作这些接口就好了,其中各个Field都会被变成属性,并且类型也...
1.准备好你要解析的XML文档典型实例。这至关重要,因为Delphi需要这个文档来生成一个xdt文档以及相应的对象接口。 2.窗体中加入TXMLDocument组件(在Internet页面上),并将其FileName置为要解析的XML文档实例。 3.右击TXMLDocument,在弹出的菜单中选择XML Data Binding Wizard… 4.在弹出的向导中,第一页中,您可以看...