一、动态链接库简介 动态链接库（DLL,即 “Dynamic-Link Library”）是一个能够被应用程序和其它的DLL调用的过程和函数的集合体，它里面包含的是公共代码或资源。DLL是Windows的基石，所有的Win32 API函数都包含在DLL中。
使用DLL有许多优点：
1、一个DLL可以提供给不同的程序使用，如果有多个程序使用相同的DLL，也只需将DLL在内存中装载一次，这样就节省了内存开销。
2、DLL可以使我们的编程更加模块化，将功能相对独立的模块编成一个动态链接库，这样改动程序时不需将整个程序重新编译，只需重新编译所改动的模块。
3、使用了DLL组件包可以大大减小可执行文件的规模。
4、对于一个大型的、不断更新的应用程序，可以将许多重复的功能写成DLL，用主程序调用，这样既减少了开发的工作量，又提高了访问速度。
5、DLL独立于编程语言，大多数WINDOWS编程环境都允许主程序调用DLL中的函数。即可以用VC++、VB、PowerBuilder、Delphi、汇编语言等建立DLL，然后在不同语言编制的应用程序中调用它。这样就给多人使用不同的编程语言开发项目提供了极大的方便。
二、在Delphi中调用VC++创建的动态链接库的实例
（一）实验环境 本实例的编程工具及运行环境为：Windows 98，VC++6.0，Delphi 5.0 。
（二）实验内容
1．用VC++6.0建立一个动态链接库MaxMin.DLL，该库中包含有两个函数：返回三个整数中最大整数的函数Max1( )和返回三个整数中最小整数的函数Min1( )。
;2．用Delphi编写测试程序调用动态链接库MaxMin.DLL中的两个函数。
（三）实验步骤
1．用VC++6.0建立动态链接库MaxMin.DLL 第一步：启动VC++6.0，选择“File/New/MFC AppWizzard(Dll)”,工程名设为“MaxMin”，按“确定”钮后，选择“Regular DLL Using shared MFC DLL”,按“Finish”钮后，即创造了一个DLL的框架工程。 第二步：选择“File/New”,在出现的对话框中选择“C/C++ Header File”，在文件名处输入“MyDLL”,按“确定”钮，即创建了一个空的头文件“MyDLL.h”。在该文件中输入以下两行内容： extern "C" _declspec(dllexport) int Min1(int x,int y,int z); extern "C" _declspec(dllexport) int Max1(int x,int y,int z); 选择“File/Save”保存该文件的内容。 第三步：选择“File/New”,在出现的对话框中选择“C/C++ Source File”， 在文件名处输入“MyDLL”,按“确定”钮，即创建了一个空的源文件“MyDLL.cpp”。在该文件中输入以下内容： #include "stdafx.h" #include "MyDll.h" extern "C" __declspec(dllexport) int Min1(int x,int y,int z) { if ((x<=y) & (x<=z)) return x; else if ((y<=x) & (y<=z)) return y; else return z; /*找出x，y，z中的最小整数*/ } extern "C" __declspec(dllexport) int Max1(int x,int y,int z) { if ((x>=y) & (x>=z)) return x; else if ((y>=x) & (y>=z)) return y; else return z; /*找出x，y，z中的最大整数*/ } 选择“File/Save”保存该文件的内容。 第四步：按下运行图标“！”，即生成了MyDLL.DLL（在当前工程目录的DEBUG子目录下）。 2．用Delphi编写调用MaxMin.DLL的测试程序 调用动态链接库有两种方法，即隐式调用和显式调用。 （1）隐式调用 第一步：启动Delphi，选择“New Application”，生成一个空的应用程序，在Form的“Name”属性处输入“TestVcDLLForm”，Caption属性处输入“VC++的DLL隐式调用测试”，在Form中放入控件如表1所示（其中所有的Edit控件的“Text”属性均设为空）：
 |
（表1：所用到的控件及其属性）
最后设计的Form的屏幕效果如图1所示。选择“File/Save all”，在“Save unit1 as”对话框中将源文件名设为“main.pas”，按“保存”钮；在“Save Project1 as”对话框中将工程名设为“TestVcDLL”，按“保存”钮。
第二步：选择“File/New…”，在出现的“New Item”对话框中选择“unit”,按“OK”钮，生成一个空的源文件，在该文件中输入以下内容： unit MaxMin; interface function Min1(x,y,z:Integer):Integer; stdcall; function Max1(x,y,z:Integer):Integer; stdcall; implementation function Min1;external 'MaxMin.DLL' name 'Min1'; function Max1;external Max'Min.DLL' name 'Max1'; end. 选择“File/Save As…”,将上述文件存为“MaxMin.pas”。
