RunBare method
Runs the tests in the suite.

Applies to
TTestSuite

Declaration
Procedure RunBare(testResult: TTestResult);

Parameters
TestResult Where to accumulate the test results.

See Also

Implementation

procedure TTestSuite.RunBare(testResult: TTestResult);
var
  i: Integer;
  test: ITest;
begin
  assert(assigned(testResult));
  assert(assigned(fTests));

  if getEnabled then
  begin
    for i := 0 to fTests.Count - 1 do
    begin
      if testResult.ShouldStop then
        BREAK;
      test := fTests[i] as ITest;
      test.RunBare(testResult);
    end;
  end;
End;


HTML generated by Time2HELP
http://www.time2help.com