【搞定】警告循环引用不让编译。**

lhb963

我在信息（A）中的表单文档（Ab）表单中，调用功能（B）中的窗体（Bc），我先在信息（A）中引用功能（B），然后在用如下写法，它就报循环引用。 版本2603

procedure TAb.DataGridDblClick(Sender: TObject);
  var Form1:Bc;
begin
  Form1 := Bc.Create(context);
  try
    Form1.showmadal;
  finally
    Form1.Free;
  end;

end;

lixy

首先你的设计有误。最好改一下程序结构，把公共部分提出来。
还有可能就是你功能或者信息代理没有设置成default
参看下这个文档。
http://bbs.justep.com/forum.php? ... D%BB%B7%D2%FD%D3%C3

lhb963

“功能或者信息代理没设置成default”东西在那看在那改？

lixy

引用的属性。在stdio向导产生的带docview的窗体的功能代理上能看到。
信息上是信息代理引用属性是default

lixy

信息上引用窗体，应该是设计问题。跟4楼的情况不一样

lhb963

我的功能和信息没有用default，用的都是unit

lhb963

怎么设计才不出问题？告诉我几个必须。

lixy

那你把其中一个unit的引用放实现（implementation）里
implementation
  uses  单元名;

lixy

楼主请回馈

lhb963

不好意思，忘了这个帖子了。 不过我还是不太明白。
我的功能（A）中的主窗体（Aa），用到了信息（B）中的表单文档（Ba）。现在我要实现在信息（B）中的表单文档（Bb）双击打开功能（A）中的窗体（Ab），那就需要信息（B）的配置属性引用了功能（A），然后才能调用功能（A）中的窗体（Ab），这样写完编译就出现循环引用问题了。