DataSetProvider1.OnUpdateError
void __fastcall TFrmItem::Query1UpdateError(TDataSet *ASender, EFDException *AException, TFDDatSRow *ARow, TFDUpdateRequest ARequest, TFDErrorAction &AAction){ errmsg = E->Message; throw E;}