当前位置:首页>开发>正文

DELPHI怎么把窗体写成DLL给其他程序调用

2023-12-23 15:01:03 互联网 未知 开发

DELPHI怎么把窗体写成DLL给其他程序调用?

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 showformstdcall  

5, 然后在implementation 下面uses math  

6, 在{$R *.dfm}下面写  Procedure synapp(App:THandle)stdcall  Begin  Application.Handle:=app  End  Procedure showformstdcall  Begin  Form1:=Tform1.create(application)  Form1.show  End  

7, 在dll的Library文件里的{$R *.res}下面写:  exports  Sysapp,show  上面到此为止完成了DLL封装窗体的创建  下面是调用了  1, 在要调用DLL文件的程序的var下写:  Procedure synapp(App:THandle)stdcallexternal ‘my.dll’ //----你的DLL文件名  Procedure showformstdcallexternal‘my.dll’//----你的DLL文件名  注:把你写好的DLL放在本程序的同一目录下,和上面一样,要uses math  2, 在你的程序的Button的On Click事件下写:  Synapp(applicatiln.Handle)  Showform...

最新文章