12{《HeadFirst设计模式》工厂模式之抽象工厂}3{抽象工厂的产品}4{编译工具：Delphi7.0}5{E-Mail：guzh-0417@163.com}67unituPizzaIngredient;89interface1011type12TDough=class(TObject)13e...
12{《HeadFirst设计模式》之策略模式}3{本单元中的类为策略类}4{编译工具:Delphi7.0}5{E-Mail:guzh-0417@163.com}67unituStrategy;89interface1011type12{飞行接口，及其实现类}1314IFlyBehavior=Int...
容器的主要职责有两个：存放元素和浏览元素。根据单一职责原则（SRP）要将二者分开，于是将浏览功能打包封装就有了迭代器。用迭代器封装对动态数组的遍历：12{《HeadFirst设计模式》之迭代器模式}3{容器中的元素类}4{编译工具：Delphi7.0}5{E-Mail：guzh-0417@163.....
模板方法模式定义了一个算法骨架，允许子类对算法的某个或某些步骤进行重写（override)。12{《HeadFirst设计模式》之模板方法模式}3{编译工具:Delphi7.0}4{E-Mail:guzh-0417@163.com}56unituCoffeineBeverageWithHook;7....
简单工厂：工厂依据传进的参数创建相应的产品。12{《HeadFirst设计模式》工厂模式之简单工厂}3{产品类}4{编译工具：Delphi7.0}5{联系方式：guzh-0417@163.com}67unituProducts;89interface1011type12TPizza=class(.....
1unituSubObject;23interface45type67{TAmplifier与TTuner，TCDPlayer，TDVDPlayer相互依赖。}8{在TTuner等的简单实现时用不到对TAmplifier的引用，}9{但现实生活中就应该让TAmplifier提供服务，所以这里保留了。...
适配器模式的主要意图是对现有类的接口进行转换，以满足目标类的需求。其次，可以给目标类的接口添加新的行为（主要指方法）。这一点容易与装饰模式混淆。从意图方面来看，装饰模式不改变（通常指增加）接口中的行为（主要指方法），而是在原有行为（主要指方法）的基础上添加新的功能；从类结构方面来看，装饰模式中的.....
12{《HeadFirst设计模式》之装饰模式}3{本单元中的类为被装饰者}4{编译工具:Delphi7.0}5{E-Mail:guzh-0417@163.com}67unituComponent;89interface1011type12TBeverage=class(TObject)//抽象饮料...
12{《HeadFirst设计模式》之观察者模式}3{主题与观察者}4{编译工具：Delphi7.0}5{联系方式：guzh-0417@163.com}67unituWeatherReport;89interface1011uses12Classes,SysUtils;1314type15TObse...
本实例主要用鼠标在窗体上绘图用到组件有TBevel、TRadioGroup、TButton组件运行效果如下：unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Fo....
