在一个F_main窗体上放两个Button,点一个按钮打开Form1,点两外一个开Form2。
要求不能同时打开Form1,Form2。Form1,Form2是设计好的。不是self的。
如何写这两个按钮的事件?

解决方案 »

  1.   

    在打开一个form时判断另一个是否激活。也可以设一全局变量,在单击事件中付值,
    在打开form前可以根据变量值判断呀,然后进行相应的关闭操作。请试试。
      

  2.   

    if not assigned(Form1) then Form2.showmodal;
      

  3.   

    这么麻烦做什么,用SHOWMODAL就一切OK了;
      

  4.   

    if assigned(Form1) then form1.free;
    form2.show;
      

  5.   

    If Not  Assigned(Form1) then 
     begin
       //打开Form2 
       ....
       //在关Form2时要在onclose中写上
       Action:=cafree;
       Form2:=nil;
     end    ;
     
     If Not  Assigned(Form2) then 
     begin
       //打开Form1 
       ....
       //在关Form1时要在onclose中写上
       Action:=cafree;
       Form1:=nil;
     end    ;