如何将TClientDataSet数据导出到Tadodataset中

Question

如何将TClientDataSet数据导出到Tadodataset中

Answer 1

不明白你说的意思，试试添加一个DataSource，然后设置该DataSource的DataSet为ClientDataset，然后将ADODataset的DataSource设置为刚才添加的这个DataSource。

Answer 2

我的意思是:
function GetData(ADataSet: TDataSet): OleVariant;
begin
     with TDataSetProvider.Create(nil) do
     try
          DataSet := ADataSet;
          Result := Data ;
     finally
          Free;
     end;;
end;procedure TForm1.Button1Click(Sender: TObject);
begin
     ClientDataSet1.Data := GetData(ADODataSet1);
end;这个是将ADodataset导到clientdataset 
如何反过来?

Answer 3

一般情况下可以在同一种数据库组件中进行导入与导出,比如2个ClientDataSet间可以相互导.

Answer 4

我是作了一个Webservices　在里面用adodataset取出数据返回　客户端用clientdataset接收数据　并修改　然后再到webservices中更新　
ds1.commandtext:=......
ds1.open;
with TDataSetProvider.Create(nil) do
  try
    DataSet := ds1;
    cds.Data  := Data ;
  finally
  Free;
  end;
  Result :=cds.Data;
这样数据可以返回给客户端　但客户端修改后的数据如何再更新到数据库中呢?

Answer 5

现在的问题是传回webservices的data插入　更新　都可以　如果有删除则不行
cds.data :=data;//得到客户端的更新过的　但里面不能有删除　否则不行