delphi DUITX调用带参数的设置

6yjfywim 于 2022-11-04 发布在其他

关注(0)|答案(1)|浏览(181)

我认为单元测试的最佳实践是编写始终调用的代码（如创建对象，对这些对象进行主初始化，...），以便在设置过程中进行测试

[TestFixture]
  TMY_Testcases = class
  private

    FTestConfigParameter: TParameter;

  public

    [Setup]
    procedure Setup;
    [TearDown]
    procedure TearDown;

    [Test]
    [TestCase('CreateTrue', 'True')]
    [TestCase('CreateFalse', 'False')]
    procedure Test_DoMyTest (Createflag : Boolean);

  end;

我有几组对象的参数，我在设置过程中创建了对象。有没有办法通过设置过程运行测试用例来获取我的参数？我的ugl解决方案是这样的：

[Setup]
    procedure Setup;
    [TearDown]
    procedure TearDown;

    procedure MySetup(MyParameter : TParameter);

    [TestCase('CreateWithParameter', 'False,Parameter_AsString')]
     procedure Test_DoMyTest (Createflag : Boolean, Parameter : TParameter);

这种方法使设置和拆卸过程过时，有更好的方法吗？

delphi

来源：https://stackoverflow.com/questions/74252805/dunitx-call-setup-with-parameters

1条答案

按热度按时间

pxiryf3j1#

属性Setup显然没有自己的参数。如果这些参数应该由测试填充，那么每个测试也应该有这些参数？或者应该如何工作？
Setup属性背后的想法是为你的测试设置一些东西，这些东西对你的夹具中的所有测试都是这样工作的。否则，它是一个专门属于你的测试的设置，然后你得到一个解决方案，就像你自己已经弄明白了一样。

procedure TMY_Testcases.Test_DoMyTest (Createflag : Boolean, Parameter : TParameter);
begin
  MySetup(Parameter);

  // Test here...
end;

赞(0）回复(0）举报 2022-11-04

我来回答

delphi DUITX调用带参数的设置

1条答案

相关问题

热门标签

最新问答