2011计算机等考Delphi讲义：异常处理与程序调试

　　12.1.2.4 字符串链表异常

　　字符串链表异常EStringListError、EListError在用户对字符串链表进行非法操作时引发。由于许多部件(如TListBox,TMemo,TTabSet,…)都有一个TStrings类的重要属性，因而字符串链表异常在部件操作编程中非常有用。

　　EStringListError异常一般在字符串链表越界时产生。例如对如下初始化的列表框：

　　ListBox1.Items.Add('First item');

　　ListBox1.Items.Add('Second item');

　　ListBox1.Items.Add('Third item');

　　则以下操作都会引起EStringListError异常：

　　ListBox1.Item[3] := ' Not Exist';

　　str := ListBox1.Item [3];

　　EListError异常一般在如下两种情况下引发：

　　1.当字符串链表的Duplicates属性设置为dupError时，应用程序试图加入一个重复的字符串;

　　2.试图往一个排序的字符串链表中插入一个字符串。

　　12.1.3 部件异常类

　　12.1.3.1 通用部件异常类

　　通用部件异常类常用的有三个：EInvalidOperation、EComponentError、EOutOfResource。其中EInvalidOperation、EOutOfResource在Controls单元中定义;EComponentError在Classes单元中定义。

　　1.非法操作异常 EInvalidOperation

　　EInvalidOperation 引发的原因可能有：

　　● 应用程序试图对一个Parent属性为nil的部件进行一些需要Windows句柄的操作

　　● 试图对一个窗口进行拖放操作

　　● 操作违反了部件属性间内置的相互关系等

　　例如，ScrollBar、Gauge等部件要求Max属性大于等于Min属性，因而下面的语句：

　　ScrollBar1.Max := ScrollBar1.Min-1;

　　将引发一个EInvalidOperation异常。

　　2.部件异常EComponentError

　　引发该异常的原因可能有：

　　● 在Register过程之外试图登录一个部件(常用于自定义部件开发中)

　　● 应用程序在运行中改变了一个部件的名称并使该部件与另一个部件重名

　　● 一个部件的名称改变为一个Object Pascal非法的标识符

　　● 动态生成一个部件与已存在的另一部件重名

　　3.资源耗尽异常EOutOfResource

　　当应用程序试图创建一个Windows句柄而Windows 却没有多余的句柄分配时引发该异常。

　　12.1.3.2 专用部件异常类

　　许多部件都定义了相应的部件异常类。但并不是有关部件的任何错误都会引发相应的异常类。许多情况下它们将引发一个运行时间异常或对象异常。

　　下面列出几个典型的部件异常类。

　　1.EMenuError

　　非法的菜单操作，例如试图删除一个不存在的菜单项。这一异常类在Menus库单元中定义。

　　2.EInvalidGridOpertion

　　非法的网格操作，比如试图引用一个不存在的网格单元。这一异常类在Grids库单元中定义。

　　3.EDDEError

　　DDE异常。比如应用程序找不到特定的服务器或会话，或者一个联接意外中止。这一异常类在DDEMan库单元中定义。

　　4.EDatabaseError，EReportError

　　数据库异常(EDatabaseError)和报表异常(EReportError) 在进行数据库和报表操作出现错误时引发。有关数据库的问题请读者参阅本书第二编。

　　12.1.4 小结

　　在这一节中重点介绍了Delphi提供的异常类体系。我们力求给读者一个清晰、全面的印象，使读者能在自己的程序开发中实际使用它们。为便于理解我们也提供了一些简单的说明性示例。虽然在具体的使用中读者还可能会碰到许多问题，但意识到应该用异常类来增强程序的健壮性却是程序设计水平走上新台阶的标志。

　　12.2 异常保护

　　确保回收分配的资源是程序健壮性的一个关键。但缺省情况下异常发生时程序会在出错点自动退出当前模块，因此需要一种特殊的机制来确保即使在异常发生的情况下释放资源的语句仍能被执行。而Delphi的异常处理正提供了这种机制。