您的位置:首页 > 编程语言 > Delphi

delphi把窗体嵌入到dll中。实现方法

2013-12-06 15:04 281 查看
<1>创建dll文件

1.新建一个Dll Wizard工程,保存为MyDll,注意这个地方名称的大小写,会影响生成的动态链接库的名称(动态链接库的名称区分大小写)

2.在这个工程中新建一个form,在form单元中引用uses stdctrls

在form1中创建两个过程:在var下面写

procedure synApp(App:THandle);stdcall;

Procedure showform;stdcall;

3,在implementation下写uses math

4.定义这两个过程

在{$R *.dfm}下面写

procedure synapp(App:Thandle);stdcall;

begin

Application.Handle:=App;

end;

procedure showform;stdcall;

begin

form1:=TForm1.create(Application);

from1.show;

end

5.在dll的Library文件里的{$R*.res}下面写:

exports

Synapp,show;

以上完成了dll封装窗体的创建

<2>调用dll动态数据库

1创建一个delphi工程

1, var下写:

Procedure synapp(App:THandle);stdcall;external ‘my.dll’ ;//----你的DLL文件名 (函数,存储过程名区分大小写)

Procedure showform;stdcall;external‘my.dll’;//----你的DLL文件名

注:把你写好的DLL放在本程序的同一目录下,和上面一样,要uses math;
内容来自用户分享和网络整理,不保证内容的准确性,如有侵权内容,可联系管理员处理 点击这里给我发消息
标签: