前言
很多人都在问,ClientDataSet如何才能在不连接数据库得情况下,用程序创建起来,并打开数据集。
在研究了一下TClientDataSet数据集后,发现如果要让ClientDataSet打开的话(Open),必须满足三个条件中的一个:
- ProviderName属性赋值,即有数据源提供者。
- Data属性赋值。即从其它已经打开的数据集中获得表结构和数据。
- FileName赋值,即从本地文件获取数据和MetaData。
这三个条件是TClientDataSet的Active属性的帮助中说的。思考一下,第一和第二基本被排除,我如果有了现成的数据集,还要创建干吗?第三个又不是那么容易,你哪知道文件的格式是什么呢?
那到底该怎么做呢?
失败的尝试
突然想起TClientDataSet中支持InternalCalc(内部计算)字段。内部计算字段可以在设计期加进去,或者也可以在运行期动态加入。我们为了方便,就在设计期加入。见下图:
可以通过双击控件(TClientDataSet)进入字段编辑器,然后右键选择“New Field”命令,得到如图所示的界面。填写Name,Type和FieldType。
记住:FieldType一定要是“InternalCalc”。如此反复,你可以选择添加多个字段。
打开!报错:“ProviderName”或Data没有赋值。
这个方法不正确,既然要Data,我尝试着,从其它ClientDataSet的Data属性赋值上。得到结果是:自己新建的字段和数据源的字段都显示。
我又进行了进一步的尝试:那就是让这个有着新建的字段和原有字段的ClientDataSet的Data赋值到另一个新的ClientDataSet上,却发现新建的字段没有进入。
总得来说,这次尝试是失败的,不过有如下总结:
- 光靠新建内部计算字段是不可行的。
- 新建的计算字段不可以进入Data属性而被传递给第二个ClientDataSet。
XML
又是XML!ClientDataSet本就是断开连接的数据集控件,应此提供了将数据缓存到磁盘的功能SaveToFile(),其详细声明如下: procedure SaveToFile(const FileName: string = ''''''''; Format: TDataPacketFormat = dfBinary);
注意到其中的TDataPacketFormat。它是个枚举类型,全部的枚举值如下: TDataPacketFormat = (dfBinary, dfXML, dfXMLUTF8);
大家可能注意到了,dfBinary和dfXMLUTF8都不是我们需要关心的,关心一下我们的dfXML格式。这是个让人兴奋的消息。有了XML,我们就可以查看ClientDataSet的MetaData的定义,而且更有了修改的可能!
调用一下SaveToFile功能,注意保存格式为dfXML。打开文件,如下显示: <?xml version="1.0" standalone="yes" ?>
- <DATAPACKET Version="2.0">
- <METADATA>
- <FIELDS>
- <FIELD attrname="NormInfoID" fieldtype="i4">
<PARAM Name="PROVFLAGS" Value="7" Type="i4" Roundtrip="True" />
</FIELD>
<FIELD attrname="Description" fieldtype="string.uni" WIDTH="160" />
<FIELD attrname="NormInfoVal" fieldtype="string.uni" WIDTH="510" />
<FIELD attrname="NewField" fieldtype="i4" />
<FIELD attrname="Boolean" fieldtype="Boolean" />
<FIELD attrname="Date" fieldtype="date" />
<FIELD attrname="Time" fieldtype="time" />
</FIELDS>
<PARAMS DEFAULT_ORDER="1" PRIMARY_KEY="1" />
</METADATA>
<ROWDATA />
</DATAPACKET>
看这个全部的,比较混乱,先看一下结构: <?xml version="1.0" standalone="yes" ?>
- <DATAPACKET Version="2.0">
+ <METADATA>
<ROWDATA />
</DATAPACKET>
这下比较清楚了:
整个XML定义为一个DataPacket,DataPacket包括两个部分:MetaData和RowData。显然对我们来说,RowData可以忽视,到时候将RowData的节点清空就是。而MetaData呢?
看看全部的XML格式,可以看出:MetaData包括Fields和Params。即字段和数据集参数。
字段
先重点考虑Fields。看一下Field节点的定义,大概可以看出一些:
- attrname是指FieldName
- fieldtype是指字段类型
- width是需要宽度的字段类型的参数
- 如果需要定义字段的属性,再加上<Param />节点
下面我们来研究一下字段类型,我想这也是最主要的!其它属于高级用法。
MSSQL Type |
fieldtype |
WIDHT |
SUBTYPE |
DECIMALS |
READONLY |
Binary
bin.hex
50
Bit
boolean
Char
string
10
FixedChar
DateTime
dateTime
Decimal
fixed
18
Float
r8
Image
bin.hex
Binary
Int
i4
Money
fixed
19
4
nChar
string.uni
20
nText
bin.hex
Text
Numeric
fixed
18
nVarChar
string.uni
100
SmallDateTime
dateTime
Real
r8
SmallInt
i2
SmallMoney
fixed
10
4
Text
bin.hex
Text
TimeStamp
bin.hex
8
true
tinyInt
i2
UniqueIdentifier
string
38
Guid
VarBinary
bin.hex
50
Binary
VarChar
string
50
|