分享
 
 
 

NUnit学习笔记 Delphi 2006篇

王朝delphi·作者佚名  2006-02-04
窄屏简体版  字體: |||超大  

一、简介

NUnit是一款堪与JUnit齐名的开源的回归测试框架,供.net开发人员做单元测试之用,可以从www.nunit.org网站上免费获得,最新版本2.2.6。NUnit 2.2.6有5个下载文件,这里用的是NUnit-2.2.6-net-1.1.msi。下载后双击该文件,然后按提示进行安装,这样系统中就具备NUnit环境了。

二、配置类库

这次我选择的IDE是Borland的Delphi 2006(正确的叫法应该是Borland Developer Studio 2006,以下简称Delphi)。打开后点击菜单“File”->“New”->“Other”,打开“New Items”对话框:

在该对话框中,选择“C# Projects”或“Delphi for .NET Projects”,虽然两者在操作上会稍有差异,但其实相差并不很大。然后选择其中的“Console Application”,点击“OK”按钮。如果选择的是C#,那么会弹出一个“New Application”对话框:

请在其中设置项目名称和保存位置,我的项目名称为NUnitCS,位置为本机的G:\MDZPCK\Borland\MySY\NUnitCS,设置好后,点击“OK”按钮。如果选择的是Delphi,那么跟以前版本的Delphi一样,项目会直接被创建,而不弹出任何对话框。此时请按下快捷键Ctrl + S,打开Save对话框,对项目进行保存,这是一个良好的习惯。我将自己的项目文件名称设为NUnitOP.bdsproj(因为Delphi使用的是Object Pascal语言嘛),该文件名就是项目名称,保存路径为G:\MDZPCK\Borland\MySY\NUnitOP。

项目创建后,点击菜单“Project”->“Add Reference”,打开“Add Reference”对话框:

在“.NET Assembles”选项卡中找到组件名称为nunit.framework的一项,双击添加到“New References”中,别的组件不用管,然后点击“OK”按钮,此时在项目中就可以使用NUnit类库了。

三、编写用于测试的类

用于测试的类很简单,名为Book,只有id和name两个属性,这两个属性将分别用于两个用例当中。

下面开始编写,请点击菜单“File”->“New”->“Other”,打开“New Items”对话框:

在该对话框中选择“C# Projects”或“Delphi for .NET Projects”下的“New Files”,然后选中“Class”,点击“OK”按钮。此时Class文件虽然在工程中已生成,但尚未保存在硬盘上,所以请先按下快捷键Ctrl + S,我将文件命名为Book.cs和Book.pas。这里插一句,我感觉Delphi在文件保存这方面做的很差劲,如果没有经常保存文件的习惯,搞不好真的会出问题。

类创建后,需要修改代码,下边是C#代码:

using System;

namespace NUnitCS

{

/// <summary>

/// Summary description for Book.

/// </summary>

public class Book

{

private string pid = null;

private string pname = null;

public string id

{

get

{

return pid;

}

set

{

pid = value;

}

}

public string name

{

get

{

return pname;

}

set

{

pname = value;

}

}

}

}

没什么可说的吧?下边是Delphi代码:

unit Book;

interface

type

TBook = class

private

pid : string;

pname : string;

function GetId(): string;

procedure SetId(value: string);

function GetName(): string;

procedure SetName(value: string);

public

constructor Create;

property id : string read GetId write SetId;

property name : string read GetName write SetName;

end;

implementation

constructor TBook.Create;

begin

inherited Create;

end;

function TBook.GetId(): string;

begin

GetId := pid;

end;

procedure TBook.SetId(value: string);

begin

pid := value;

end;

function TBook.GetName(): string;

begin

GetName := pname;

end;

procedure TBook.SetName(value: string);

begin

pname := value;

end;

end.

可以看到,和以前版本的Delphi代码相差不多,都是固定格式。这里可能引起费解的有两点:一个是属性,在Delphi中定义属性必须先为这个属性声明一个作为get访问器的函数和一个作为set访问器的过程,并实现之,然后使用property语句来定义属性,并将get访问器和set访问器与这两个函数和过程相关联。注意,这里建议将函数和过程声明在private部分,这样在调用时,就会只看到属性,而不会看到这两个函数和过程了。另一个费解的问题是,Book是类型还是命名空间。其实Book是命名空间,TBook才是类型,这种情况与Delphi文件的格式有关。在Delphi中,每建立一个文件都会相应建立一个命名空间,如果想让多个类在一个命名空间下,就需要把这几个类建在一个文件中,但这不符合Delphi的编码风格。最后,别忘了定义一个构造函数,Delphi是不会默认提供的。

至此,用于测试的类编写完成了。

四、编写测试用例

这里只用了一个类进行测试,名为BookTest,以前这样的类可能需要继承NUnit.Framework.TestCase类,但现在只需要对该类使用TestFixture属性进行标识即可,而无须继承了。BookTest类包含两个用例,分别对应该类的testId和testName方法,即每个方法实现了一个测试用例。注意,在NUnit中,这些用来实现测试用例的方法有两种手段进行标识:一个是以testXXX的格式来命名,一个是使用Test属性进行标识。此外,BookTest还有Init和Dispose这两个方法,并分别使用SetUp和TearDown属性来进行标识,前者在每个测试方法开始之前执行,多用来做初始化;后者在每个测试方法完成之后执行,多用来清理资源。注意,这两个方法的名称并没有什么限制,但必须用SetUp和TearDown属性进行标识。另外,NUnit还提供了TestFixtureSetUp和TestFixtureTearDown属性,功能与SetUp和TearDown类似,但前者是在所有用例执行之前做初始化、之后做清理,而后者是在每个用例执行之前做初始化、之后做清理。下面开始编写BookTest。

点击菜单“File”->“New”->“Other”,打开“New Items”对话框,在该对话框中选择“C# Projects”或“Delphi for .NET Projects”下的“New Files”,然后选中“Class”,点击“OK”按钮。此时请按下快捷键Ctrl + S,保存文件,我将文件命名为BookTest.cs和BookTest.pas。下面修改代码,C#代码如下:

using System;

using NUnit.Framework;

namespace NUnitCS

{

/// <summary>

/// Summary description for Class1.

/// </summary>

[TestFixture]

public class BookTest

{

Book book = null;

[TestFixtureSetUp]

public void Init()

{

Console.WriteLine("测试开始!");

book = new Book();

Console.WriteLine("book对象被初始化!");

}

[Test]

public void testId()

{

book.id = "001"; //设置id属性的值为001

//使用Assert查看id属性的值是否为001

Assert.AreEqual("001", book.id);

Console.WriteLine("id属性被测试!");

}

[Test]

public void testName()

{

book.name = "ASP"; //设置name属性的值为ASP

//使用Assert查看name属性的值是否为JSP,这是个必然出现错误的测试

Assert.AreEqual("JSP", book.name);

Console.WriteLine("name属性被测试!");

}

[TestFixtureTearDown]

public void Dispose()

{

Console.WriteLine("book对象将被清理!");

book = null;

Console.WriteLine("测试结束!");

}

}

}

这里Init和Dispose方法没什么好说的,就是执行了对book对象的初始化和清理,不过testId和testName需要说明一下。前者是在对book的id属性进行测试,首先赋值为”001”,然后使用Assert的AreEqual方法查看id属性中存放的值是否是期待的值,由于我的期待值也是”001”,所以执行后这个用例应该是成功的;后者则是对book的name属性进行测试,也是首先赋值为”ASP”,然后使用Assert的AreEqual方法查看其值是否是期待的,由于我特意将期待值设定为根本不可能的”JSP”,因此这个用例执行后会出现一个错误。但请注意,由于我是特意要让测试出现错误,所以将期待值设定成了不可能的值,如果你是测试人员,请千万不要这么做,否则如果别的地方导致了错误,很容易给自己造成不必要的麻烦。

下面简单介绍一下上边用到的静态类NUnit.Framework.Assert。该类主要包含20个方法:

1.AreEqual()和AreNotEqual()方法,用来查看两个对象的值是否相等或不等,与对象比较中使用的Equals()方法类似。

2.AreSame()和AreNotSame()方法,用来比较两个对象的引用是否相等或不等,类似于通过“Is”或“==”比较两个对象。

3.Contains()方法,用来查看对象是否在集合中,集合类型应与System.Collections.IList兼容。示例:

object o = new object();

ArrayList al = new ArrayList();

al.Add(o);

Assert.Contains(o, al);

4.Greater()和Less()方法,用来比较两个数值的大小,前者相当于大于号(>),后者相当于小于号(<)。

5.IsInstanceOfType()和IsNotInstanceOfType()方法,用来判断对象是否兼容于指定类型。示例:

Type t = new object().GetType();

string s = "";

Assert.IsInstanceOfType(t, s);

由于Object是.net中所有类型的基类,String类型兼容于Object,因此这个示例是能够运行通过的。而下边这个示例运行将是失败的:

Type t = new ArrayList().GetType();

string s = "";

Assert.IsInstanceOfType(t, s);

6.IsAssignableFrom()和IsNotAssignableFrom()方法,用来判断对象是否是指定类型的实例。示例:

Type t = new object().GetType();

string s = "";

Assert.IsAssignableFrom(t, s);

这个示例与之前的示例是一样的,但由于字符串s不是Object类型的,因此无法运行通过。而下边这个实例可以运行通过:

Type t = new string("").GetType();

string s = "";

Assert.IsAssignableFrom(t, s);

7.IsFalse()和IsTrue()方法,用来查看变量是是否为false或true,如果IsFalse()查看的变量的值是false则测试成功,如果是true则失败,IsTrue()与之相反。

8.IsNull()和IsNotNull()方法,用来查看对象是否为空和不为空。

9.IsEmpty()和IsNotEmpty()方法,用来判断字符串或集合是否为空串或没有元素,其中集合类型应与ICollection兼容。

10.IsNaN()方法,用来判断指定的值是否不是数字。

11.Fail()方法,意为失败,用来抛出错误。我个人认为有两个用途:首先是在测试驱动开发中,由于测试用例都是在被测试的类之前编写,而写成时又不清楚其正确与否,此时就可以使用Fail方法抛出错误进行模拟;其次是抛出意外的错误,比如要测试的内容是从数据库中读取的数据是否正确,而导致错误的原因却是数据库连接失败。

12.Ignore()方法,意为忽略,用来忽略后续代码的执行,用途可以参考Fail()方法。

此外,NUnit还提供了一个专用于字符串的静态类NUnit.Framework. StringAssert,该类主要包含4个方法:

1.Contains()方法,用来查看指定的第二个字符串中是否包含了第一个字符串。

2.StartsWith ()和EndsWith ()方法,分别用来查看指定的第一个字符串是否位于第二个字符串的开头和结尾。

3.AreEqualIgnoringCase()方法,用来比较两个字符串是否相等。

下面再看一下Delphi代码:

unit BookTest;

interface

uses

Book,

NUnit.Framework;

type

[TestFixture]

TBookTest = class

book : TBook;

private

{ Private Declarations }

public

constructor Create;

[TestFixtureSetUp]

procedure Init();

[Test]

procedure testId();

[Test]

procedure testName();

[TestFixtureTearDown]

procedure Dispose();

end;

implementation

constructor TBookTest.Create();

begin

inherited Create;

end;

procedure TBookTest.Init();

begin

onsole.WriteLine('测试开始!');

book := TBook.Create();

Console.WriteLine('book对象被初始化!');

end;

procedure TBookTest.testId();

begin

book.id := '001'; //设置id属性的值为001

//使用Assert查看id属性的值是否为001

Assert.AreEqual('001', book.id);

Console.WriteLine('id属性被测试!');

end;

procedure TBookTest.testName();

begin

book.name := 'ASP'; //设置name属性的值为ASP

//使用Assert查看name属性的值是否为JSP,这是个必然出现错误的测试

Assert.AreEqual('JSP', book.name);

Console.WriteLine('name属性被测试!');

end;

procedure TBookTest.Dispose();

begin

Console.WriteLine('book对象将被清理!');

book := nil;

Console.WriteLine('测试结束!');

end;

end.

也是固定格式,没什么好说的吧?改好后,点击菜单“Run”->“Run”或按F9键运行程序。等等,main函数里头好象一句代码也没写过呢吧?没错,一句也没写,但如果你用的是C#照做就可以了,如果用的是Delphi,那么请把NUnitOP.bdsproj文件打开。我们需要对该文件进行修改,否则程序虽能生成,但却无法用于测试。什么,没有这个文件?按Ctrl + F12,在打开的“View Unit”对话框中选择NUnitOP一项,然后点击“OK”。在文件中修改代码如下:

program NUnitOP;

{$APPTYPE CONSOLE}

{%DelphiDotNetAssemblyCompiler 'e:\program files\nunit 2.2\bin\nunit.framework.dll'}

{%DelphiDotNetAssemblyCompiler '$(SystemRoot)\microsoft.net\framework\v1.1.4322\System.dll'}

{%DelphiDotNetAssemblyCompiler '$(SystemRoot)\microsoft.net\framework\v1.1.4322\System.Data.dll'}

{%DelphiDotNetAssemblyCompiler '$(SystemRoot)\microsoft.net\framework\v1.1.4322\System.XML.dll'}

uses

SysUtils,

Book in 'Book.pas',

BookTest in 'BookTest.pas';

var

bt : TBookTest;

begin

bt := TBookTest.Create();

end.

修改好后,按F9键运行程序。在看到黑屏一闪之后,编码工作完成。

五、运行NUnit

编码完成后,就可以使用NUnit测试了。NUnit有两种界面,一种是命令行的,一种是可视化的,我使用的就是后者。点击“开始”菜单->“所有程序”->“NUnit 2.2.6”->“NUnit-Gui”,打开NUnit的可视化界面:

点击菜单“File”->“Open”,打开刚才运行之后生成的可执行文件:

此时就可以使用BookTest类对Book类进行测试了。请首先选择testId,点击“Run”按钮,运行结果如下图:

testId前的灰点变绿,而且进度条显示为绿条,这表明运行成功。下面再选择TBookTest,点击“Run”按钮,运行结果如下图:

testId前的点依然是绿色,但testName前的点是红色,而且进度条显示为红条,这表明testName中存在错误。不过这个错误是预计之内的,如果不想看到,可以在Delphi中将testName()方法中的”JSP”改成”ASP”,然后重新运行。此时无须重新启动NUnit,NUnit会自动加载重新编写好的文件。此时再运行BookTest,进度条已不是红色,而是绿色了。

六、说明

本文是对《NUnit学习笔记之Delphi 2005篇》的修正,NUnit和Delphi都使用了新版本。NUnit 2.2.6对2.2.0进行了很多扩展,这从对NUnit.Framework.Assert和NUnit.Framework.StringAssert的介绍就可以看出来。

其实以前感觉Delphi语法挺优美的,不过自从进入.net时代,就怎么看怎么不爽了。尽管也清楚,这是为了让Delphi程序员可以轻松进入.net世界,Borland也付出了很多劳动,而且Delphi还是我最最崇拜的Anders的杰作,但还是感觉别扭。看来人生经常也挺讽刺的。

 
 
 
免责声明:本文为网络用户发布,其观点仅代表作者个人观点,与本站无关,本站仅提供信息存储服务。文中陈述内容未经本站证实,其真实性、完整性、及时性本站不作任何保证或承诺,请读者仅作参考,并请自行核实相关内容。
2023年上半年GDP全球前十五强
 百态   2023-10-24
美众议院议长启动对拜登的弹劾调查
 百态   2023-09-13
上海、济南、武汉等多地出现不明坠落物
 探索   2023-09-06
印度或要将国名改为“巴拉特”
 百态   2023-09-06
男子为女友送行,买票不登机被捕
 百态   2023-08-20
手机地震预警功能怎么开?
 干货   2023-08-06
女子4年卖2套房花700多万做美容:不但没变美脸,面部还出现变形
 百态   2023-08-04
住户一楼被水淹 还冲来8头猪
 百态   2023-07-31
女子体内爬出大量瓜子状活虫
 百态   2023-07-25
地球连续35年收到神秘规律性信号,网友:不要回答!
 探索   2023-07-21
全球镓价格本周大涨27%
 探索   2023-07-09
钱都流向了那些不缺钱的人,苦都留给了能吃苦的人
 探索   2023-07-02
倩女手游刀客魅者强控制(强混乱强眩晕强睡眠)和对应控制抗性的关系
 百态   2020-08-20
美国5月9日最新疫情:美国确诊人数突破131万
 百态   2020-05-09
荷兰政府宣布将集体辞职
 干货   2020-04-30
倩女幽魂手游师徒任务情义春秋猜成语答案逍遥观:鹏程万里
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案神机营:射石饮羽
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案昆仑山:拔刀相助
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案天工阁:鬼斧神工
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案丝路古道:单枪匹马
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案镇郊荒野:与虎谋皮
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案镇郊荒野:李代桃僵
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案镇郊荒野:指鹿为马
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案金陵:小鸟依人
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案金陵:千金买邻
 干货   2019-11-12
 
推荐阅读
 
 
 
>>返回首頁<<
 
靜靜地坐在廢墟上,四周的荒凉一望無際,忽然覺得,淒涼也很美
© 2005- 王朝網路 版權所有