Question

delphi中怎么把tfrom1的变量赋值给tfrom2的变量

比如tform1的已经有一个变量得到值，当tform1关闭tform2显示的时候
要把这个变量的值赋值给tform2的edit1.text
怎么弄

而且，怎么定义全局变量啊，比如tform的一个变量得到赋值后，tform2，tform3等等都可以直接调用

Answer 1

以下三个步骤可以完成：

1、定义的全局变量：在Tfrom1  public下方位置，定义全局变量str1，类型为string。如图

2、引用Tfrom1：在implementation下引用Tfrom2。如图

3、定义Tfrom2的变量（以局部变量为例）及赋值：在Tfrom2，定义局部变量STR2，类型与str1保持一致（string）。见图

Answer 2

看一下下面的代码就应该知道在哪里定义这个变量了
unit Unit1;

interface

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

type
TForm1 = class(TForm)
procedure FormCreate(Sender: TObject);
procedure FormClick(Sender: TObject);
private
{ Private declarations }
public
i:string; //其他单元要用到的变量要在这里定义
{ Public declarations }
end;

var
Form1: TForm1;

implementation

uses Unit2;

{$R *.dfm}

procedure TForm1.FormCreate(Sender: TObject);
begin
i:='这个是定义在Public下面的字符变量';
end;

procedure TForm1.FormClick(Sender: TObject);
begin
form2.Show;
end;

end.

//--------两个不同单元--------------------

unit Unit2;

interface

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

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

var
Form2: TForm2;

implementation

uses Unit1;

{$R *.dfm}

procedure TForm2.FormClick(Sender: TObject);
begin
form2.Caption:=Form1.i;
end;

end.

//记得加分，，谢谢

Answer 3

比如tform1中已声明了一个变量X，要想在tform2、tform3中使用该变量，你必须做到以下两点：
1、在tform1中，声明变量X的语句（如：var x:string;）必须放在Implementation之前。

2、在tform2、tform3中，必须引用tform1对应的单元。如：uses unit1;
----------------------------------------------------------
再具体说说吧：
你学习Delphi，首先必须搞清楚什么是单元？ 单元文件由哪几部分构成？

每个单元由三部分构成：
（1）单元名称。如：Unit Unit1;
（2）接口部分。也即：interface 之后直到implementation之前的部分。
这部分不允许有可执行的语句，这里都是类型、过程、变量、常量等的声明。而且这里声明的类型、过程、变量、常量等可以在别的单元中使用（所谓全局的），但别的单元必须使用Uses语句引用声明这些类型、过程、变量、常量的单元。
（3）实现部分：即implementation后面直到最后的 end.

这里都是具体的可执行代码。大部分是interface 部分声明的事件过程的具体实现。当然也可以添加一些自定义的过程、函数等。

Answer 4

一个是设置公共变量，定义在public里面。其他单元可以调用。
另外是可以设置在
var
Form1: TForm1;

implementation
中的Form1后面，这样设置的话变量被定义成全局变量，其他UNIT都可以调用的。