在另外一个窗口中把要引用窗口uses进来。
注意:变量必须是全局或Public类型的。

解决方案 »

  1.   

    在窗口的public中定义变量,然后在另一窗口中加入变量所在窗口的单元,就可引用,格式如:
     窗口名.变量名
      

  2.   

    例如FORM1,FORM2,FORM2的public下定义    ss : string;   //不能在private在FORM1中USES UNIT2;   //UNIT2是FORM2的UNIT在任一事件中:
    form2.ss := 'abc';
    showmessage(form2.ss);
      

  3.   

     public
      s:string;
        { Public declarations }
      end;
    uses unit2;{$R *.DFM}procedure TForm1.Button1Click(Sender: TObject);
    begin
        s:='asfasdfsaf';
        form2.show;
    end;end.
    implementation
    uses unit1;{$R *.DFM}procedure TForm2.Button1Click(Sender: TObject);
    begin
        showmessage(form1.s);
    end;end.