MDIChild在MDIFrom中如果按关闭只是会缩小到左下而不会关闭
什么办法能把它关闭
而关闭以后点击按钮又能显示出来应该怎么做?望高手指点~

解决方案 »

  1.   

    在OnClose里面
     action:=caFree;
      

  2.   

    在OnClose里面加
    action:=caFree;
    form1:=nil;
      

  3.   

    关是可以了
    但是怎么样再开还是弄不明白form1是MDIForm ,里面有一个button1,用来打开关闭form2
    form2是MDIChild
      

  4.   

    就是想在MDIForm中控制MDIChild的开与关
    但是不知道怎么实现
      

  5.   

    procedure TForm1.N2Click(Sender: TObject);
    begin
       if not Assigned(form2) then
          begin
            form2:=form2.Create(Application);
            form2.Show;
          end;
    end;
      

  6.   

    不好意思有句搞错了form2:=form2.Create(Application); 
    改成试试看!
    form2:=Tform2.Create(Application);