使用Dunit的时候,如何测试private属性的方法?

WinstonSword 2003-12-12 01:57:03
如题。谢谢
...全文
27 13 打赏 收藏 举报
写回复
13 条回复
切换为时间正序
当前发帖距今超过3年,不再开放新的回复
发表回复
tonylk 2003-12-22
好像只能照pazee(耙子) 说的那样了。
  • 打赏
  • 举报
回复
WinstonSword 2003-12-22
大家都没有特别好的办法吗?
那就明天结帖了. 谢谢大家
  • 打赏
  • 举报
回复
WGYKING 2003-12-13
对不起,我看错题目了
  • 打赏
  • 举报
回复
WGYKING 2003-12-12
Class TestA:A
~~~~~~~~~~~~~~
var
EntityTestA:TestA;
EntityA:A;
begin
EntityTestA:=TestA.Create;
EntityA.Create;
EntityA:=EntityTestA;
EntityA.FunA(...)
end;
不知这样可以吗?
  • 打赏
  • 举报
回复
WinstonSword 2003-12-12
to pazee(耙子):
把代码放在一个单元里太麻烦了,会显得乱。

to cll007(gazo):
测试是随时会进行的,比如增加、修改一个方法。因为要持续集成嘛
  • 打赏
  • 举报
回复
cll007 2003-12-12
先改成public,测试完成再改回去
要嘛,就在类A的同一个单元,写测试代码,发布的时候去掉
  • 打赏
  • 举报
回复
耙子 2003-12-12
VCL源代码的很多代码都这么干的,导致我们想重新继承一个新的控件非常麻烦,也不知道这是好事儿还是坏事儿。
  • 打赏
  • 举报
回复
耙子 2003-12-12
既然它是Private 不是 Protected,这就说明你即使继承了 A也访问不到他的私有成员,

Object pascal没有定义友员,但是它提供了另一个方式访问这个私有成员。

就是把你的TestA继承自A,并且(切记)把TestA类的声明和A类放在同一个单元这就能访问了。
  • 打赏
  • 举报
回复
WinstonSword 2003-12-12
有那位达人说说呀!
我刚用Dunit,手头资料少的可怜。
  • 打赏
  • 举报
回复
olddaddy 2003-12-12
关注一下下
  • 打赏
  • 举报
回复
WinstonSword 2003-12-12
就是你在编写测试类testA来测试一个类A的时候,如果A的一个方法FunA是Private的时候,你怎么去测试这个FunA?
  • 打赏
  • 举报
回复
WGYKING 2003-12-12
详细说说
  • 打赏
  • 举报
回复
Cipherliu 2003-12-12
详细说说问题
  • 打赏
  • 举报
回复
相关推荐
发帖
Delphi
加入

5065

社区成员

Delphi 开发及应用
申请成为版主
帖子事件
创建了帖子
2003-12-12 01:57
社区公告
暂无公告