Question

我有一个dunit测试项目，我试图在控制台模式下运行它。当我执行项目时，它会运行两次（它只打开一个控制台窗口，我看到它执行两次测试）并且执行时也比在GUI模式下运行时花费更多时间。有谁知道如何只运行一次dunit控制台测试？

DPR源代码：

var  
  R: TTestResult;  

begin  
  Application.Initialize;  
  if IsConsole then begin  
    with TextTestRunner.RunRegisteredTests(rxbHaltOnFailures) do begin  
      R := TextTestRunner.RunRegisteredTests;  
      ExitCode := R.ErrorCount + R.FailureCount;  
      Free;  
    end  
  end  
  else begin  
    GUITestRunner.RunRegisteredTests;  
  end;  
end.

Answer 1

您正在调用TextTestRunner.RunRegisteredTests两次，导致您的测试执行两次。

只打电话一次，你会没事的。

Dunit控制台模式 - 执行测试两次

1 个答案: