编译怎么也不报错?这两个m变量不是全局的吗? unit1中使用的m变量是那个单元的m变量?
//----------------------------------------------
unit Unit2;interface
type
  TLT=class(TObject)
  private
  public
  end;var
  m:Integer;implementationend.//------------------------------------------------
unit Unit3;interface
type
  TYD=class(TObject)
  private
  public
  end;var
  m:Integer;
implementationend.
//------------------------------------------------
uses Unit2, Unit3;
var
  Form1: TForm1;
  Lt:TLT;
  Yd:TYD;
implementation{$R *.dfm}procedure TForm1.Button1Click(Sender: TObject);
begin
  m:=1;
end;end.