一个很菜的问题(10分)

请问各位！
我想把一个参数或是变，从form1里传到form2里去！怎么传啊！代码是什么啊，谢谢！

全局变量就行了。不过要少用

楼上朋友说的对，设置全程变量即可，但要在结束时要释放呀，挺占资源的、

定義全局變量
unit Unit1;

interface

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

type
TForm1 = class(TForm)
private
{ Private declarations }
public
abc:string; //定義全局變量
{ Public declarations }
end;

var
Form1: TForm1;

implementation

{$R *.dfm}

end.


在另一表單中調用前要這樣寫
unit Unit2;

interface

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

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

var
Form2: TForm2;

implementation

uses Unit1;
{記住在這要uses Unit1;否則也沒用的}
{$R *.dfm}

procedure TForm2.Button1Click(Sender: TObject);
begin
form1.abc:='Value'; //先表單名再點變量就行了
end;

end.

就是楼上说得那样！