end;
创建一个测试Project
创建新的Project
再创建一个Project，命名为TestProject。如果没有和BeTestProject放在同一目录，将BeTestProject的存放路径加到加到菜单 Tools->Environment Options 里面的Library->Library Path中。
编写TestCase
删除确省的Unit1(Form1)，创建一个的Unit,注意不是Form.
将创建的Unit保存为TestUnit，在interface中加入以下代码
uses
TestFrameWork,BeTestUnit;
TestFrameWork是每个TestCase都必须使用的，后面要使用的TtestCase等类的定义都在TestFrameWork中。BeTestUnit是将要被测试单元。
定义TestCase，测试类定义代码如下：
TTestCaseFirst = class(TTestCase)
延伸阅读
文章来源于领测软件测试网 https://www.ltesting.net/
