Check 是TestCase 類提供的一個方法。以下是TestCase 的實現(xiàn)代碼：

　　如果Check 沒有通過的話，Dunit 將報錯。錯誤提示在第二個參數(shù)中定義，其他有關(guān)類及方法的定義請看連機文檔，文檔放在Dunit 安裝目錄docAPIIDH_Library_DUnit_-_Xtreme_Unit_Testing_for_Delphi.htmInitialzation 代碼完成測試單元的注冊。

　　修改Project 主文件

　　運行前的后一步是修改Project 主文件TestProject.dpr。先使用菜單Project->View Source 打開TestProject.dpr.

　　修改后的代碼如下：

       program TestProject;
       uses
       Forms，
       TestFrameWork，
       GUITestRunner，
       TestUnit in 'TestUnit.pas';
       {$R *.res}
       begin
              Application.Initialize;
       //Application.Run;
       GUITestRunner.RunRegisteredTests;
       end.

　　上面的加粗代碼是要增加和修改。