用 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;
作者：白伟奇（其实我是菜鸟）
QQ：276261745
- 1
- 2
- 3
- 4
- 5
前往页