delphi7创建DLL步骤方法

delphi7创建DLL步骤方法

1.打开delphi7,点击File/New/Other...,如下图：
 

2.选择New/DLL Wizard,如下图：
 

3.起一个项目名称，然后点击File/SaveAll,这里以TestDll为例，如下图：
 

 

4.新建一个单元文件File/New/Unit,保存此单元文件，起一个名称，这里以mydll为例，如下图：
 

 

5.编写示例函数，这里以简单的加法为例，跟平常定义函数差不多，只不过如果此函数需要被第三方软件调用的话，需要在函数后面加一个“stdcall”
函数定义：

1. function add1(a,b:Integer):Integer;stdcall;

函数实现：

1. function add1(a,b:Integer):Integer;stdcall;
   var
     c:Integer;
   begin
     c:=a+b;
     result:=c;
   end;

完整代码如下图：
 

6.上面代码编写完成之后，此函数是本DLL对外提供的方法，供第三方软件调用的。还需要导出此函数名；在工程项目上，右键，选择Veiw Source，如下图：
 

7.将函数名导出，写到此文件中，导出代码如下：

1. exports
     add1;

如下图：
 

8.保存全部文件，开始Build，编译出DLL。
 

9.用Depends.exe来查看此DLL的输出函数：
 

至此，已成功编写出DLL，附件中有本例中的工程源码，有兴趣的可以下载。

点击项目源码下载。