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

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



评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值