C
Crane
Unregistered / Unconfirmed
GUEST, unregistred user!
我来啦!
to CJ:
我看离线版时发现你在今年3月就对midas很了解了,谈谈经验好吗?
to rixin:
不忍让兄弟着急,先给你我会的吧!
const CDSCount=22;//"子包"的数量
var
DataSave:IDataSave;//S端的接口变量,在你S端的XXXX_TLB.pas中声明
vDeltas:OleVariant;
iIndex:integer;
begin
SaveInit;作些你的准备工作
vDeltas:=VarArrayCreate([0,CDSCount], varVariant);//生成动态数组
iIndex:=-1;
dmGenInfo.CreateDeltas(iIndex,vDeltas);
dmBaoxian.CreateDeltas(iIndex,vDeltas);
dmGoods.CreateDeltas(iIndex,vDeltas);
//以上为将delta打包到大包vDeltas的过程.
DataSave:=CoDataSave.CreateRemote(S端计算机名);
DataSave.Save(vDeltas,0);//save为自定义的方法
end;
S端Demo
SAVE方法可以如下:
var
v:OleVariant;
ID,desc1,desc2:String;
begin
v:=CreateOleObject('EntityMnt.Entity');//生成本地com,此com用于你的大数据更新;
v.Update(传过来的大包变量);//用于"修理"你的大库(此处应用事务保证更新的连贯)
end;
to CJ:
我看离线版时发现你在今年3月就对midas很了解了,谈谈经验好吗?
to rixin:
不忍让兄弟着急,先给你我会的吧!
const CDSCount=22;//"子包"的数量
var
DataSave:IDataSave;//S端的接口变量,在你S端的XXXX_TLB.pas中声明
vDeltas:OleVariant;
iIndex:integer;
begin
SaveInit;作些你的准备工作
vDeltas:=VarArrayCreate([0,CDSCount], varVariant);//生成动态数组
iIndex:=-1;
dmGenInfo.CreateDeltas(iIndex,vDeltas);
dmBaoxian.CreateDeltas(iIndex,vDeltas);
dmGoods.CreateDeltas(iIndex,vDeltas);
//以上为将delta打包到大包vDeltas的过程.
DataSave:=CoDataSave.CreateRemote(S端计算机名);
DataSave.Save(vDeltas,0);//save为自定义的方法
end;
S端Demo
SAVE方法可以如下:
var
v:OleVariant;
ID,desc1,desc2:String;
begin
v:=CreateOleObject('EntityMnt.Entity');//生成本地com,此com用于你的大数据更新;
v.Update(传过来的大包变量);//用于"修理"你的大库(此处应用事务保证更新的连贯)
end;