只要你能解决，再送你100分。

Question

var
  MyForms:arrsy[1..100] of TMyForm;//运行时创建FORM//解析edit.text,取得n,通过对象的数组引用,如:if not Assigned(MyForms[i]) then MyForms[i]:=TMyForm.Create(nil);

Answer 1

将所有form的owner设为application（默认）
 
var
  i:integer;
begin
  for i:=0 to application.componentcount-1 do
    if application.components[i].name=edit1.text then
    begin
      (application.components as TForm).show;
      exit;
    end;
  showmessage('no such form');   
end;