将AdoDataSet的数据集传到ClientDataSet后遇到的有关问题…请大家帮忙解惑

将AdoDataSet的数据集传到ClientDataSet后遇到的问题……请大家帮忙解惑
AdoDataSet连接到本地的Access，按条件获得几条数据。
然后我使用 http://topic.****.net/t/20050407/13/3916666.html# 中3楼pazee的方法 将这几条数据传给了ClientDataSet

Delphi(Pascal) code

  dstRegistration.DisableControls;

  try 
    dmData := TdmData.Create(nil);

    dmData.cdsRegistration.Active := True;

    dmData.cdsRegistration.Data := dspRegistration.Data;

    dmData.cdsRegistration.Insert; 

    dmData.cdsRegistration.Post;

    if (dmData.cdsRegistration.ChangeCount > 0) then
      dmData.cdsRegistration.ApplyUpdates(-1);

    dmData.cdsRegistration.Active := False;
    
  finally

    dstRegistration.EnableControls;

    dmData.Free;
    
  end;

去数据库查询，数据没有被插入……这是为什么呢？

------解决方案--------------------
不知道你是怎么设置的.可以这样试试,使用ADOQuery查询,提供数据

ADOQuery.Connection=ADOConnection;
DataSetProvider.DataSet:=ADODataSet;
ClientDataSet.ProviderName=DataSetProvider;

with ADOQuery do
begin
Close;
SQL.Clear;
SQL.ADD('Select * From t');
Open;
end;
这样ClientDataSet就有数据了

而数据操作,就操作ClientDataSet即可,如:ClientDataSet.Append;Edit;Post;Cancel;...等等

提交到数据库:
if ClientDataSet.State In [dsEdit,dsInsert] then
ClientDataSet.Post;
if ClientDataSet.ChangeCount>0 then
ClientDataSet.ApplyUpdates(-1);