form间的通信

Question

form2.edit1.text := form1.edit1.Text;

Answer 1

另一个form引用前一个form所在的单元即可,例
uses Unit1;

Answer 2

Form1 里输入已后　Form2里自动完成输入:
……
var
  Form1: TForm1;
implementationuses unit2;procedure TForm1.Edit1Change(Sender: TObject);
begin
  Form2.Edit1.Text:=Edit1.Text
end;

Answer 3

对，定义一个公用数据单元unit,并被所有需要共享变量的单元引用。
最合适的方法。里面的变量都是全局变量。

Answer 4

选择file|new|unit，然后在里面定义变量就行了