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

用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;