错误提示:Circular unit reference to 'LoginForm'
程序默认打开form1,form1里面user form2,form1里有个按钮,
点击后弹出登录框form2(Application.CreateForm(TForm2,Form2);
Form2.ShowModal;),
登录成功会关闭form2,并在form1中做标记,请问如何在form2关闭时访问form1中的标记,这个标记可以就是一个edit我的form1中已经包含form2了,我尝试在form2中再use fomr1,于是
这样提示
[Fatal Error] LoginForm.pas(7): Circular unit reference to 'LoginForm'请问该怎么办?

解决方案 »

  1.   

    循环引用了..Form2 := TForm2.Create(Application);
      try
        if Form2.ShowModal = mrOK then
        begin
        // 添加代码, 你要做的标记
        end;
      Finally
        Form2.free;
      end;
      

  2.   

    循环引用了你把 uses LoginForm; 放到 implementation 下面看看。像这样implementationuses 
      LoginForm;
      

  3.   

    循环引用了..  尽量避免循环引用.
    尽量不要在implementation 中引用单元.去掉form2 中 引用form1的代码在form1中有如下代码Form2 := TForm2.Create(Application);
      try
        if Form2.ShowModal = mrOK then
        begin
        // 添加代码, 你要做的标记
        // 如:
           edit1.text := form2.edit1.text;
            .....
        end;
      Finally
        Form2.free;
      end;