新手问题2号：在DELPHI中如何进行一般错误处理。

[dongdong]

在DELPHI中如何进行一般错误处理，代码怎么写？

[w102272]

try
except
end;

try
finally
end;

[CJ]

前者在except后写上万一出错后执行的任务；
后者在finally后写无论是否出错，都必须执行的任务

[wjt]

建立一个procedure
procedure MyException(Sender:TObject; E:Exception);
在form的 oncreat中加入
Application.OnException := MyException;
然后在myexception中根据不同的e.classname,e.message进行捕获处理。
可以try .. except配合使用比较方便

[Xiaojun219]

try
...
except
on E:EOleException do begin
datMgyf.ErrorHandle('你没有此操作的权限!');
datMgyf.gyfCnn.RollbackTrans ;
Edit1.Enabled :=False;
Time5.Enabled :=False;
exit;
end;
end;
这个错误信息不能捕到不是E:EOleException类的错误，有没有不分类的，而且能转成中文信息的

[Xiaojun219]

接上面的问题，总不能说每一类的都给它写个错误处理吧，有没有一个能代替
on E:EOleException的东西呢.