浅谈MDIChild的showmodal问题

1. {最近在写一个程序，设计功能时要用到MDIChild的showmodal方式显示窗体，自己试着做了一个，结果报错(-_-!)。在网上找了找资料，发现MDIChild无法使用showmodal的方法，可是参考一个软件发现可以实现这样的功能，求人不如求己啊。
3. 试着写一个Demo，MDI模式的，测试成功！~_~
4. 具体过程：新建一个MDI主窗体FMain，两个MDIChild窗体，其中一个窗体Form1的FormStyle := fsMDIChild，另一个Form2保持默认状态，现在要开始调用两个窗体了，Form1的问题不大，创建后就可以显示出来；Form2窗体的也快以showModal出来(没有设置为MDIChild)，下面在调用的时候为Form2窗体添加如下代码：}
5. //MDIChild模式 
6. procedure TFMain.MForm3Click(Sender: TObject);
7. begin
8.   FTestFrm3:=TFTestFrm3.Create(Self);
9.   FTestFrm3.FormStyle:=fsMDIChild;
10.   FTestFrm3.Visible:=True;
11.   FTestFrm3.Show;
12. end;
13. //ShowModal模式 
14. procedure TFMain.MFrm3SMClick(Sender: TObject);
15. begin
16.   FTestFrm3:=TFTestFrm3.Create(Self);
17.   FTestFrm3.ShowModal;
18. end;
19. //这样调用后Form2窗体既可以以MDIChild模式显示，又可以ShowModal模式显示了。 
20. {
21. Demo下载地址：
22. http://www.brsbox.com/yct0605/dirid/1115203
24. 感谢那么提供帮助的朋友，感谢CSDN，这个Demo如果又不完善的地方请大家到告诉我，我会即使改正的。
25. QQMail:34350218@qq.com}