我刚从vb转学delphi,现在遇到一个很简单的问题. 假设有两个窗口,form1,form2,其对应的单元为unit1,unit2,从form1切换form2这比较容易,在unit1里加uses unit1,然后用form2.show就可以了,可是从form2切回到form1却不能uses unti1,系统会提示"circular unit reference to unit1",请问各位高手,应该怎么改呢?

解决方案 »

  1.   

    在form2里引用unit1时,把代码写在执行段.
    unit2
    .....implementation
    uses
     unit1;
      

  2.   

    如果是循环的引用的话那么use的时候一个在开始的位置就是最上面的地方use一个在implementation的下面 可能会解决你的问题的
      

  3.   

    使用Delphi的File菜单下Uses Uint就可以解决了
      

  4.   

    //-------------------花了几分钟做的.不知能否帮上忙----------------
    unit Unit1;interfaceuses
      Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
      Dialogs, StdCtrls;type
      TForm1 = class(TForm)
        Button1: TButton;
        procedure Button1Click(Sender: TObject);
      private
        { Private declarations }
      public
        { Public declarations }
      end;var
      Form1: TForm1;implementationuses Unit2;{$R *.dfm}procedure TForm1.Button1Click(Sender: TObject);
    begin
      form2.show;
    end;end.
    //------------------------------------------//