一.异常的来源                   

  在Delphi应用程序中,下列的情况都比较有可能产生异常。

  1.文件处理

  2.内存分配

  3.windows资源

  4.运行时创建对象和窗体

  5.硬件和操作系统冲突

  6.网络问题

  7.数据库

  8.控件中的异常

  9.DLL文件的异常

  10.强制类型转换

  …………

二.异常的处理                   

  1.try...except...end;

    在try 体内的代码发生异常时,系统将转向except 部分进行异常的处理。这是Delphi处理异常的最基本的方式之一。

    只有当try 体内的代码发生异常时,才会跳转到except 里面的代码进行执行

  2.try...finally...end;

    这种异常处理结构一般用于保护windows的资源分配等方面,它确保了无论try 体内的代码是否发生异常,都需要由系统进行最后的统一处理的一些Windows对象的正确处理

    和try...except...ebd不同,该结构的finally部分总被执行

  3.不存在try...except...finally...end 结构来既处理异常,又保护资源分配的结构,但是,try...except...end结构允许嵌套到try...finally...end结构中,从而既处理异常,又保护资源的分配

三.异常的精确处理                 

1.定义一个异常

  在Delphi中,每个异常都是Exception类的一个派生类。因此,定义一个异常就是定义一个Exception类的派生类

1
2
type
    EMyException = class(Exception);

  当然,基类可以是Exception或者是Exception的任何一个任何层次的派生类

2.在程序中抛出一个异常

  根据不同的情况抛出异常是使用异常的最基本的模式。在Delphi中,由raise语句来实现

raise 异常类.Create('异常信息说明');

  注意因为使用了 异常类.Create('异常信息说明'); 所以也就是在内存中创建了一个异常实体。

1
2
3
begin
  raise Exception.Create('抛出异常');
end;
1
2
3
4
//例2:
begin
  raise Exception.CreateFmt('%s %d', ['错误代码:'999]);
end;

  

1
2
3
4
5
6
7
//例3:
var
  exc: Exception;
begin
  exc := Exception.Create('发现异常');
  raise exc;
end;

  

或者直接使用:raise;  

  看一个代码示例

1
2
3
4
5
6
7
8
9
var
    iTest: Integer;
    iStr: string;
...
try
    iTest:= StrIntTo(iStr);
except
    raise Exception.Create('抛出异常');
end;

  上面的代码可能会抛出异常,假如这是一个函数,那么在编程时候如果调用了这个函数的话不要忘记了要捕捉这个异常!

建议用法

  建议使用raise 异常类.Create('异常信息说明');这样的方式,以及另外两个相似的语法方式,因为这样可以在抛出异常的时候尽可能详细的说明异常的情况,那么以后在捕捉异常的时候就可以又比较多的信息来让我们了解到异常出现的地方,如果直接使用raise;的话

  在except中使用raise 的时候,执行完raise的代码之后,在except中的且在raise后的代码将不会执行,它会在执行完raise 的代码后直接跳出except,例程

1
2
3
4
5
6
7
8
9
10
var
    iTest: Integer;
    iStr: string;
...
try
    iTest:= StrIntTo(iStr);
except
    raise;
    ShowMessage('不会显示');
end;

  这个代码例子,如果出现异常之后,会进入except,执行完 raise之后将不会执行ShowMessage的语句,而是直接跳出,所以在编程的时候一定要注意!!

  如果想要在except中执行的代码,一定要放在raise的前面!!

3.在try...except...end中更加精确的捕捉异常

  可以使用 on E:异常类 do... 结构可以在 do 体内处理特定异常类所抛出的异常。

  如果在except中使用 on E: 异常类 do... 的话,在except中的 on E: 异常类 do...之外不能有任何语句,例如下面的语法是正确的

1
2
3
4
5
6
7
8
9
try
    ...
except
    on E: Exception do
    begin
        ShowMessage('OK');
        ShowMessage('OK Again');
    end;
end;

  但是下面的方式就错了

1
2
3
4
5
6
7
8
9
try
    ...
except
    on E: Exception do
    begin
        ShowMessage('OK');
    end;
        ShowMessage('Not OK');    //如果在except中使用 on E: 异常类 do 的话,在except中的 on E: 异常类 do之外不能有任何语句
end;

  

四.常见应用场景下的异常处理            

  异常信息的处理方法(写日志、抛出异常),函数或过程出现异常时,只能抛出异常,禁止弹出对话框架。

  函数及过程、控件中发生异常,通常是直接抛出异常,不要显示信息提示框;

  界面操作(按钮)中的异常,可以显示提示信息(视具体应用而定),也可以不显示提示而将异常信息保存到日志文件或两种方式同时使用;

  DLL文件中的异常:如果是函数或过程,发生异常时就直接抛出异常;如果是界面操作,则按界面操作(按钮)中的异常处理方法处理。

五.异常的调试                   

1.如何设置才能进行异常调试

  在Delphi IDE中,解除“Debugger Options”(可以使用菜单Tools->Debugger Options->OS Exception...进行访问)中的Integrated Debugging复选框的勾选状态可以进行异常的调试。

2.怎么能按照自己的异常处理来处理而不是报系统信息

  另外还有一个可能会遇到的困惑:为什么明明自己在代码中捕捉了异常并且进行了异常处理,但是最后显示的还是系统的报错框而不是我自己的处理效果。

  解决方法:需要在Tools-> Debugger Options-> Language Exceptions 配置界面上的 Stop on Delphi Exceptions选项解除勾选,就会是按照自己的异常处理逻辑处理,而不是系统的报错。

六.异常的补充说明                 

  1.每一段程序都有可能出错!这是软件业的一个不容置疑的现象和规律。事实上,传统的 if...else...结构完全可以解决所有的错误,使用 Exception 机制也没能够回避在最原始的层次,通过遍历可能的情况来产生异常的做法,那么,为什么还需要异常机制

    答案很简单:异常提供了一种更加灵活和开放的方式,使得后来的编程者可以来根据实际的情况处理这种错误,而不是使用预先设定好的处理结果。实际上,这就是异常处理机制的核心

http://www.cnblogs.com/xumenger/p/4359271.html

随机推荐

  1. html学习第三天—— 第13,14章

    颜色值缩写 关于颜色的css样式也是可以缩写的,当你设置的颜色是16进制的色彩值时,如果每两位的值相同,可以缩写一半. 例子1: p{color:#000000;} 可以缩写为: p{color: # ...

  2. zzz

    开放平台(TOP)的API是基于HTTP协议来调用的,开发者(ISV)可以直接使用TOP提供的官方SDK(支持多种语言,包含了请求的封装,签名加密,响应解释,性能优化等)来调用,也可以根据TOP的协议 ...

  3. lamp.phpstudy.net

    phpStudy phpStudy » PHP教程 » phpStudy for Linux (lnmp+lamp一键安装包) phpStudy for Linux (lnmp+lamp一键安装包) ...

  4. 关于DIV+CSS和XHTML+CSS的理解

    WEB标准是一系列标准的集合,并不是仅“DIV+CSS”布局就可以实现.以CSS网页布局只是标准的基础之一.“DIV+CSS”布局只是一种通俗的称呼罢了.而我们学习的目标在于以XHTML建立良好的语义 ...

  5. 记一次lnmp环境下无法执行php文件

    lnmp环境搭建好后却无法正常执行php文件,坑爹啊!~ [错误状况] 页面直接打印出php代码内容: php文件无法执行?: 查看nginx配置文件: server { listen 80; ser ...

  6. GC(Garbagecollection)垃圾回收

    在前面向大家讲解FTL时,我们提到了GC的操作,所谓GC就是把一个闪存块里的‘有效’页数据复制到一个‘空白’块里,然后把这个块完全擦除.GC是SSD里的一个非常关键的操作,其效率对性能有决定性影响.闪 ...

  7. LWIP_STM32_ENC28J60_NETCONN_TCP_SERVICER(5)

    前面说了TCP客户端通讯,这一篇来说说单片机作为服务器的通讯方法 tcp客户端和服务器的链接做大的不同在于服务器是不需要主动链接谁的,他只需要绑定在自己得一个特定的端口之上,等别人来连接就好了,先创建 ...

  8. Keepalive之nginx调度架构

    author:JevonWei 版权声明:原创作品 单主模式Keepalive之Nginx调度 实验目的:实现Nginx调度的高可用,当一台Nginx调度器故障时,启用备用的Nginx调度,在架构中, ...

  9. ETCD相关介绍--整体概念及原理方面

    etcd作为一个受到ZooKeeper与doozer启发而催生的项目,除了拥有与之类似的功能外,更专注于以下四点. 简单:基于HTTP+JSON的API让你用curl就可以轻松使用. 安全:可选SSL ...

  10. 带URL的XML解析方式

    XmlDocument xml = new XmlDocument(); xml.LoadXml(responseString); XmlNode root = xml.DocumentElement ...