寻求一段源码,关于多文档设计中建立多个子窗体,和能同时保存,分别保存文档的例子!

Question

很久没用DELPHI了，我也要学习学习。
var
oldcursor:TCursor;  //光标
i:integer;         //变量i为子窗口个数
begin
   for i:=0 to MDIChildcount - 1 do
      begin
           if MDIChildren[i] is Tw_yzylr then
              begin
              MDIchildren[i].show;
              exit;
              end;  //if
      end; //for
oldcursor:=screen.Cursor;
screen.cursor:=crHourglass;
try
   w_yzylr:=Tw_yzylr.create(application);
finally
   screen.cursor:= oldcursor;
end; //finally

Answer 1

我是个新手,才开始接触delphi,现在的难点就是如何用自己定义的动态数组保存打开的多个文档???,
文档子类是TMdichild,
我自己定义了一个动态数组
 var
    mychild:array of TMdichild;
    i:integer;
mychild[i]:=TMdichild.create(application);
或者
mychild[i]:=TMdichild.create(self);
都不行啊!!!!,总是出现异常!!!!郁闷的很,把这个问题给我解决了,我给他50分

Answer 2

这么简单的一个问题摆在这里有好长时间呢?真是有点失望啊!!
delphi高手哪里去了????