一个自己无法解决的问题？

Question

如何把DLL文件中创建的窗体加到我的MDI中来。（注：不是一般的窗体，而是一个子窗体）？

Answer 1

DLL中的窗口SHOW显示后马上就会被释放了，

Answer 2

八 在DLL中建立一个TMDIChildForM
1 Dll中的MDIForm.FormStyle不用为fmMDIChild.
2 在CreateForm后写以下两句：
function ShowForm(mainForm:TForm):integer;stdcall
var
  Form1: TForm1;
  ptr:PLongInt;
begin
  ptr:=@(Application.MainForm);//先把dll的MainForm句柄保存起来，也无须释放，只不过是替换一下
  ptr^:=LongInt(mainForm);//用主调程序的mainForm替换DLL的MainForm。MainForm是特殊的WINDOW，它专门管理Application中的Forms资源.
//为什么不直接Application.MainForm := mainForm,因为Application.MainForm是只读属性
  Form1:=TForm1.Create(mainForm);//用参数建立
end;
备注：参数是主调程序的Application.MainFormfrom超级猛料