一、异常的来源 什么是异常程序开发过程中,有编译期错误和运行期错误,编译期错误很容易发现,而运行期错误(逻辑错误和异常)往往很难预料.为了程序的稳定性和可靠性,就需要对程序异常处理和保护. 异常:理解为一种特殊的事件,该事件发生时,程序的正常执行将被打断.由程序导致的不正常情况是错误而不是异常,程序错误与异常不是相同的概念.异常是为方便用户报告错误并处理错误而创建的机制,一般是由操作系统完成的.运行期错误处理 在Delphi的应用程序中,下列的情况都比较有可能产生异常。 (1)文件处理 (2)内存分配 (3)Windows资源 (4)运行时创建对象和窗体 (5)硬件和操作系统冲突
二、异常的处理 (1)try…except…end; 在try体内的代码发生异常时,系统将转向except部分进行异常的处理。这是Delphi处理异常的最基本的方式之一。 (2)try…finally…end; 这种异常处理结构一般用于保护Windows的资源分配等方面,它确保了无论try体内的代码是否发生异常,都需要由系统进行最后的统一处理的一些Windows对象的正确处理。 和try…except…end不同,该结构的finally部分总被执行。
(3)不存在try…except…finally…end结构来既处理异常,又保护资源分配的结构,但是,try…except…end结构允许嵌套到try…finally…end结构中,从而实现既处理异常,又保护资源的分配。 三、异常的精确处理 (1)定义一个异常。 在Delphi中,每个异常都是Exception[1]类的一个派生类[2]。因此,定义一个异常就是定义一个Exception类的派生类。 type EMyException = class(Exception); 当然,基类可以是Exception或者Exception的任何一个任何层次的派生类。 (2)在程序中抛出一个异常。 根据不同的情况抛出异常是使用异常的最基本的模式。在Delphi中,由raise语句来实现。 【语法】raise 异常类.Create(‘异常的缺省说明’); (3)在try…except…end中更加精确的捕捉异常。 使用on E:异常类 do…结构可以在do体内处理特定异常类所抛出的异常。 四、异常的调试 在Delphi IDE中,解除“Debugger Options”(可以使用菜单Tools—>Debugger Options…进行访问)中的Integrated Debugging复选框的勾选状态可以进行异常的调试。 五、异常的补充说明 (1)每一段程序都有可能产生错误!这是软件业的一个不容置疑的现象和规律。事实上,传统的if…else…结构完全可以解决所有的错误,使用Exception机制也没能够回避在最原始的层次,通过遍历可能的情况来产生异常的做法,那么,为什么还要异常机制
示例:
try//尝试执行
{SomeCode}
except//出错的时候执行, Except有特定的错误类型
{SomeCode}
end;
try//尝试执行
{SomeCode}
finally//无论如何都强制执行
{SomeCode}
end;
例:
try
Age:=StrToInt(Edit1.Text);
ShowMessage(Format('生于%d年',[YearOf(Now)-Age]));
except
on EConvertError do
showmessage('输入编辑框的不是一个有效的数字!');
on ERangeError do
showmessage('输入编辑框的年龄值太大!');
end;
抛出异常代码
begin
raise Exception.Create('抛出异常');
end;
//例2:
begin
raise Exception.CreateFmt('%s %d', ['错误代码:', 999]);
end;
//例3:
var
exc: Exception;
begin
exc := Exception.Create('发现异常');
raise exc;
end;
|
请发表评论