在调用时   if application.findcomponent('form1')=nil then 
   Form1:=TForm1.Creat;在关闭Form1时在OnClose上加上Action:=cafree;或者  Form1.Free;我用后者

解决方案 »

  1.   

    退出用 Action := caFree
      

  2.   

    mid模式现在已经要淘汰了,使用太不方便了
      

  3.   

    为什么回有“cann't make a visible window modal”????
      

  4.   

    在 form close 事件中用Action:=caFree 可解决子窗体的关闭。
      

  5.   

    怎么控制子窗体的大小呢,我希望就显示在中央,不能最大,可以最小,不能改变大小,还有cann't make a visible window modal是怎么回事呢,怎么解决啊?
      

  6.   

    把所有自窗口的FORMSTYLE属性设置为FSMDICHILD,并设置为非活动,
    通过菜单 CREATE。如:
      VAR
        CHILDNAME:T子窗口名;
      BEGIN
       CHILDNAME:= T子窗口名.CREATE(SELF);
      END;关闭是用:Action:=cafree;
      

  7.   

    是把VAR
        CHILDNAME:T子窗口名;
      BEGIN
      CHILDNAME:= T子窗口名.CREATE(SELF);
      END;加在主窗体中还是子窗体中,还有把窗体设置为非活动的是那个属性?
      

  8.   

    'value  assigned to 'childname'naver used'?是怎么回事呢?
      

  9.   

    以下加在菜单的单击事件中。 VAR
        CHILDNAME:T子窗口名;//CHILDNAME为一个子定义的[T子窗口名]变量。
      BEGIN                  //[T子窗口名]为子窗口的类名。
      CHILDNAME:= T子窗口名.CREATE(SELF);
      END;在DELPHI菜单PROBJECT -> options 中把子菜单设置为非活动。
    记住在主窗口中添加子窗口单元。
      

  10.   

    退出用 Action := caFree