读书人

将AdoDataSet的数据集传到ClientDataS

发布时间: 2012-02-12 17:16:33 作者: rapoo

将AdoDataSet的数据集传到ClientDataSet后遇到的问题……请大家帮忙解惑
AdoDataSet连接到本地的Access,按条件获得几条数据。
然后我使用 http://topic.csdn.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);

读书人网 >.NET

热点推荐