用Delphi5如何调用Dll中的子窗体？

Question

如题所述

Answer 1

我的例子是模态的.....varprocedure
ShowForm1;export;stdcall;implementation{$R
*.DFM}procedure
ShowForm1;begin
Form1
:=
TForm1.Create(nil);
try
Form1.ShowModal;
Form1.Free;
end;end;{
TForm1
}....dll的输出函数的定义：在dll中窗体的单位,定义输出函数。library
test;uses
SysUtils,
Classes,
Unt_Form2
in
'Unt_Form2.pas'
{Form2},
dynicload
in
'unt_dynicload.pas';
Form1:
TForm1;{$R
*.RES}exports
ShowForm1,
ShowForm2;beginend.delphi的dll装载，有静态的，和动态的。你照样去看书吧。dephi开辟dll很便利的。应用也便利。留意的是pascal传参次序和体系传参次序不一样，dll输出函数要加上stdcall;关键字。
finally
Unt_Form1
in
'Unt_Form1.pas'
{Form1},

Answer 2

在DLL里输出一个函数，如proceduer
MyForm1Show;stdcall;begin
if
not
Assigned(MyForm1)
then
MyForm1:=TMyForm1.Create(nil);
MyForm1.Show;//ShowModalend;exports
MyForm1Show;//留意：释放内存空间问题