急！！三层更新问题！！(100分)

有谁用过Delphi6指南中21章三层中更新单元的，第756页的
我用的是中层ADO,客户端用DCOM
客户端出错,客户端执行到下面出错
procedure reconciledeltas(const cdsarray:array of Tclientdataset;
vdeltaarraylevariant);
var
bReconcile:boolean;
i:integer;
lowCDS,HhighCDS:integer;
begin
lowcds :=low(cdsarray);
highcds:=high(cdsarray);
bReconcile := false;
for i:= lowcds to highcdsdo
if not varisnull(vDeltaarray) then
//出错提示'Invalid argument'
begin
cdsarray.reconcile(vDeltaarray);
bReconcile :=true;
break;
end;
if not bReconcile then
for i:=highcdsdo
wnto lowcdsdo
begin
cdsarray.reconcile(vdeltaarray);
cdsarray.refresh;
end;
end;
end;

if not varisnull(vDeltaarray) then

此句是否应该该为：
if not varisnull(vDeltaarray.Delta) then

或
if not varisnull(vDeltaarray.Data) then

：hophy
我试了一下，还是不行，在那句出一样的错.

在主从表都新增时,在下面出现Invalid data packet
cdsArray.Reconcile(vDeltaArray);
烦请哪位FW指教，先谢过了,
Delphi6指南中21章三层中更新单元的，第756页的

你使用是是Delphi 几啊？我在D5中试都可以哦！
再定一个aa:Olevariant类型的。
把vDeltaarray)赋给aa
if not varisnull(aa) then

就可以通过了吧！