• 设为首页
  • 点击收藏
  • 手机版
    手机扫一扫访问
    迪恩网络手机版
  • 关注官方公众号
    微信扫一扫关注
    公众号

用DELPHI创建DLL文件,封装窗体的实现方法实例

原作者: [db:作者] 来自: [db:来源] 收藏 邀请

用DELPHI创建DLL文件,封装窗体的实现方法实例:
即一个程序不再是单一的一个EXE文件了,而是由一个EXE文件加N个DLL文件组成,这样做的原因是方便以后的维护与更新,也是跨平台开发的重要一步。
1, 打开DELPHI,新建一个Dll Wizard
2, 在新建的Dll里新建一个Form
3, 在新建的Form里uses stdctrls
4, 在var下面写:
Procedure synapp(App:THandle);stdcall;
Procedure showform;stdcall;
5, 然后在implementation 下面uses math
6, 在{$R *.dfm}下面写
Procedure synapp(App:THandle);stdcall;
Begin
  Application.Handle:=app;
End;

Procedure showform;stdcall;
Begin
  Form1:=Tform1.create(application);
  Form1.show;
End;
7, 在dll的Library文件里的{$R *.res}下面写:
exports
Sysapp,show;
上面到此为止完成了DLL封装窗体的创建

下面是调用了
1, 在要调用DLL文件的程序的var下写:
Procedure synapp(App:THandle);stdcall;external ‘my.dll’ ;//----你的DLL文件名
Procedure showform;stdcall;external‘my.dll’;//----你的DLL文件名
注:把你写好的DLL放在本程序的同一目录下,和上面一样,要uses math;

2, 在你的程序的Button的On Click事件下写:
Synapp(applicatiln.Handle);
Showform;


鲜花

握手

雷人

路过

鸡蛋
该文章已有0人参与评论

请发表评论

全部评论

专题导读
上一篇:
delphi中OleContainer的使用总结发布时间:2022-07-18
下一篇:
Delphi包的设计思想及它与PAS、BPL、DCU、DLL、OXC的关系。发布时间:2022-07-18
热门推荐
阅读排行榜

扫描微信二维码

查看手机版网站

随时了解更新最新资讯

139-2527-9053

在线客服(服务时间 9:00~18:00)

在线QQ客服
地址:深圳市南山区西丽大学城创智工业园
电邮:jeky_zhao#qq.com
移动电话:139-2527-9053

Powered by 互联科技 X3.4© 2001-2213 极客世界.|Sitemap