博客园  :: 首页  :: 新随笔  :: 联系 :: 订阅 订阅  :: 管理

随笔分类 -  Delphi 设计模式《HeadFirst设计模式》Delphi代码

所用编辑工具为：Delphi7和Delphi2007 for win32

Delphi 设计模式：《HeadFirst设计模式》Delphi代码---模式小结之加入适配器模式

摘要：二、加入适配器模式1、鹅也要加入鸭鸣模拟器代码Code highlighting produced by Actipro CodeHighlighter (freeware)http://www.CodeHighlighter.com/-- 1 {《HeadFirst设计模式》Delphi代码之模式小结 } 2 { 加入适配器模式 } 3 { 编译工具：Delphi2010 for win32 ... 阅读全文

posted @ 2009-12-06 08:59 都市牧羊 阅读(761) 评论(0) 推荐(0)

Delphi 设计模式：《HeadFirst设计模式》Delphi代码---模式小结之一个叫声接口和几只鸭子

摘要：一、一个叫声接口和几只鸭子1、从一个叫声接口开始。CodeCode highlighting produced by Actipro CodeHighlighter (freeware)http://www.CodeHighlighter.com/--12{《HeadFirst设计模式》Delphi代码之模式小结}3{一个叫声接口}4{编译工具：Delphi2010forwin32}5{E-Ma... 阅读全文

posted @ 2009-10-25 21:07 都市牧羊 阅读(812) 评论(0) 推荐(0)

Delphi 设计模式：《HeadFirst设计模式》Delphi代码---工厂模式之抽象工厂

摘要：抽象工厂的产品Code highlighting produced by Actipro CodeHighlighter (freeware)http://www.CodeHighlighter.com/--12{《HeadFirst设计模式》工厂模式之抽象工厂}3{抽象工厂的产品}4{编译工具：Delphi7.0}5{E-Mail：guzh-0417@163.com}67unituPizzaI... 阅读全文

posted @ 2009-10-12 12:05 都市牧羊 阅读(901) 评论(0) 推荐(0)

Delphi 设计模式：《HeadFirst设计模式》Delphi2007代码---组合模式之Menus

摘要：组合与单项的抽象父类Code highlighting produced by Actipro CodeHighlighter (freeware)http://www.CodeHighlighter.com/--12{《HeadFirst设计模式》之组合模式}3{组合与单项的抽象父类}4{编译工具：Delphi2007forwin32}5{E-Mail：guzh-0417@163.com}67... 阅读全文

posted @ 2009-08-22 15:18 都市牧羊 阅读(823) 评论(0) 推荐(0)

Delphi 设计模式：《HeadFirst设计模式》Delphi2007代码---工厂模式之工厂方法

摘要：产品类Code highlighting produced by Actipro CodeHighlighter (freeware)http://www.CodeHighlighter.com/--12{《HeadFirst设计模式》工厂模式之工厂方法}3{产品类}4{编译工具：Delphi2007forwin32}5{联系方式：guzh-0417@163.com}67unituProduct... 阅读全文

posted @ 2009-08-02 16:12 都市牧羊 阅读(1235) 评论(6) 推荐(0)

Delphi 设计模式：《HeadFirst设计模式》Delphi2007代码---单例模式之ChocolateBoiler

摘要：ChocolateBoilerCode highlighting produced by Actipro CodeHighlighter (freeware)http://www.CodeHighlighter.com/--12{《HeadFirst设计模式》之单例模式}3{编译工具:Delphi2007forwin32}4{E-Mail:guzh-0417@163.com}56unituCho... 阅读全文

posted @ 2009-07-30 20:33 都市牧羊 阅读(835) 评论(3) 推荐(0)

Delphi 设计模式：《HeadFirst设计模式》Delphi7代码---工厂模式之简单工厂

摘要：简单工厂：工厂依据传进的参数创建相应的产品。产品类Code highlighting produced by Actipro CodeHighlighter (freeware)http://www.CodeHighlighter.com/--12{《HeadFirst设计模式》工厂模式之简单工厂}3{产品类}4{编译工具：Delphi7.0 }5{联系方式：guzh-0417@163.com}... 阅读全文

posted @ 2009-07-24 21:52 都市牧羊 阅读(1444) 评论(1) 推荐(1)

Delphi 设计模式：《HeadFirst设计模式》Delphi7代码---观察者模式之WeatherReport

摘要：主题与观察者Code highlighting produced by Actipro CodeHighlighter (freeware)http://www.CodeHighlighter.com/--12{《HeadFirst设计模式》之观察者模式}3{主题与观察者}4{编译工具：Delphi7.0}5{联系方式：guzh-0417@163.com}67unituWeatherReport... 阅读全文

posted @ 2009-07-18 21:39 都市牧羊 阅读(855) 评论(0) 推荐(1)

Delphi 设计模式：《HeadFirst设计模式》Delphi7代码---模板方法模式之CoffeineBeverageWithHook

摘要：模板方法模式定义了一个算法骨架，允许子类对算法的某个或某些步骤进行重写（override)。CoffeineBeverageWithHookCode highlighting produced by Actipro CodeHighlighter (freeware)http://www.CodeHighlighter.com/--12{《HeadFirst设计模式》之模板方法模式}3{编译工具... 阅读全文

posted @ 2009-07-17 19:37 都市牧羊 阅读(590) 评论(0) 推荐(0)

Delphi 设计模式：《HeadFirst设计模式》Delphi7代码---迭代器模式之DinerMenu

摘要：容器的主要职责有两个：存放元素和浏览元素。根据单一职责原则（SRP）要将二者分开，于是将浏览功能打包封装就有了迭代器。用迭代器封装对动态数组的遍历：容器中的元素类Code highlighting produced by Actipro CodeHighlighter (freeware)http://www.CodeHighlighter.com/--12{《HeadFirst设计模式》之迭代... 阅读全文

posted @ 2009-06-08 21:59 都市牧羊 阅读(689) 评论(1) 推荐(0)

Delphi 设计模式：《HeadFirst设计模式》Delphi7代码---适配器模式之TurkeyAdapter

摘要：适配器模式的主要意图是对现有类的接口进行转换，以满足目标类的需求。其次，可以给目标类的接口添加新的行为（主要指方法）。这一点容易与装饰模式混淆。从意图方面来看，装饰模式不改变（通常指增加）接口中的行为（主要指方法），而是在原有行为（主要指方法）的基础上添加新的功能；从类结构方面来看，装饰模式中的装饰者既继承又组合被装饰者。类适配器同时继承现有类和目标类，对象适配器继承目标类组合现有类。现有类，被转... 阅读全文

posted @ 2009-06-03 10:52 都市牧羊 阅读(625) 评论(0) 推荐(0)

Delphi 设计模式：《HeadFirst设计模式》Delphi7代码---策略模式之MiniDuckSimulator

摘要：策略类Code highlighting produced by Actipro CodeHighlighter (freeware)http://www.CodeHighlighter.com/--12{《HeadFirst设计模式》之策略模式}3{本单元中的类为策略类}4{编译工具:Delphi7.0 }5{E-Mail:guzh-0417@163.com}67unituStrategy;8... 阅读全文

posted @ 2009-05-30 13:30 都市牧羊 阅读(671) 评论(0) 推荐(0)

Delphi 设计模式：《HeadFirst设计模式》Delphi7代码---装饰模式之StarBuzzCoffee

摘要：被装饰者 Code highlighting produced by Actipro CodeHighlighter (freeware)http://www.CodeHighlighter.com/--12{《HeadFirst设计模式》之装饰模式 }3{本单元中的类为被装饰者}4{编译工具:Delphi7.0}5{E-Mail:guzh-0417@163.com}67unituCompone... 阅读全文

posted @ 2009-05-29 12:12 都市牧羊 阅读(617) 评论(0) 推荐(0)

Delphi 设计模式：《HeadFirst设计模式》Delphi7代码---门面模式之HomeTheater

摘要：复杂的子系统Code highlighting produced by Actipro CodeHighlighter (freeware)http://www.CodeHighlighter.com/--1unituSubObject;23interface45type67{TAmplifier与TTuner，TCDPlayer，TDVDPlayer相互依赖。}8{在TTuner等的简单实现时... 阅读全文

posted @ 2009-05-24 18:46 都市牧羊 阅读(692) 评论(0) 推荐(0)

Delphi 设计模式：《HeadFirst设计模式》Delphi7代码---命令模式之RemoteControlTest

摘要：命令的接收者Code highlighting produced by Actipro CodeHighlighter (freeware)http://www.CodeHighlighter.com/--12{《HeadFirst设计模式》之命令模式}3{本单元中的类为命令的接收者}4{编译工具：Delphi7.0}5{联系方式：guzh-0417@163.com}67unituReceive... 阅读全文

posted @ 2009-05-05 15:19 都市牧羊 阅读(847) 评论(4) 推荐(0)

Delphi 设计模式：《HeadFirst设计模式》Delphi7代码---命令模式之SimpleRemoteWithUndoTest

摘要：命令模式可以很轻松的实现撤销（Undo）功能。命令的接受者：命令的接受者Code highlighting produced by Actipro CodeHighlighter (freeware)http://www.CodeHighlighter.com/--1unituReceiveObject;23interface45type6TLight=class(TObject)7public... 阅读全文

posted @ 2009-05-03 10:23 都市牧羊 阅读(504) 评论(0) 推荐(0)

Delphi 设计模式：《HeadFirst设计模式》Delphi7代码---命令模式之SimpleRemoteControlTest

摘要：//命令的接受者 unit uReceiveObject; interface type TLight = class(TObject) public procedure Open; procedure Off; end; TGarageDoor = class(TObject) public procedure Up; procedure ... 阅读全文

posted @ 2009-05-02 22:38 都市牧羊 阅读(1091) 评论(0) 推荐(0)

Delphi 设计模式：《HeadFirst设计模式》Delphi7代码---状态模式

摘要：{没有应用状态模式的代码} //工程文件 program Project1; {$APPTYPE CONSOLE} uses uGumballMachine in 'uGumballMachine.pas'; var aGumballMachine: TGumballMachine; begin aGumballMachine := TGumballMachine.Create(5... 阅读全文

posted @ 2009-04-20 16:52 都市牧羊 阅读(839) 评论(0) 推荐(0)