如何从dll中引出一个窗体?各位帮帮我吧!(100分)

  • 主题发起人 主题发起人 tw_jw
  • 开始时间 开始时间
T

tw_jw

Unregistered / Unconfirmed
GUEST, unregistred user!
小弟刚学dll,问一些菜鸟问题,望各位不要见怪!!
把一有窗体的项目作成dll,要引用这一窗体,改怎办?引用dll,是不是只要
这一个dll文件就可以了,还用unit和*.dpr吗?
有事例就最好了!
 
1.在输出函数中,窗体作为局部变量,动态创建。
2.只要dll即可。
 
http://www.playicq.com/dispdoc.php?t=&id=2749
 
library Project1;

uses
Unit1 in ''Unit1.pas'' {Form1}

procedure pr ();
begin
Form1:=TForm1.Create(nil);
form1.ShowModal ;
Freeandnil(form1);
end;


exports
pr;
{$R *.RES}

begin
end
------------------------------------------------
Procedure pr ();Stdcall;external 'Project1.dll'
implementation

{$R *.DFM}

procedure TForm1.Button1Click(Sender: TObject);
begin
pr ;
end;
 
不要忘了把application.handle传给dll
 
后退
顶部