第十二章異常處理與程序調(diào)試一-wenkub.com
2024-09-01 15:32 本頁面
【正文】 退出當前模塊后異常類自動清除。 end。 end。 try repeat BytesCopied := FileRead(Source, CopyBuffer^, ChunkSize)。 try Source := FileOpen(FileName, fmShareDenyWrite)。\39。 Destination: TFileName。 下面的例子摘自 ()節(jié)，是在文件拷貝中實現(xiàn)文件資源的保護： procedure CopyFile(const FileName, DestName: TFileName)。 try AInt := 10 div ADiv 。 對于 ()中的例子如下代碼即可確保所分配內(nèi)存資源的釋放： var APointer : Pointer 。 由于程序從異常發(fā)生點退出從而 FreeMem 永遠沒有執(zhí) 行的機會。 GetMem ( APointer , 1024 )。 需要保護的資源 一般說來需要保護的資源包括： ● 文件 ● 內(nèi)存 ● Windows 資源 ● 對象 比如下面一段程序就會造成 1K內(nèi)存資源的丟失。雖然在具體的使用中讀者還可能會碰到許多問題，但意識到應(yīng)該用異常類來增強程序的健壯性卻是程序設(shè)計水平走上新臺階的標志。有關(guān)數(shù)據(jù)庫的問題請讀者參閱本書第二編。 DDE 異常。 非法的菜單操作，例如試圖刪除一個不存在的菜單項。 專用部件異常類 許多部件都定義了相應(yīng)的部件異常類。其中 EInvalidOperation、 EOutOfResource 在 Controls 單元中定義； EComponentError 在 Classes 單元中定義。 Not Exist39。 (39。)。由于許多部件 (如 TListBox,TMemo,TTabSet,… )都有一個TStrings 類的重要屬性，因而字符串鏈表異常在部件操作編程中非常有用。C:\WINDOWS\39。例如試圖改變一個圖標 的大小。例如下面的代碼： (39。它在 printers庫單元中定義。 流異常類 流異常類包括 EStreamError、 EFCreateError、 EFOpenError、 EFilerError、EReadError、 EWriteError、 EClassNotFound。而 EBreakPoint、 ESingleStep被 Delphi IDE 的內(nèi)置調(diào)試器處理。 表 硬件異常類及其產(chǎn)生原因 ━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━ 異常類 引發(fā)原因 ───────────────────────────────── Efault 基本異常類。 硬件異常 硬件異常發(fā)生的情況 有兩種：或者是處理器檢測到一個它不能處理的錯誤，或者是程序產(chǎn)生一個中斷試圖中止程序的執(zhí)行。 end。)。 var rl : Real。這同整數(shù)異常類是不同的。 表 浮點異常類及其引發(fā)原因 ━━━━━━━━━━━━ ━━━━━━━━━━━━ 異常類 引發(fā)原因 ──────────────────────── EInvalidOp 處理器碰到一個未定義的指令 EZeroDivide 試圖被零除 EOverFlow 浮點上溢 EUnderFlow 浮點下溢 ━━━━━━━━━━━━━━━━━━━━━━━━ EInvalidOp 最常見的引發(fā)原因是沒有協(xié)處理器的機器遇到一個協(xié)處理器指令。 EIntOverFlow 異常類只有在編譯選擇框 Option|Project|Over_Flow_Check Option 選中時才產(chǎn)生。 for I := 0 to 100 do begin c := a*b*c。 a,b,c : Word。 ERangeError 異常只有當類型檢查打開時才會引發(fā)。 數(shù)組元素越界也會引發(fā)一個 ERangeError 異常，如： var Values: array[1..10] of Integer。 begin Item:= 4。 特定整數(shù)類型包括 ShortInt、 Byte 以及與整數(shù)兼容的枚舉類型、布爾類型等。 begin X := 100。 表 整數(shù)異常及其產(chǎn)生原因 ━━━━━━━━━━━━━━━━━━━━━ 異常類 引發(fā)原因 ───────────────────── EDiv
公司管理相關(guān)推薦
鄂ICP備17016276號-1