Delphi异常处理try except语句和try finally语句用法以及区别

时间:2022-12-08 20:44:13

Comments

一直写程序都没管他们,也尽量很少用,今天终于想把他给弄个明白,在网上找来,记下!
主要是前面小部分,后面的是详细说明(很啰嗦!)

一、异常的来源
  在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机制也没能够回避在最原始的层次,通过遍历可能的情况来产生异常的做法,那么,为什么还要异常机制?
  
  答案很清楚:异常提供了一种更加灵活和开放的方式,使得后来的编程者可以来根据实际的情况处理这种错误,而不是使用预先设定好的处理结果。