依星源码资源网,依星资源网

 找回密码
 立即注册

QQ登录

只需一步,快速开始

限时开通VIP永久会员,可免费下载所有附件
查看: 165|回复: 0

delphi7创建DLL步骤方法

[复制链接] |主动推送

1686

主题

1721

帖子

2378

积分

管理员

Rank: 9Rank: 9Rank: 9

积分
2378
发表于 2023-8-26 14:54:13 | 显示全部楼层 |阅读模式
delphi7创建DLL步骤方法

1.打开delphi7,点击File/New/Other...,如下图:
0001.png
2.选择New/DLL Wizard,如下图:
0002.png
3.起一个项目名称,然后点击File/SaveAll,这里以TestDll为例,如下图:
00003.png 00004.png
00005.png

4.新建一个单元文件File/New/Unit,保存此单元文件,起一个名称,这里以mydll为例,如下图:
00006.png
00007.png
5.编写示例函数,这里以简单的加法为例,跟平常定义函数差不多,只不过如果此函数需要被第三方软件调用的话,需要在函数后面加一个“stdcall”
函数定义:
  1. function add1(a,b:Integer):Integer;stdcall;
复制代码
函数实现:
  1. function add1(a,b:Integer):Integer;stdcall;
  2. var
  3.   c:Integer;
  4. begin
  5.   c:=a+b;
  6.   result:=c;
  7. end;
复制代码
完整代码如下图:
00008.png
6.上面代码编写完成之后,此函数是本DLL对外提供的方法,供第三方软件调用的。还需要导出此函数名;在工程项目上,右键,选择Veiw Source,如下图:
00009.png

7.将函数名导出,写到此文件中,导出代码如下:
  1. exports
  2.   add1;
复制代码
如下图:
00010.png
8.保存全部文件,开始Build,编译出DLL。
00011.png
9.用Depends.exe来查看此DLL的输出函数:
00012.png

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

注册会员即送金币,免费下载。

附件下载:
dll2.rar (42.27 KB, 下载次数: 0, 售价: 1 金钱)
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

 
在线客服
点击这里给我发消息 点击这里给我发消息 点击这里给我发消息
售前咨询热线
312337667

微信扫一扫,私享最新原创实用干货

QQ|手机版|依星源码资源网 ( 鲁ICP备2021043233号-3 )|网站地图

GMT+8, 2024-2-23 04:52

Powered by Net188.com X3.4

邮箱:312337667@qq.com 客服QQ:312337667(工作时间:9:00~21:00)

快速回复 返回顶部 返回列表