相关推荐
-
delphi设计模式示例
delphi设计模式示例delphi设计模式示例delphi设计模式示例
-
delphi下的MVC架构-eMVC
Easy MVC开发人员指南 翻译:丁士锋 东莞虎门镇居岐 1.Introduction 1.1 What's Easy MVC Easy MVC or eMVC是一个轻量级MVC框架,为Delphi程序员设计来开发Windows应用程序。 1.2为什么我们需要eMVC? Model-View-Controller(MVC)成为一个通...
-
Delphi 观察者模式
RAD Studio 10.2.3 测试√ 运行结果: 使用方法: procedure TDesignPattern.Button_ObserverPatternClick(Sender: TObject); var mObj001: TObserverObject_001; mObj002: TObserverObject_002; begin // 被观察者001进行创建 mObj001 := TObserverObject_001.Create; Memo_Log.Lines
-
用Delphi实现观察者模式(Observer模式)
用Delphi实现观察者模式(Observer模式) 作者:陈省 有一段时间我对IE编程非常感兴趣,于是就在Yahoo加入了一个IE编程的兴趣小组,只要有人在兴趣小组中提出或者回答了一个问题,发布的信息就会发送给所有兴趣小组的注册用户,这种模式实际上就是发布-订阅模式,又称观察者模式。 观察者模式中有两个角色,其中一个是目标,另外一个是观察者,对于兴趣小组来说,注册用户就是观察者,而兴趣小组本身是目标。兴趣小组必须提供注册的机制,这样兴趣小组才能知道用户的邮件地址,可以维护一个订户的邮件列表,能.
-
《GOF设计模式》—观察者(OBSERVER)—Delphi源码示例:时钟
示例:时钟 说明: ClockTimer是一个用于存储和维护一天时间的具体目标。它每秒钟通知一次它的观察者。 我们定义一个DigitalClock类来显示时间。它从一个用户界面工具箱提供的Widget类继承了它的图形功能。 代码: 迭代器uListIterator unit uListIterator; interface uses classes; type
-
Delphi 对象观察器
转载于:https://www.cnblogs.com/fanweisheng/p/11343316.html
-
Design Pattern----23.Behavioral.Observer.Pattern (Delphi Sample)
Intent Define a one-to-many dependency between objects so that when one object changes state, all its dependents are notified and updated automatically. Encapsulate the core (or common or engine)...
-
《GOF设计模式》—中介者 (MEDIATOR)—Delphi源码示例:Colleague—Mediator通信(使用观察者模式)
示例:Colleague—Mediator通信(使用观察者模式) 说明: 当一个感兴趣的事件发生时,Colleague必须与其Mediator通信。一种实现方法是使用观察者模式(Observer),将Mediator实现为一个Observer,各Colleague作为Subject,一旦其状态改变就发送通知给Mediator。Mediator作出的响应是将状态改变的结果传播给其他的Colleague。 代码: unit uObserver;
-
Delphi XE2 之 FireMonkey 入门(2)
FireMonkey 的控件都是自己绘制的(而不是基于系统组件), 我想它们应该是基于一些基本图形; 就从基本图形开始吧. FMX.Objects 单元给出的类: TShape //基本图形的基类 TLine TRectangle TRoundRect TCalloutRectangle TEllipse TCircle TPie TArc TPath TTex...
-
delphi(XE2)实现图片异形窗体,支持摆放控件
网上有较多使用UpdateLayeredWindow函数实现美化的图片异形窗体的代码,一般使用此场景时,对软件界面要求较高。但是实现了图片窗体后,在窗体中摆放不了其他控件,导致这个功能很鸡肋。为解决此问题,本博文中的案例使用两个窗体搭配使用,图片窗口作为背景窗体,放置控件的窗口作为功能性窗体,功能性窗口全透明展示,可实现我们预设的目标。
-
《GOF设计模式》—观察者(OBSERVER)—Delphi源码示例:封装复杂的更新语义
示例:封装复杂的更新语义 说明: 当目标和观察者间的依赖关系特别复杂时,可能需要一个维护这些关系的对象。我们称这样的对象为更改管理器(ChangeManager)。它的目的是尽量减少观察者反映其目标的状态变化所需的工作量。例如,如果一个操作涉及到对几个相互依赖的目标进行改动,就必须保证仅在所有的目标都已更改完毕后,才一次性地通知它们的观察者,而不是每个目标都通知观察者。 ChangeManager是一个中介者模式(Mediator)的实例。通常只有一个ChangeMa
-
【delphi 线程】用TMonitor同步共享资源
前言 TMonitor 是用于同步线程的一个记录。说清楚点,我们讨论的是Delphi 的System.TMonitor单元 , 而不是Vcl.Forms.TMonitor单元。 自Delphi 2009年以来,TObject实例的大小增加了一倍,以便增加额外的4个字节。这4个字节是干什么的?事实上就是提供TMonitor支持!现在每个继承自TObject的对象都可以使用TMonitor锁。TMonitor记录,它实现了一个通用的监视器同步的结构。 源代码下载 准...
-
Delphi五种设计模式
<br />今天抽空浏览了一下Delphi写的设计模式,网页在如下位置:<br />http://www.delphi-jedi.org/art_patterns.html<br />今天再看。仍然有种感觉。我把Observer模式的代码补充到下面。在Delphi 7已经编译通过。Lazarus应该也没有问题。<br />unit Unit2;<br />interface<br />type<br />TObservable = class;<br />TObserver = class;<br />TO
-
设计模式、用Delphi实现---->Strategy模式
Strategy模式 起源Delphi的STRATEGY模式是在STRATEGY的基础上进行了扩展。更多STRATEGY模式的资料请参阅 《设计模式208页》目的定义一系列的算法,把它们一个个封装起来,并且使它们可相互替换。本模式使得算法可独立于使用它的客户面变化。动机· 由于需要可以动态的变换不同的策略。· 更好的封装多个行为
-
《GOF设计模式》—观察者(OBSERVER)—Delphi源码示例:观察者接口
示例:观察者接口 说明: (1)、定义 定义对象间的一种一对多的依赖关系,当一个对象的状态发生改变时,所有依赖于它的对象都得到通知并被自动更新。 (2)、结构 目标 Subject(目标):目标知道它的观察者。可以有任意多个观察者观察同一个目标。提供注册和删除观察者对象的接口。 ConcreteSubject(具体目标):将有关状态存入各ConcreteObserver对象。当它的状态发生改变时,向它的各个观察者发
2 楼 whaosoft 2009-02-02 08:57
1 楼 eyejava 2009-02-01 13:50