请教！如何在一个窗口中引用其他窗口定义的变量

Question

procedure TForm2.test;
begin
  showmessage(form1.var1);
end;

Answer 1

在需要引用的单元uses Form1的Unit;就可以使用了

Answer 2

在需要引用的单元uses Form1所在的单元；就可以使用了，如form1.xxx

Answer 3

如：
Unit Unit1;
interface
uses
  Unit2;
...
...
begin
  Form2.value...//对应于Unit2的form
end;Unit Unit2
...

Answer 4

如：
Unit Unit1;
interface
uses
  Unit2;
...
...
begin
  Form2.value...//对应于Unit2的form
end;Unit Unit2
...