亚洲好骚综合-亚洲黄色录像-亚洲黄色网址-亚洲黄色网址大全-99久久99久久-99久久99久久精品国产

　　Check 是TestCase 類提供的一個方法。以下是TestCase 的實現代碼：

　　如果Check 沒有通過的話，Dunit 將報錯。錯誤提示在第二個參數中定義，其他有關類及方法的定義請看連機文檔，文檔放在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.

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