捐赠 | 广告 | 注册 | 发布 | 上传 | 关于我们    
  粤ICP备10103342号-1 DELPHI盒子 | 盒子文章 | 盒子问答悬赏 | 最新更新 | 盒子检索 | 下载中心 | 高级搜索    
  精品专区 | 繁體中文 | 奖励公告栏 | 直通车账号登陆 | 关闭GOOGLE广告 | 临时留言    
盒子资源分类
全部展开 - 全部合拢
只保存索索到记录的ClientDataSet源代码
关键字:DBClient ClientDataSet 保存索索 增强
来 自:原创
平 台:Win2k/XP/NT,Win2003 下载所需:0 火柴
深浅度:初级 完成时间:2007/4/19
发布者:body123 发布时间:2007/4/19
编辑器:DELPHI7 语  种:简体中文
分 类:数据库 下载浏览:336/8027
加入到我的收藏
下载错误报错
登陆以后才能下载
 用户名:
 密 码:
自动登陆(30天有效)
无图片
1)打开Delphi中的DBClient.pas文件,在TCustomeClientDataSet的Private部分添加FSaveAllRecords:Boolean;
2)在Public部分添加
property SaveAllRecords:Boolean read FSaveAllRecords Write FSaveAllRecords Default False;
3)查找
TCustomClientDataSet.WriteDataPacket(Stream: TStream; WriteSize: Boolean;
  Format: TDataPacketFormat = dfBinary);
begin
if Active then CheckBrowseMode;
  if IsCursorOpen then
  begin
    if FSaveAllRecords then //手动加上
    CheckProviderEOF;
    SaveDataPacket(Format);
  end;
..........
4)保存后并覆盖,就可以用。

我已经测试过,很正常,只需3个步骤。
Google
 
本站原创作品,未经作者许可,严禁任何方式转载;转载作品,如果侵犯了您的权益,请联系我们
龙脉加密锁 15元起 Grid++Report 报表 申请支付@网
 相关文章
没有相关文章
相关评论
共有评论5条
我要发表评论 查看全部评论
 
  DELPHI盒子版权所有 技术支持:深圳市麟瑞科技有限公司 1999-2024 V4.01 粤ICP备10103342号-1 更新RSS列表