100分求助------ClientDataSet提交数据失败

Question

服务器端更新---------------------------------------------
function TRoBinService.UpdatesDataSet(const Delta: Binary; const CmdText: String): Boolean;
var ErrorCount,i:Integer;
begin
  QPub.SQL.Text := CmdText;
  DSPUpdate.ApplyUpdates(VariantFromBinary(Delta),-1,ErrorCount);
  if ErrorCount > 0 then
    raise Exception.Create('更新资料失败!');
  Result := True;
end;
客户端提交-------------------------------------------------
function TData.UpdatesDataSet(CDSDataSet:TClientDataSet): Boolean;
var tmpItem : TClientDataSet ;
begin
  if CDSDataSet.ChangeCount = 0 then
  begin
   Showmessage('没有数据要提交!');
   Exit;
  end;
  (RORemoteService as IRoBinService).UpdatesDataSet(BinaryFromVariant(CDSDataSet.Data),CDSDataSet.CommandText);
end;
--------------
提示违反了PRIMARY KEY 约束 'RK_Client_Info',不能在对象Client_info 中插入重复键
---------
但我并没有插入数据啊，，只是修改而已！

Answer 1

前面不是这个提示哦，，是0.O什么的，现在的提示违反了PRIMARY KEY 约束 'RK_Client_Info',不能在对象Client_info 中插入重复键我刚弄三层对这方面也不怎么了解呵