http://community.csdn.net/Expert/topic/3380/3380461.xml?temp=6.032962E-02
解决方案 »
- idhttp下载验证图片,Image显示问题
- 急!!请问老师:如何使TQuery数据集能编辑?
- ★★ 是大虾就请放马过来帮小弟一把! ----关于 adoDataset的SavetoFile和LoadFromFile引起的问题
- delphi 入门级求助,动态创建控件问题
- 用cgi写的web程序,里面怎么读写cookie.那位大哥帮帮我
- 升星放分
- aiirii(ari-爱的眼睛) ,你好,告诉我你QQ 或 MSN, 我需要把刚才的问题问清除
- 关于OBJECT PASICAL的指针问题(极简单)
- 也许没有答案,只是想跟大家讨论一下!
- 能介绍本关于WINDOWS消息的,全一点(包含最新WINDOWS消息)的书吗?。
- dev的dxdbgrid如何实现托拽(dragdrop)?
- 怎么在word文档中插入几行字啊
LocalADOConn: TADOConnection; //连接数据库
LocalADOQuery: TADOQuery; //连接LocalADOConn,连接打开本地表
LocalDSProvider: TDataSetProvider; //连接表:LocalADOQuery
LocalDataSet: TClientDataSet; //从LocalDSProvider取得本地表数据
以上连接你应该明白,不多说了 ^_^远程数据集: ClientDataSet;代码:
更新本地数据:
LocalDataSet.Data := ClientDataSet.Data;
追加到本地数据:
LocalDataSet.AppendData(ClientDataSet.Data);写入本地库:
LocalDataSet.ApplyUpdates(0);Ok了
clientdataset1--soapconneciton1ClientDataSet1.Close;
ClientDataSet1.CommandText:='select * from t_pos_xsd';//传给远程provider
ClientDataSet1.Open;
clientdataset2.Data :=ClientDataSet1.Data;
clientdataset2.AppendData(ClientDataSet1.Data,true);
clientdataset2.ApplyUpdates(0);
var
I: Integer;
begin
try
ClientDataSet1.DisableControls;
ClientDataSet2.DisableControls; ClientDataSet1.First;
while Not ClientDataSet1.Eof do begin
ClientDataSet2.Append;
for I := 0 to ClientDataSet1.FieldCount - 1 do
ClientDataSet2.Fields[I].Value := ClientDataSet1.Fields[I].Value;
ClientDataSet1.Next;
end;
ClientDataSet2.ApplyUpdates(-1);
finally
ClientDataSet1.EnableControls;
ClientDataSet2.EnableControls;
end;
end;
刚才看了一下
TClientDataSet没有批量新增记录的方法
的确只能这样了