我在unit1里面定义了一个public变量china，为什么在unit2里面不能用呢？谢谢！

Question

代码如下：unit Unit1;interfaceuses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls, DB, ADODB, DBTables, Grids, DBGrids, CheckLst,
  ComCtrls,Unit3;type
  TForm1 = class(TForm)
    DataSource1: TDataSource;
  .....
  private
    { Private declarations }
  public
    { Public declarations }
    Thread_For_Test:TMyThread;
    china:integer;
  end;var
  Form1: TForm1;
  //public
  //Thread_For_Test:TMyThread;implementation
....////////////////////////////////////////////////////////////unit Unit2;interfaceuses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls,Unit3,Unit1;type
  TForm2 = class(TForm)
    Button1: TButton;
    procedure Button1Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;var
  Form2: TForm2;implementation{$R *.dfm}procedure TForm2.Button1Click(Sender: TObject);
begin
  china:=0;
end;end.错误是：
Unit2:undeclared identifier:'china'

Answer 1

use unit1procedure TForm2.Button1Click(Sender: TObject);
begin
  unit1.form1.china:=0;
end;end.

Answer 2

uses unit1procedure TForm2.Button1Click(Sender: TObject);
begin
  unit1.form1.china:=0;
end;end.