delphi - DUnit 测试层次结构

Question

目前我在 DUnit 中使用 2 级测试层次结构(测试项目 -> 测试用例 -> 测试方法；请参见下面的示例)。是否可以引入第三级甚至更多级别？

Answer 1

我通过在“SuitePath”中添加反斜杠来构建层次结构。例如:

initialization

  RegisterTests('Group1\Group2', [TExampleTests1.Suite,
                                  TExampleTests2.Suite]);

  RegisterTests('Group1\Group3', [TExampleTests3.Suite,
                                  TExampleTests4.Suite]);
end.

最后我得到了这样的结果:

比 David 的方式少了很多麻烦，而且您可以将组定义分布到不同的单元。