如何，在2个窗口中交换数据啊。

Question

有Form1和Form2 我从Form1中 .show 打开form2 ，如何把 form1中的edit1.text 中数据 放入form2中的edit1.text 呢？
在vb中，可以在模块中设置 全局变量，还可以在form2中使用 form1.text1.text。但在delphi中如何设置呢？使用Form1.edit1.text 无法实现。请高手赐教。谢谢。

Answer 1

知道了，在form2的 引如unit Unit1;

Answer 2

在form2的uses中加上form1就行了!

Answer 3

楼主写错了吧
测试unit Unit1;interfaceuses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls;type
  TForm1 = class(TForm)
    Button1: TButton;
    Edit1: TEdit;
    procedure Button1Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;var
  Form1: TForm1;implementationuses Unit2;{$R *.dfm}procedure TForm1.Button1Click(Sender: TObject);
begin
     //str :=  edit1.Text;
     form2.edit1.Text := edit1.Text;
     form2.show;
end;end.
unit Unit2;interfaceuses
  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{$R *.dfm}procedure TForm2.FormCreate(Sender: TObject);
beginend;end.