在BCB中使用DUnit
来源:互联网 发布:朗读word的软件 编辑:程序博客网 时间:2024/05/16 08:19
因为最近在用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一页中的Includepath和Librarypath中都加入dunit/src的路径。然后在Project中加入TestFramework.pas和GUITestRunner.pas两个单元。
第三步修改Project实现:打开Project源码文件(TestPrj.cpp),修改如下(注意注释的说明):
#include
#pragma hdrstop
// 加入两个头文件
#include <testframework.hpp>
#include <guitestrunner.hpp>
//---------------------------------------------------------------------------
USEFORMNS("../../../dunit/src/GUITestRunner.pas", Guitestrunner, GUITestRunner);
//---------------------------------------------------------------------------
WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
{
try
{
Application->Initialize();
// 替换掉标准的Application->Run();
Guitestrunner::RunRegisteredTests();
}
// 以下省略
第四步增加自己的测试用例:新增一个空单元,指定一个单元名,如MyTestCase,后保存。在MyTestCase.h中增加如下代码:
#include <testframework.hpp>
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函数可以单独做一个公用单元,以便使用。
- 在BCB中使用DUnit
- 在BCB中使用Lua
- 在BCB中使用Lua
- 在BCB中使用Lua
- 在BCB中使用Lua
- 在BCB中使用Lua
- 在BCB中使用Lua
- 在BCB中使用Lua
- 在BCB中使用Lua
- 在BCB中使用Lua
- 在BCB中使用Lua
- 在BCB中使用DirectX
- 在BCB中轻松使用ActiveX控件
- 在BCB中使用选择文件夹对话框
- 在BCB中使用多线程 ( 转载 )
- 关于如何在BCB中使用CodeGuard
- 在BCB中使用多线程实例
- 在BCB中使用多线程实例
- 呵呵!最近两天整理了我的移动硬盘
- 怕!加盟连锁三大误区
- 加盟连锁如何降低风险?
- 惨痛经历换来的防骗秘籍
- 关于Csdn dotnet 团队
- 在BCB中使用DUnit
- VB内嵌汇编
- 最近的事情有些繁杂!
- 无序到有序,有序到整合,互联网的发展,也是事物发展的规律
- 构建以数据为中心的应用程序
- 理解 SOAP
- 可靠的 XML Web Service
- 在运行时使用 UDDI,第一部分(UDDI 技术文章)
- 有用的网络命令