RunRegisteredTests Routine |
Unit
TextTestRunner
Declaration
Function RunRegisteredTests(exitBehavior :TRunnerExitBehavior = rxbContinue): TTestResult;Implementation
function RunRegisteredTests(exitBehavior :TRunnerExitBehavior = rxbContinue) :TTestResult; begin Result := RunTest(registeredTests, [TTextTestListener.Create]); End; |
|