Decorate a test.Applies to
TTestDecorator
Declaration
Constructor Create(ATest: ITest; AName: string = '');
Description
If no name parameter is given, the decorator will be named as the decorated test, with some extra information prepended.
ATest | The test to decorate. |
AName | Optional name to give to the decorator. |
Implementation
constructor TTestDecorator.Create(ATest: ITest; AName: string = '');
begin
if AName <> '' then
inherited Create(AName)
else
inherited Create(ATest.name);
FTest := ATest;
FTests:= TInterfaceList.Create;
FTests.Add(FTest);
End; |
HTML generated by Time2HELP
|
http://www.time2help.com