德尔福的单元测试 - 你是怎么做到的? [关闭]

问题描述 投票:59回答:9

我想知道这里的几个Delphi用户是如何进行单元测试的,如果有的话?是否存在与您发现的IDE集成的任何内容?如果没有,你使用什么工具,你是否拥有或知道示例小工程如何运作?

Update:

我忘了提到我正在使用BDS 2006 Pro,虽然我偶尔会使用Delphi 7,当然其他人可能正在使用其他版本。

delphi unit-testing delphi-7 delphi-2006
9个回答
40
投票

DUnit是一个xUnit类型的单元测试框架,用于win32 Delphi。自从Delphi 2005以来,DUnit被集成到IDE中。其他用于Delphi IDE的DUnit集成工具可以在here找到。 DUnit配有documentation with examples


19
投票

有一些关于DUnit的附加组件,也许这值得在SO上有一个新的条目。我现在可以列出的两个是

  1. FastMM4集成:单元测试将自动检测内存泄漏(和其他东西),适用于DUnit 9.3和更新版本
  2. OpenCTF是一个基于DUnit的“组件测试框架”,它为项目的表单,框架和数据模块中的所有组件动态创建测试,并使用自定义规则对其进行测试(开源)

9
投票

您可以查看我们的SynCommons open source unit中提供的单元测试类。它在我们的开源框架中用于所有回归测试。它可能不是最好的,但值得一看。

http://blog.synopse.info/post/2010/07/23/Unit-Testing-light-in-Delphi

为了实现单元测试,您只需通过创建一个类来声明一个新的测试用例:

type
  TTestNumbersAdding = class(TSynTestCase)
  published
    procedure TestIntegerAdd;
    procedure TestDoubleAdd;
  end;

procedure TTestNumbersAdding.TestDoubleAdd;
var A,B: double;
    i: integer;
begin
  for i := 1 to 1000 do
  begin
    A := Random;
    B := Random;
    CheckSame(A+B,Adding(A,B));
  end;
end;

然后创建一个测试套件并运行它。

在即将推出的1.13版本中,还有一个新的日志记录机制,其中包含任何引发异常的堆栈跟踪,就像MadExcept一样,使用.map文件内容作为源代码。

它现在由单元测试类使用,因此任何失败都会在日志中创建一个包含源代码行和堆栈跟踪的条目:

C:\Dev\lib\SQLite3\exe\TestSQL3.exe 0.0.0.0 (2011-04-13)
Host=Laptop User=MyName CPU=2*0-15-1027 OS=2.3=5.1.2600 Wow64=0 Freq=3579545
TSynLogTest 1.13 2011-04-13 05:40:25

20110413 05402559 fail  TTestLowLevelCommon(00B31D70) Low level common: TDynArray "" stack trace 0002FE0B SynCommons.TDynArray.Init (15148) 00036736 SynCommons.Test64K (18206) 0003682F SynCommons.TTestLowLevelCommon._TDynArray (18214) 000E9C94 TestSQL3 (163) 

没有记录的测试服和带测井的测试服之间的区别仅在于:

procedure TSynTestsLogged.Failed(const msg: string; aTest: TSynTestCase);
begin
  inherited;
  with TestCase[fCurrentMethod] do
    fLogFile.Log(sllFail,'%: % "%"',
      [Ident,TestName[fCurrentMethodIndex],msg],aTest);
end;

日志记录机制不仅可以记录测试:您可以记录方法的递归调用,选择要在日志中显示的信息,从客户端分析应用程序,将已发布的属性,TList或TCollection内容写为JSON到日志内容,等等......

第一次读取.map文件时,会创建一个.mab文件,该文件将包含所需的所有符号信息。您可以将带有.exe的.mab文件发送到您的客户端,或者甚至将其内容嵌入到.exe中。此.mab文件已优化:927,984字节的.map压缩为71,943 .mab文件。

因此,在纯OpenSource中,这个单元可以被认为是DUnit和MadExcept婚礼的自然孩子。 :)

其他信息是available on our forum。随意问。欢迎提供反馈和功能请求!适用于Delphi 6至XE。


9
投票

DUnit2可从http://members.optusnet.com.au/~mcnabp/获得

DUnit2比原来的dunit更经常地修改。它也适用于Delphi 2009。

尝试:http://sourceforge.net/projects/dunit2/ - 它原来的作者Peter McNab几年前去世了。在dunit邮件列表上还有一些活动。


9
投票

有一个新的单元测试框架用于开发中的现代Delphi版本:https://github.com/VSoftTechnologies/DUnitX


3
投票

通常我会创建一个单元测试项目(文件 - >新建 - >其他 - >单元测试 - >测试项目)。它包含了我需要的东西,所以它到目前为止已经足够好了。

我使用delphi 2007所以我真的不知道这是否在2006年可用。


2
投票

我们使用DUnit对所有逻辑代码进行单元测试,并使用AQTime中包含的代码覆盖率分析器来检查代码中的所有路径是否都由测试执行。


2
投票

我们有两种方法,首先我们运行Dunit测试,购买开发人员 - 这些确保刚刚更改的代码仍然像以前一样工作。另一种方法是使用CruiseControl.NET构建可执行文件,然后在每次更改时运行dunit测试,以确保更改不会产生意外后果。

我们的大部分代码库都没有测试,因此自动测试是一个持续开发的案例,以确保我们的应用程序按照我们认为应该的方式工作。


1
投票

我们尝试将DUnit与Delphi 5一起使用,但效果不佳。特别是如果您正在实现COM接口,我们发现许多依赖项来设置所有测试基础结构。我不知道测试支持在新版本中是否有所改进。

© www.soinside.com 2019 - 2024. All rights reserved.