delphi7创建DLL步骤方法
1.打开delphi7,点击File/New/Other...,如下图:
2.选择New/DLL Wizard,如下图:
3.起一个项目名称,然后点击File/SaveAll,这里以TestDll为例,如下图:
4.新建一个单元文件File/New/Unit,保存此单元文件,起一个名称,这里以mydll为例,如下图:
5.编写示例函数,这里以简单的加法为例,跟平常定义函数差不多,只不过如果此函数需要被第三方软件调用的话,需要在函数后面加一个“stdcall”
函数定义:
-
function add1(a,b:Integer):Integer;stdcall;
函数实现:
-
function add1(a,b:Integer):Integer;stdcall; var c:Integer; begin c:=a+b; result:=c; end;
完整代码如下图:
6.上面代码编写完成之后,此函数是本DLL对外提供的方法,供第三方软件调用的。还需要导出此函数名;在工程项目上,右键,选择Veiw Source,如下图:
7.将函数名导出,写到此文件中,导出代码如下:
-
exports add1;
如下图:
8.保存全部文件,开始Build,编译出DLL。
9.用Depends.exe来查看此DLL的输出函数:
至此,已成功编写出DLL,附件中有本例中的工程源码,有兴趣的可以下载。
点击项目源码下载。