RunTest Routine
Run a test using default features and notifying the given set of listeners of testing events.

Unit
TestFramework

Declaration
Function RunTest(suite :ITest; listeners :array of ITestListener): TTestResult;

Parameters
suite The test to run.

Implementation

function RunTest(suite :ITest; listeners :array of ITestListener) :TTestResult; overload;
var
  i         :Integer;
begin
    result := TTestResult.Create;
    for i := low(listeners) to high(listeners) do
        result.addListener(listeners[i]);
    suite.Run(result);
End;


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