在BCB中使用DUnit

王朝other·作者佚名  2006-01-10
窄屏简体版  字體: |||超大  

因为最近在用BCB写一个程序,而C++的测试框架没有什么好用的:CppUnit(GUI)只支持VC(现在好像也支持XWIN,不过没试过),boost的测试框架只有命令行。而我在DELPHI下用DUnit习惯了,所以就想到在BCB里使用DUnit,经过一番尝试,终于取得了成功。

虽然说BCB和DELPHI都是基于VCL,但C++毕竟还是与DELPHI不同的,本文将按DUnit文档中所说的那个最简单的例子来说明如何将DUnit用于BCB中。

首先创建测试应用程序:新建一个Project,删除默认的主窗体单元,然后指定一个Project name,比如TestPrj,并保存。

二步加入DUnit:修改Project Options,在Directories/Conditionals一页中的Include

path和Library

path中都加入dunit\src的路径。然后在Project中加入TestFramework.pas和GUITestRunner.pas两个单

元。

第三步修改Project实现:打开Project源码文件(TestPrj.cpp),修改如下(注意注释的说明):

#include

#pragma hdrstop

// 加入两个头文件

#include

#include

//---------------------------------------------------------------------------

USEFORMNS("..\..\..\dunit\src\GUITestRunner.pas", Guitestrunner, GUITestRunner);

//---------------------------------------------------------------------------

WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)

{

try

{

Application->Initialize();

// 替换掉标准的Application->Run();

Guitestrunner::RunRegisteredTests();

}

// 以下省略

第四步增加自己的测试用例:新增一个空单元,指定一个单元名,如MyTestCase,后保存。在MyTestCase.h中增加如下代码:

#include

class TMyFirstTestCase : public TTestCase

{

__published:

void __fastcall TestFirst(void);

};

在MyTestCase.cpp中增加如下代码:

void __fastcall TMyFirstTestCase::TestFirst( void )

{

Check(1 + 1 == 2, "Catastrophic arithmetic failure!");

}

// 因为DUnit中的TestCase类的Suite类方法使用了一些C++不支持的特性

// (用self传递类类型),故不用,另外实现一个GetSuite

_di_ITest __fastcall GetSuite( TMetaClass * aClass )

{

_di_ITest Result;

if ( !Supports( new TTestSuite( aClass ), __uuidof( ITest ), &Result ) )

throw Exception( "Interface ITest not supported" );

return Result;

}

// 以下模拟DELPHI的Initialization

class TMInitialization

{

public :

TMInitialization( )

{

Testframework::RegisterTest( GetSuite( __classid( TMyFirstTestCase ) ) );

}

};

// 此类实例无用,仅供Initialization

TMInitialization dummy;

如此,便可在BCB中使用DUnit进行测试驱动开发了,效果应该不会比VC下用CppUnit差。其中GetSuite函数可以单独做一个公用单元,以便使用。

 
 
 
免责声明:本文为网络用户发布,其观点仅代表作者个人观点,与本站无关,本站仅提供信息存储服务。文中陈述内容未经本站证实,其真实性、完整性、及时性本站不作任何保证或承诺,请读者仅作参考,并请自行核实相关内容。
 
 
© 2005- 王朝網路 版權所有 導航