设计模式、用Delphi实现---->Decorator 模式[1]

 

 

 

decorator 模式

起源

delphi的decorator模式是在decorator的基础上进行了扩展。更多decorator模式的资料请参阅 《设计模式115页》

目的

动态地给一个对象添加一些职责。就增加功能来说，decorator模式比增加子类更为灵活.

动机

我们经常要为某一些个别的对象增加一些新的职责，并不是全部的类。假设，我们有一组类用来输出文本行。抽象类ttextstream定义了一些接口，而后代如ttextfile、tlineprinter、tclipboardstream则实现了这些接口。