12.1.1 運行時間庫異常類(RTL Exception)

　　運行時間庫異常可以分為七類，它們都定義在SysUtils庫單元中。

　　12.1.1.1 I/O異常

　　I/O異常類EInOutError是在程序運行中試圖對文件或外設進行操作失敗后產生的，它從Exception派生后增加了一個公有數據成員ErrorCode，用于保存所發生錯誤的代碼。這一成員可用于在發生I/O異常后針對不同情況采取不同的對策。

　　當設置編譯指示{$I- } 時，不產生I/O異常類而是把錯誤代碼返回到預定義變量IOResult中。

　　12.1.1.2 堆異常

　　堆異常是在動態內存分配中產生的，包括兩個類EOutOfMemory和EInvalidPointer。

　　表12.1　堆異常類及其產生原因

　　━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━

　　異常類 引發原因

　　─────────────────────────────────

　　EOutOfMemory 沒有足夠的空間用于滿足所要求的內存分配

　　EInvalidPointer 非法指針。一般是由于程序試圖去釋放一個業已釋放的指針而引起的

　　━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━

　　12.1.1.3　整數異常

　　整數異常都是從一個EIntError類派生的，但程序運行中引發的總是它的子類：EDivByZero，ERangeError，EIntOverFlow。

　　表12.2　整數異常及其產生原因

　　━━━━━━━━━━━━━━━━━━━━━

　　異常類 引發原因

　　─────────────────────

　　EDivByZero 試圖被零除

　　ERangeError 整數表達式越界

　　EIntOverFlow 整數操作溢出

　　━━━━━━━━━━━━━━━━━━━━━━

　　ERangeError當一個整數表達式的值超過為一個特定整數類型分配的范圍時引發。比如下面一段代碼將引發一個ERangeError異常。

　　var

　　SmallNumber: ShortInt;

　　X , Y: Integer;

　　begin

　　X := 100;

　　Y := 75;

　　SmallNumber := X * Y;

　　end;

　　特定整數類型包括ShortInt、Byte以及與整數兼容的枚舉類型、布爾類型等。例如：

　　type

　　THazard = ( Safety , Marginal , Critical , Catastrophic );

　　var

　　Haz: THazard;

　　Item: Integer;

　　begin

　　Item:= 4;

　　Haz:= THazard ( Item );

　　end;

　　由于枚舉數越界而引發一個ERangeError異常。

　　數組元素越界也會引發一個ERangeError異常，如：

　　var

　　Values: array[1..10] of Integer;

　　i: Integer;

　　begin

　　for i := 1 to 11 do

　　Values[i] := i;

　　end;

　　ERangeError異常只有當類型檢查打開時才會引發。這可以在代碼中包含{$R+} 編譯指示或設置IDE Option|Project的Range_Checking Option選擇框。

　　EIntOverFlow異常類在Integer、Word、Longint三種整數類型越界時引發。如：

　　var

　　I : Integer;

　　a,b,c : Word;

　　begin

　　a := 10;

　　b := 20;

　　c := 1;

　　for I := 0 to 100 do

　　begin

　　c := a*b*c;

　　end;

　　end;

　　引發一個EIntOverFlow異常。

　　EIntOverFlow異常類只有在編譯選擇框Option|Project|Over_Flow_Check Option選中時才產生。當關閉溢出檢查，則溢出后變量保留該類整數的最大范圍值。