数据源记录集: 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);
来源: http://www.bubuko.com/infodetail-2944826.html