代码像以下样子：

[code delphi]
try
sds.append;
//...........
sds.post;
sds.ApplyUpdates(0);
except
on E:exception do
ShowMessage(E.Message);
end;
[/code]
当插入数据时，比如主键重复错误。操作被忽略，except后面的代码没有执行。

我也在研究这个问题.
徐新华的 delphi4核心编程技术 P186提到:
post出错时会触发OnPostError事件,与之类似的还有OnDeleteError.

我的方式是:
procedure TfrmMain.btnSaveClick(Sender: TObject);
var
n:integer;
s:string;
begin
with dmMysql.smpTest do
if ChangeCount > 0 then
try
Edit;
post;
n:=ApplyUpdates(0);
str(n,s);
if n<>0 then // note:有错误
showmessage('写回数据库时出错!数据未能存盘!共' s '条出错!');
except
on e: exception do
showmessage('错误信息: ' e.Message);
end;
end;

原因如下:
function ApplyUpdates(MaxErrors:integer):Integer;virtual;
返回值标志错误数,所以如果有错误发生则返回值必<>0.

編輯記錄

网络上搜索到一个方法,试验过确实能够使用.
=========================
在datasetProvider的onUpdateError
raise E;

然后就可以在客户端的
try
clientdataset1.applyUpdates(0);
except
on e:exception do
...
end;

====================
可是如果更改为
on e:edatabaseerror do
反而捕获不到.
很困惑!

編輯記錄