把addfrm,delfrm的VISIBLE属性设为false;

解决方案 »

  1.   

    为了保险起见,我再问你一句哦,是不是就改visible,文档里还要改吗?谢谢
      

  2.   

     在你的ONCLICL事件中写:
       if (not Assigned(addfrm)) then begin
        if Prompt then
          addfrm:=Taddfrm.Create(Self);
      end
      else
        addfrm.BringToFront;
     在 MDI CHILD FORM的ONDESTORY中写:
       addfrm := nil;
      

  3.   

     sorry,prompt应该去掉在你的ONCLICL事件中写:
      if (not Assigned(addfrm)) then 
          addfrm:=Taddfrm.Create(Self)
      else
        addfrm.BringToFront;
    在 MDI CHILD FORM的ONDESTORY中写:
      addfrm := nil;