RegisterTestSuites Routine
Register a series of test suites consisting of the published methods of the TTestCase descendants passed in the classes array.

Unit
TestFramework

Declaration
Procedure RegisterTestSuites(SuitePath :string; const classes :array of TTestCaseClass);

Parameters
path Indicates a path of tests suites to register the test under.
Tests The series of tests to register.

See Also




Use RegisterTest(string, array of ITest) instead, in combination with TTestCase.Suite, and TTestSuite.Create.

Implementation

procedure RegisterTestSuites(SuitePath :string; const classes :array of TTestCaseClass);
var
  i :Integer;
begin
  for i := Low(classes) to High(classes) do begin
    TestFramework.RegisterTest(SuitePath, classes[i])
  end
End;


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