ClientDataSet的使用.docVIP

ClientDataSet的使用 分享人：树军 日期：2011/11/17 问题描述: 测试上阶联动，下阶联动，没有任何变化(B31-111020005) 问题原因:排查问题后发现问题出现在数据集qryMPSTB过滤之后,使用next时，数据集并没有滚动到下一条，出问题的代码是: 数据集在过滤之后，可以得到两条记录，但是过滤之后使用next时，并没有定位到下一条记录，最后查的原因是因为过滤的时候数据集的IndexFieldNames是空值导致的，于是加上索引字段: 基于以上问题，总结了下ClientDataSet的用法: 利用Locate进行定位记录 function Locate(const KeyFields: string; const KeyValues: Variant;Options: TLocateOptions): Boolean; 其中Options参数可以是loCaseInsensitive和 loPartialKey loCaseInsensitive：不区分大小写 loPartialKey：部分字符匹配 用法例子: CdsBody1.Locate(LC002,mAccoutID,[loCaseInsensitive]) ; CdsBody1.Locate(Name,’李’,[ loPartialKey]) ; 利用Filter进行过滤记录 利用Filter可以在客户端进行过滤筛选记录，避免重新组SQL查询某一条件的记录 用法例子: 在使用Filter进行过滤记录时，确保clientdataset的IndexFieldNames属性具有值，否则过滤之后，使用first,next等浏览数据时将失效（B31-111020005） 利用Delta获取数据集发生变化的记录 数据集修改，新增，删除的记录都会记录在属性Delta中，可以利用此属性获取。 用法例子； 同时可以利用ClientDataset的UpdateStatus方法获取本次数据集更新的种类，是新增的还是修改的，还是删除的 usInserted:新增的记录 usModified：修改的记录 usDeleted：删除的记录 利用CloneCursor复制数据集的数据和设置 procedure CloneCursor(Source: TClientDataSet; Reset: Boolean;KeepSettings: Boolean = False); 利用CloneCursor可以复制另一个数据集的数据，还可以复制另一个数据集的设置,复制的设置有Filter,Filtered,IndexName,ReadOnly ,RemoteServer,ProviderName 等 Reset 和 KeepSettings 都是False ，则 上面的属性都要设置成与源数据集相同Reset为True ，则上面的属性清空Reset为False 且 KeepSettings 为True，上面的属性不变数据操作对于两个的作用相同? 利用DATA属性仅复制数据集的数据 这种用法常见于凭证中 用法例子: 利用DisableControls和EnableControls屏蔽刷新和进行优化 用法例子: 利用BookMark标记记录 用法例子: 利用FindField判断某个字段是否存在 用法例子: 易飞事业部服务组 5