怎样在一个表里引用另一个表里的变量

Question

unit Unit1;interfaceuses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs;type
  TForm1 = class(TForm)
    procedure FormShow(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;var
  Form1: TForm1;
 jk: integer;//这里定义的变量叫全局变量吗？implementation{$R *.dfm}procedure TForm1.FormShow(Sender: TObject);
beginjk:=0;//这在里给它赋一个值；end;
end.表2unit Unit2;interfaceuses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs,unit1;type
  TForm2 = class(TForm)
    procedure FormShow(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;var
  Form2: TForm2;implementation
{$R *.dfm}procedure TForm2.FormShow(Sender: TObject);
beginif form1.jk=0 then//在这里引用了表１中定义的变量，但提示如下的错误undeclared identifier:'jk'form1.jk :=1;
end;end.
比较低级的一个问题，谢谢各位

Answer 1

你定义的是全局的了。
这样就好了if jk=0 then