anchor.diff:    Rtti,
     SysUtils,
     TimeSpan,
  +  DateUtils,
     DUnitX.Generics,
     DUnitX.TestResults,
     Delphi.Mocks;
  
positive.code:   mockResults : TMock<ITestResults>;
  
    sExpectedEnding : string;
  begin
    mockStream := TStringStream.Create('', TEncoding.UTF8);
  
  
negative.code:   mockResults.Setup.WillReturn(3).When.FailureCount;
    mockResults.Setup.WillReturn(1).When.ErrorCount;
    mockResults.Setup.WillReturn(50).When.SuccessRate;
  
    TempStartTime := EncodeDateTime(2000, 2, 1, 11, 32, 50, 0);
    TempFinishTime := EncodeDateTime(2000, 2, 28, 12, 34, 56, 0);
    StartTimeStr := DateTimeToStr(TempStartTime);
    FinishTimeStr := DateTimeToSTr(TempFinishTime);
  
  
    mockResults.Setup.WillReturn(TempStartTime).When.StartTime;
    mockResults.Setup.WillReturn(TempFinishTime).When.FinishTime;
    mockResults.Setup.WillReturn(TValue.From<TTimeSpan>(TTimeSpan.FromMilliseconds(80129120))).When.TestDuration;
  
    logger := TDUnitXXMLNUnitLogger.Create(mockStream);
  