两个窗口传递变量的问题，朋友进来看看！(50分)

假设有两个窗口，分别为A , B 。 A里面有一个变量id: integer;

在A里面有一个按钮，点击，调用B，B里面有一个edit1控件，用来显示变量id的值。

use进去
form1.变量
就可以了

在论坛上有很多的,看看

直接引用就可以，
uses forma
在fromb中直接
forma.id

不行啊！~


错误信息！
[Error] Unit2.pas(30): Record, object or class type required

原码：
//***************************** unit1.pas ************************************
unit Unit1;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;

type
TForm1 = class(TForm)
Button1: TButton;
procedure FormCreate(Sender: TObject);
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
id: integer;
end;

var
Form1: TForm1;

implementation

uses Unit2;

{$R *.dfm}

procedure TForm1.FormCreate(Sender: TObject);
begin
id :=100;
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
unit2.Form2.Show;
end;

end.

//*************************************** unit2.pas ************************
unit Unit2;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;

type
TForm2 = class(TForm)
Edit1: TEdit;
procedure FormCreate(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form2: TForm2;

implementation

uses Unit1;

{$R *.dfm}

procedure TForm2.FormCreate(Sender: TObject);
begin
edit1.Text:=unit1.Form1.id.asstring;
end;

end.


看看，哪错了？

id.asstring是什么意思？换成
edit1.Text:=IntToStr(unit1.Form1.id);

多人接受答案了。