Applies toTTextTestListener
DeclarationProcedure TestingStarts; Implementation
procedure TTextTestListener.TestingStarts; begin writeln; writeln('DUnit / Testing'); startTime := now; End;