RunBare method
Overrides the behavior of the base class as to execute the test repeatedly.

Applies to
TRepeatedTest

Declaration
Procedure RunBare(ATestResult: TTestResult);

Implementation

procedure TRepeatedTest.RunBare(ATestResult: TTestResult);
var
  i: integer;
begin
  assert(assigned(ATestResult));

  for i := 0 to FTimesRepeat - 1 do
  begin
    if ATestResult.shouldStop then
      Break;
    inherited RunBare(ATestResult);
  end;
End;


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