EFDException

AException

void __fastcall TFrmItem::Query1UpdateError(TDataSet *ASender, EFDException *AException,
          TFDDatSRow *ARow, TFDUpdateRequest ARequest, TFDErrorAction &AAction)
    errmsg = E->Message;
    throw E;
void __fastcall TFrm::Query1UpdateError(TDataSet *ASender, EFDException *AException,
          TFDDatSRow *ARow, TFDUpdateRequest ARequest, TFDErrorAction &AAction)
dm->FDConnection1->Rollback();
    throw new Exception(  AException->Message );
                            
Delphi中ado+datasetprovider+clientdataset控件，执行更新clientdataset.applyupdates(0) 多表 更新单表 解决方法
                            
 1.先给ado控件指定字段(可以双击 add all fields）。 2.将不需要更新的字段的【providerflags】属性的pfInput和pfInWhere设置为false）。 注：在ADO操作多数据时，默认ADO是要提交多个表相关的语句，因此必须设置数据集字段的providerflags