|
| 盒子资源分类 |
![]() |
|
|
|
|
| 用DELPHI创建DLL文件，封装窗体的实现方法实例 |
![]() |
| 关键字：delphi dll 创建 窗体 封装 |
| 来 自：原创 |
| 平 台：Win2k/XP/NT,Win2003 |
下载所需：0 火柴 |
| 深浅度：初级 |
完成时间：2010/5/15 |
| 发布者：andylist |
发布时间：2010/5/26 |
| 编辑器：DELPHI7 |
语 种：简体中文 |
| 分 类：窗体 |
下载浏览：3817/26074 |
|
|
|
|
|
虽是原创，但是是参考过别人的作品，然后自己重新写的，目的是要给初学者一个更容易明白。
用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; |
| 本站原创作品，未经作者许可，严禁任何方式转载；转载作品，如果侵犯了您的权益，请联系我们！ |
| 相关文章 |
|
![]() |
|
|
| 相关评论 |
![]() |
|
共有评论10条
当前显示最后6条评论
|
| mos |
2010/10/10 11:08:08 |
如果一个DLL中有多个窗体,怎么办?
不可能要写N多个调用的代码吧! |
| yuhua2703 |
2012/8/15 13:42:55 |
| 堪称经典，不错，收藏了。 |
| axfx |
2012/8/24 15:23:50 |
| 谢谢！ |
| qyyihua |
2012/9/28 15:37:32 |
| 什么东西，很菜的，N多问题未解决 |
| r670615769 |
2013/12/2 18:19:33 |
挺好的，除了有2个错别字
1.Synapp,show改为Synapp,showform;
2.Synapp(applicatiln.Handle);改为Synapp(application.Handle);
改好就可以了 |
| zedifier |
2014/1/3 14:33:39 |
| 这个例子能实现。 但是还是一头雾水。配详细的文字说明比较好。 |
| 我要发表评论 |
查看全部评论 |
|
|
|
