제가 평션 만들어 놓으신걸로 해보세요.....

procedure TFA_INHERIT_MAIN.Form_Display(FormClass: TFormClass; var Reference; F_name : String);
var
  i : Integer;
begin
  for i := 0 to MDIChildCount - 1 do
  if MDIChildren[i] is FormClass then
     begin
       if Isiconic(MDIChildren[i].Handle) then
          ShowWindow(MDIChildren[i].Handle, SW_RESTORE)
       else MDIChildren[i].Show;
       Exit;
     end;
  if MDIChildCount = 10 then
     begin
       MessageBox(Handle, '작업화면을 10개 이상 실행할 수 없습니다.', '프로젝트', MB_OK+MB_ICONASTERISK);
       Exit;
     end;
  Application.CreateForm(FormClass, Reference);
end;

당연히 자식폼은 챠일트 폼인거 아시죠.......^^;

그럼 즐코하세요......