使用多态实现Delphi动态编程
本文使用一个简单实例讲述如何使用多态在Delphi中实现动态编程。
多态（Polymorphism）按字面的意思就是“多种形状”。引用Charlie Calverts对多态的描述——多态性是允许你将父对象设置成为和一个或更多的他的子对象相等的技术，赋值之后，父对象就可以根据当前赋值给它的子对象的特性以不同的方式运作。更多有关多态的讲述，请参考网络资料。
“动态语言“是一种在执行期间才去发现数据类型的程序设计语言，其有点在于其优良的扩展性，主要用于创建一些需要经常更新的动态系统。本文描述的动态编程，没有动态语言的意思，但是能让Delphi程序同样具有动态扩展的能力。
以Polymorphism的字面意思来举例，要实现一个画出各种形状的程序。刚开始，可能只需要实现画矩形、正方形的功能，但是可预知以后需要画其它图形。这很自然想到使用多态来实现，可是如何实现在增加其它形状时主程序完全不用修改呢？
一、实例描述：
1. 抽象类TGeometry（几何图形），它有一个画图形的抽象方法Draw()
2. 继承抽象类的子类：TRectangle（矩形）、TSquare（正方形）等等。所有类如下图
3. Main程序无须知道子类，只通过TGeometry画出各种图形，也无须关心当前有多少子类
4. 实例程序界面如下
界面左侧图形单选按钮的数量会根据TGeometry的子类数量变化。选不同单选按钮，会调用相应的Draw()方法在右侧画图
源代码下载（使用Delphi 2010编写）：>>>
二、通常情况下的实现
1. 抽象类（TGeometry）和子类（TRectangle）
2. 在主程序中使用TGeometry
这样使用的缺点是：当增加新形状时，主程序代码需要修改。究其原因，是因为“子类实例的创建”是静态写在代码中的。
接下来，想办法把子类的创建从主程序中剥离，是程序具有动态特性。
三、把形状类型从主程序中剥离
下面讲述如何逐步把“子类实例的创建”静态代码从主程序中剥离。
第一步，使用CASE语句把形状创建函数剥离
最简单的方式，就是使用case语句，根据不同形状调用不同子类的Create方法创建子类的实例。
这样DrawGeometry()被“解脱”了，可是CreateGeometry()又被“套住”了：每增加一个形状，需要增加一行代码。case语句实际上还是静态的。
第二步，消除CASE语句，实现真正的“动态”
要彻底消除“静态”，需要使用Delphi提供的动态东西，最直接的就是动态数组。如果把所有子类的�
相关文档：
3.2 用户登录方案
在进入一个系统时，必须先在登录窗体中输入正确的用户名和密码才能进入。这样可以确保系统的安全性和保密性，登录窗体的制作按照系统的大小及用处，可以分为不同的登录窗体样式，在系统第一次登录前，首先要对操作员信息进行相应的设置。本节将对登录窗体及操作员管理窗体的制作过程进行详细的说明 ......
在Delphi应用程序中使用DLL
Delphi不仅可调用C＋＋产生的DLL模块，同样C＋＋程序也可调用Delphi所产生的DLL部件。这样交互调用，无须重复开发，大大缩短了生产周期。
Delphi与VisualBasic、VisualFoxPro等软件一样，属于RAD工具（快速应用开发工具）。适合开发32位或16位／32位混合应用程序。Delphi所使� ......
一 Dll的制作一般步骤
二 参数传递
三 DLL的初始化和退出清理[如果需要初始化和退出清理]
四 全局变量的使用
五 调用静态载入
六 调用动态载入
七 在DLL建立一个TForM
八 在DLL中建立一个TMDIChildForM
九 示例：
十 Delphi制作的Dll与其他语言的混合 ......
开发步骤：
1、创建ActiveX Library工程。
2、创建COM Object。
3、创建Type Library，并创建相应接口。
4、创建接口对应的函数和实现。
具体如下：
1、创建ActiveX Library工程。
new|other|activeX|activeX library
Delphi会自动生成框架代码，直接编译的话就可以得到一个dll文件了；
如果想编译出来的是ocx文 ......
一提起基于Web Services技术的应用程序开发，一般人首先想到的开发工具是Vs.net，其实作为快速应用程序开发工具(RAD)的老大，Delphi从6.0就开始支持Web Services的开发和应用了，本文通过使用Delphi 7.0调用新浪发送短信的Web Service进行短信应用程序开发这一实例详细的介绍在Delphi中如何开发基于Web Services的应用系统� ......
