作品发布     邀请码    设为首页  收藏 

当前位置:文章编程 → 文章内容 >> 用DELPHI创建DLL文件,封装窗体的实现方法实例


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

更新时间:2012-2-18 15:44:27   作者:华中帝国整理  来源:华中帝国
用DELPHI创建DLL文件,封装窗体的实现方法实例:即一个程序不再是单一的一个EXE文件了,而是由一个EXE文件加N个DLL文件组成,这样做的原因是方便以后的维护与更新,也是跨平台开发的重要一步。1, 打开DELPHI, ...
用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;

   免责声明:本文仅代表作者个人观点,与本站无关。其原创性以及文中陈述文字和内容未经本站证实,对本文以及其中全部或者部分内容、文字的真实性、完整性、及时性本站不作任何保证或承诺,请读者仅作参考,并请自行核实相关内容。

责任编辑:华中帝国        



本文引用网址: 

用DELPHI创建DLL文件,封装窗体的实现方法实例的相关文章
发表评论

用户名: 查看更多评论

分 值:100分 85分 70分 55分 40分 25分 10分 0分

内 容:

         (注“”为必填内容。) 验证码: 验证码,看不清楚?请点击刷新验证码