本文講解了Dunit的最基本使用方法，是我再初識Dunit的一點積攢，現在總結出來供Dunit學習者起步之用，至于更深入的研究還靠讀者們的細心研究與不斷的實踐再實踐！本文如有講解錯誤之處還請讀者朋友們積極提出，我們共同討論，共同進步！
如有轉載請注明作者及出處。
Dunit初步詳解
一、安裝Dunit
將dunit-9.2.1（本文以dunit-9.2.1為例）解壓縮到文件夾F:\DUnit案例\dunit-9.2.1，
（dunit-9.2.1無需安裝，它提供的是javascript:;" onClick="javascript:tagshow(event, '%B2%E2%CA%D4');" target="_self">測試框架和一些測試類，只需要在Delphi中調用即可）
主要類型：
TestFramework.pas 框架本身
TestExtensions.pas 可用來擴充測試案例的 Decorator 類別
GUITesting.pas 用來測試使用者介面的類別
TextTestRunner.pas 在主控臺模式下執行測試的函式
GUITestRunner.pas 此框架的圖形化使用者界面
GUITestRunner.dfm GUITestRunner Form
二、設計測試案例
本文以Delphi 6開發環境為例，在這里我介紹兩種單元測試案例：
一種是簡單的不需調用其他Project的測試案例TestCase1；
另一種是調用其他Project中函數的測試案例TestCase2。
下面就開始我們的Dunit之旅：
1．首先將Dunit的路徑加載到Delphi中，
Tools ->Environment ->Options ->Library->Library path，
注意：一定要把路徑名給到src文件夾下。
2．新建一個項目，關閉Delphi自動啟動的Form1,Unit1.新建一個沒有Form的項目，File->New->Unit,保存：將項目保存為Project1Test.dpr，Unit1保存為Project1TestCases.pas。
在Project1TestCases.pas中敲入如下代碼：
（你可以用如下代碼替換掉Project1TestCases.pas中的代碼，假如你很懶的話�。�
unit Project1TestCases;
interface
uses
TestFrameWork; // TestFrameWork是每個測試用例都必須使用的類
type
TTestCaseFirst = class(TTestCase) // TTestCase包含在TestFrameWork中
published
procedure TestFirst; // 聲明一個測試用例
end;
implementation
procedure TTestCaseFirst.TestFirst;
begin
Check(1 + 1 = 2, 'Catastrophic arithmetic failure!');
end;
initialization
TestFramework.RegisterTest(TTestCaseFirst.Suite); // TestFramework.RegisterTest 程序會把傳入的測試案例組件注冊到此框架的注冊系統里
end.
文章來源于領測軟件測試網 http://www.anti-gravitydesign.com/
