Delphi Mocks在DUnit中的生命周期

时间:2017-03-14 15:10:52

标签: delphi dunit delphi-mocks

我想测试最简单的情况:测试一个模拟的策略对象。 (看看:战略模式)。

如果我在TMock<T>方法中创建TTestCase.setUp并将其存储在TTestCase实例属性中,那么我应该在tearDown方法中释放/ NIL模拟变量?

mock := NIL无法编译:

  

[dcc32错误] TestUnit2.pas(44):E2010不兼容的类型:&#39; Delphi.Mocks.TMock&lt; T&gt;&#39;和指针&#39;。

mock.free运行时没有任何错误,但我不确定是否应该调用它。当进程退出其范围时(在测试用例析构函数之后),模型被释放。

我应该拨打/设置任何内容吗?

代码:

Unit2.pas:

unit Unit2;

interface

type
  TPartClass = class
  public
    function foo( x_ : integer ) : integer; virtual;
  end;

  TMainClass = class
  private
    fPart : TPartClass;
  public
    constructor create( part_ : TPartClass );

    function bar( x_ : integer ) : integer;
  end;

implementation

function TPartClass.foo( x_ : integer ) : integer;
begin
  result := x_ shl 1;
end;

constructor TMainClass.create( part_ : TPartClass );
begin
  inherited create;
  fPart := part_;
end;

function TMainClass.bar( x_ : integer ) : integer;
begin
  result := fPart.foo( x_ );
end;

TestUnit2.pas:

unit TestUnit2;

interface

uses
  Delphi.Mocks, TestFramework, Unit2;

type
  TTestTMainClass = class(TTestCase)
  strict private
    fPartClass : TMock<TPartClass>;
    FMainClass: TMainClass;
  public
    procedure SetUp; override;
    procedure TearDown; override;
  published
    procedure Testbar;
  end;

implementation

procedure TTestTMainClass.SetUp;
begin
  fPartClass := TMock<TPartClass>.create;
  FMainClass := TMainClass.Create( fPartClass );
end;

procedure TTestTMainClass.TearDown;
begin
  FMainClass.Free;
  FMainClass := NIL;
  //fPartClass.Free;
  //fPartClass := NIL;
end;

procedure TTestTMainClass.Testbar;
var
  ReturnValue: Integer;
  x_: Integer;
begin
  fPartClass.Setup.WillReturn( 10 ).When.foo( 5 );
  x_ := 5;
  ReturnValue := FMainClass.bar(x_);
  checkTRUE( returnValue = 10 );
end;

1 个答案:

答案 0 :(得分:1)

您应该始终清理在SetUp期间创建的TearDown中的所有内容。即使事情可能会在以后清理干净,这也是一种很好的做法,可以让您在单元测试时查找资源泄漏。

由于TMock<T>是一个内部保存接口的记录,因此您需要确保在测试运行后清除这些接口,尽管它们可能被下一个SetUp覆盖或者当测试用例实例被销毁时。

这就是.Free的意思(尽管来源中有评论)

一旦你用模拟执行更复杂的事情,这一点就更为重要,因为它可能会使事情保持活力或在测试后指向无效引用。我在测试应用程序结束时看到了一些糟糕的崩溃,但没有清理他们的模拟。