Delphi ClientDataSet复制记录

2021-06-16 05:04

阅读:634

标签:false   复制   ldd   dde   data   edit   created   set   sign   

数据源记录集:ClientDataSetSource;目标记录集:ClientDataSetCopy

1)复制一条记录。

  ClientDataSetCopy.Close;
  ClientDataSetCopy.Fields.Clear;
  ClientDataSetCopy.FieldDefs.Clear;

  //复制字段定义
  ClientDataSetCopy.FieldDefs.Assign( ClientDataSetSource.FieldDefs);
  ClientDataSetCopy.CreateDataSet;
  ClientDataSetCopy.Edit; //Append;

  //复制当前记录行
  ClientDataSetCopy.CopyFields(cds1);

 

2)复制所有记录。

  ClientDataSetCopy.Close;
  ClientDataSetCopy.Fields.Clear;
  ClientDataSetCopy.AppendData(ClientDataSetSource.Data,False);

Delphi ClientDataSet复制记录

标签:false   复制   ldd   dde   data   edit   created   set   sign   

原文地址:https://www.cnblogs.com/jijm123/p/10351797.html


评论


亲,登录后才可以留言!