第7章 程序異常處理與調(diào)試技術(shù)

《第7章 程序異常處理與調(diào)試技術(shù)》由會(huì)員上傳分享，免費(fèi)在線閱讀，更多相關(guān)內(nèi)容在教育資源-天天文庫。

1、Delphi程序設(shè)計(jì)教程第7章程序異常處理與調(diào)試技術(shù)7.1異常處理7.1.1使用Try-Except語句處理異常7.1.2Try_Finally結(jié)構(gòu)7.1.3異常基類及其屬性和主要方法7.1.4Raise語句和異常處理的重引發(fā)7.2程序調(diào)試7.2.1調(diào)試的準(zhǔn)備7.2.2控制程序的執(zhí)行7.2.3使用斷點(diǎn)7.3.4監(jiān)視數(shù)據(jù)的值小結(jié)第7章程序異常處理與調(diào)試技術(shù)在Delphi中有兩種程序錯(cuò)誤，一種是編譯錯(cuò)誤，在程序編輯階段就可以由編譯器發(fā)現(xiàn)并給出提示。另外一種是運(yùn)行錯(cuò)誤，這類錯(cuò)誤不能在編譯階段查出，只能在程序執(zhí)行時(shí)發(fā)現(xiàn)，稱為運(yùn)行錯(cuò)誤。Delphi提供了一種機(jī)制來處理運(yùn)行錯(cuò)誤，保護(hù)程序的正常執(zhí)行，這種

2、機(jī)制就是異常處理。異常處理的方法是把正常的執(zhí)行程序同錯(cuò)誤的處理程序分離開來，這樣可以保證在沒有錯(cuò)誤時(shí)，程序正常執(zhí)行，當(dāng)發(fā)生錯(cuò)誤時(shí)，執(zhí)行錯(cuò)誤處理部分的程序，然后程序跳出保護(hù)模塊，繼續(xù)執(zhí)行后續(xù)的程序。7.1異常處理對于在應(yīng)用程序中經(jīng)常產(chǎn)生的異常，Delphi都進(jìn)行了定義。如在SysUtils單元中定義了類型轉(zhuǎn)換異常（EConvertError），數(shù)學(xué)異常(EMathError)，輸入輸出異常（EInOutError）等；在ComCtrl單元定義了日期異常（EDateTimeError），在Db單元中定義了數(shù)據(jù)庫異常(EDatabaseError)，等。因此只需在單元中引用這些系統(tǒng)庫單元就可以處理

3、這些異常7.1.1使用Try-Except語句處理異常Try_Except的一般結(jié)構(gòu)為：Try．．．//需要進(jìn)行異常檢測的語句序列Except．．．//發(fā)生異常時(shí)的錯(cuò)誤處理模塊End;//異常定義結(jié)束數(shù)學(xué)異常類在系統(tǒng)的SysUtils中聲明，其定義形式為：typeEMathError=class(Exception)；//由Exception類派生，是所有浮點(diǎn)數(shù)據(jù)錯(cuò)誤的基類EInvalidOp=class(MathError)；//無效的操作的指令EZeroDivide=class(MathError)；/被零除EOverflow=class(MathError)；//浮點(diǎn)數(shù)操作上溢EUnd

4、erflow=class(MathError)；//浮點(diǎn)數(shù)操作下溢EinvalidArgument=class(MathError)；//無效的參數(shù)End;一般有三種處理方式：1．不管發(fā)生什么異常，使用統(tǒng)一的錯(cuò)誤處理方式Try…//需要檢測的語句，例如可以是X:=Y/ZExceptHandleALLException;End;2．某些異常使用特殊的處理方式，而其余的異常使用統(tǒng)一的處理方式。對于一些可以預(yù)測的錯(cuò)誤，使用更為詳細(xì)的處理方式。例如：Try…ExceptOnEZeroDivideDoHandleZeroDivideError//處理被零除錯(cuò)誤OnEOverflowDoHandleOv

5、erflowError//處理溢出錯(cuò)誤OnEMathErrorDoHandleMathError//處理其他數(shù)學(xué)異常ElseHandleAllOtherError//前面沒有被處理的異常則由該程序負(fù)責(zé)處理End;3．只檢測某些錯(cuò)誤異常，不管其他的異常情況。7.1.2Try_Finally結(jié)構(gòu)Try_Fianally的一般結(jié)構(gòu)為：Try…//需要保護(hù)的程序語句序列Finally…//一定執(zhí)行的語句序列End;例如打開一個(gè)文件并進(jìn)行處理，在處理完成后必須關(guān)閉文件。則可以使用類似下面的結(jié)構(gòu)。VarTxtFile:TextFile;//定義文本文件變量存放打開的文件名字BeginIf(OpenDia

6、log1.Execute)Then//使用文件打開對話框BeginTryAssignFile(TxtFile,OpenDialog1.FileName);//打開新選擇的文件Append(TxtFile);//設(shè)置文件為追加方式Writeln(TxtFile,'異常檢測的例子');//向文件中添加一行文本Flush(TxtFile);//保證新內(nèi)容寫入文件finallyCloseFile(TxtFile);//關(guān)閉打開的文件end;end;end;7.1.3異常基類及其屬性和主要方法在Delphi中，所有異常的基類是Exception類。該類是所有其他異常類的祖先，即所有其他的異常類都是由該

7、類派生而來。例如前面的EmathError類即是由該類派生而來。1．xception屬性(1)Exception.HelpContext屬性(2)Exception.Message屬性2．exception方法(1)Exception.Create方法(2)Exception.CreateFmt方法(3)Exception.CreatHelp方法7.1.4Raise語句和異常處理的重引發(fā)除了使用前面介紹的Tr