修复delphi datasnap三层中关于TDataSetProvider的bug,此bug在有数据库自增字段做主键时，出现key violation的错误

[HZ_Ring]

用uniquery+tdatasetprovider+tclientdataset,mssql数据表中包含有自动增值字段khid,类型为identify(1,1),且为表的主关键字; 在程序中修改和删除都没有问题,但增行时,增行总是提示错误'key violation'! 如何取消这个提示呢?
通过跟踪源代码，原来这个问题在于datasetprovider (tdatasetprovider)在中间层打包数据时，把数据约束（例如 主键）的信息也打包进去，然后到了客户端，clientdataset (tclientdataset)就会自动判断这些约束条件。但是在数据库设置的自动增量，是数据库自动生成的，这个时候如果在客户端添加数据，自动编号始终为空，就出问题了，因为这个时候数据根本没有提交给数据库，无法自动生成自动编号，可能解决的办法就是改datasetprovider (tdatasetprovider)的源代码，当遇到是自动编号做主键的时候，就不把主键信息打包到数据包里，也没有必要打包到数据包里，因为这个主键由数据库保障了
既然找到问题的原因了，我们就来修改
先打开Provider.pas,然后另存为到工程目录下面，然后找到
procedure TDataPacketWriter.AddIndexDefs(DataSet: TDataSet; const Info: TInfoArray);这个过程，
把 if not VarIsNull(KeyList) then
AddAttribute(pcktAttrArea, szPRIMARY_KEY, KeyList, False);
这两句代码屏蔽掉就可以了，当然还有更先进的办法，即使发现有自增字段的时候，不执行上班的两条语句