把他们申明到你的FORM类的PUBLIC里

解决方案 »

  1.   

    你的声明是否放在了public中,如放在private中当然不能引用了。
      

  2.   

    如果变量为类的,则要加类前缀。
    你可如下定义:
    interfacevar
      i,j : integer;
    只要uses该单元的地方都可用该变量。
      

  3.   

    给你最直观的把这些代码COPY进去1000%行:
    1.单元:
    unit Unit1;interfaceuses
      Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
      StdCtrls;type
      TForm1 = class(TForm)
        Button1: TButton;
        Button2: TButton;
        procedure Button1Click(Sender: TObject);
        procedure Button2Click(Sender: TObject);
      private
        { Private declarations }
      public     mytest:string;//*****就这个
        { Public declarations }
      end;var
      Form1: TForm1;
    implementationuses Unit2;{$R *.DFM}procedure TForm1.Button1Click(Sender: TObject);
    begin
           mytest:='hello';
            showmessage(mytest)end;procedure TForm1.Button2Click(Sender: TObject);
    begin
    form2.Show;
    end;end.2.单元:
    unit Unit2;interfaceuses
      Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
      StdCtrls;type
      TForm2 = class(TForm)
        Button1: TButton;
        procedure Button1Click(Sender: TObject);
      private
        { Private declarations }
      public
        { Public declarations }
      end;var
      Form2: TForm2;implementationuses Unit1;{$R *.DFM}procedure TForm2.Button1Click(Sender: TObject);
    begin
            showmessage(Form1.mytest);
    end;end.