1.关于登录窗口（Login）：
很多时候我们在做开发delphi的MDIform时，常常因为要做进去Login一个正常的登录窗口，平常做Login的project代码如下：
只有Login登录成功了时候，才会建立起frm_Main窗体，这是正常不用MDI框架的正常登录与主窗体切换。
Application.CreateForm(Tfrm_Login, frm_Login); if frm_Login.ShowModal = mrOK then //登录窗体关闭时返回了mrOK值，说明登录成功 beginApplication.CreateForm(Tfrm_Main, frm_Main); frm_Main.ShowModal; end;
现在问题是frm_Main是MDI主窗体，而delphi会把第一个CreateForm认定为MDI主窗体，而frm_Login的FormsTyle是fsNormal正常窗体。
如果按上面的代码的话，将导致“Cannot create form.No MDI formsare currently active."
解决方案：
既然delphi会把第一个CreateForm认定为MDI主窗体，那我们就把Application.CreateForm(Tfrm_Main,frm_Main);放在最前，project代码如下：
Application.CreateForm(Tfrm_Main, frm_Main);
Application.CreateForm(Tfrm_Login, frm_Login);这样的话执行后的第一个窗口不是Login 而是Main窗体，这时我们需要再Main窗体OnCreate事件中加进如下代码：
procedureTfrm_Main.FormCreate(Sender: TObject); begin with Tfrm_Login.Create(Self) doShowModal; end;
加上这句后的，执行后的第一个窗口就是Login，第一个问题解决。
2.关于MDI子窗体最小化，与窗体恢复：
在做MDI窗体的时候，点击菜单按钮呼出第一个MDI子窗体。对MDI子窗体最小化后，我们会看到窗体在主窗体的左下角。
而当我们往往再次点击菜单那个按钮不是再次重新建立一个窗体，而是对原有窗体进行呼出选择并显示。（比如MDI子窗体最小化了，而我们点击菜单该子窗体按钮时，该子窗体应重新Restrore到中央）
一开始，我试着对frm_UserDefine(我的一个MDI子窗体)进行控制。包括以下：
showwindow(frm_UserDefine.handle, sw_restore); // 显示子窗口
SendMessage(frm_UserDefine.Handle,MY_SETSTATE_MSG,0,0);// 发送消息到子窗口 触发消息进行Restore
都不管用，甚至以下代码，都会报内存错误
procedureTfrm_Main.N9Click(Sender: TObject); varfrm_UserDefine: Tfrm_UserDefine; begin if not isInclude(Tfrm_UserDefine) then beginfrm_UserDefine := Tfrm_UserDefine.Create(Application); frm_UserDefine.Show; end else beginfrm_UserDefine.Show; end; end;
当重新点击时 判断了frm_UserDefine已建立，重新show时就报错，最后跟踪查了下frm_UserDefine找不到，我也不太清楚什么原因。
解决方案：
我在判断子窗体是否存在时，若存在就对其进行Restore，就把这个功能实现了，代码如下：
functionTfrm_Main.isInclude(Formclass: TFormClass): Boolean; vari: Integer; Form: TObject; beginResult :=false; for i := 0 to frm_Main.MDIChildCount do beginForm :=frm_Main.MDIChildren[i]; if Form is Formclass then beginResult :=true; SendMessage(MDIChildren[i].Handle, WM_SYSCOMMAND, SC_RESTORE, 0); //在这里对MDI窗口进行管理恢复 MDIChildren[i].Enabled:=true; MDIChildren[i].Show; MDIChildren[i].SetFocus; end; end; end;
procedureTfrm_Main.N9Click(Sender: TObject); varfrm_UserDefine: Tfrm_UserDefine; begin if not isInclude(Tfrm_UserDefine) then beginfrm_UserDefine := Tfrm_UserDefine.Create(Application); frm_UserDefine.Show; end; end;
这样就实现了重新点击就能使子窗体重新恢复的功能。不过大家有什么更好的解决方法也可以跟我留言。
3.关于MDI子窗体被主窗体控件遮挡问题
因为要在主窗体插入Falsh或者Webbrower控件，panel控件做总体导航时，因为MDI子窗体挡在后面而头疼。（Image控件刚好没有遮挡MDI子窗体，所以一般开发就是在MDI主窗体背后放个Image做背景），OK，现在问题是如何解决主窗体的控件不遮挡MDI子窗体，而且躲在底层还能点击。
解决方案：
这里我是把子窗体的父类指向MDI主窗体，代码如下：
procedureTfrm_Main.N9Click(Sender: TObject); varfrm_UserDefine: Tfrm_UserDefine; begin if not isInclude(Tfrm_UserDefine) then beginfrm_UserDefine := Tfrm_UserDefine.Create(Application); Winapi.Windows.SetParent(frm_UserDefine.Handle,frm_Main.Handle); frm_UserDefine.Show; end; end;
这时呼出来的 子窗体界面就在控件前面了，还有个小Bug，就是对子窗体最小化后看不到子窗体，这时关闭窗体会报内存错误。
其实最小化后是隐藏起来，鼠标还是可以点击到的。（这里怎么会隐藏起来，可能还需要研究，如果大神知道原因的话，可以留言告诉我，我觉得可能改变了框架导致MDI错乱了吧）
这里可以在子窗体在最小化时show一下，且子窗体需要有控件（例如：panel）存在（没控件存在的form也会最小化隐藏），以下为子窗体代码
procedure Tfrm_UserDefine.FormCanResize(Sender: TObject; varNewWidth, NewHeight: Integer; varResize: Boolean); begin case WindowState ofwsMinimized: Self.Show; end; end;
问题解决！
以上代码是泡泡航在Delphi XE5的开发，虽然微软说明多文档界面MDI存在问题，但是现在以MDI窗体作为系统开发的还是蛮多的。如果大家有什么更好的办法或者建议，可以多多留言交流。