两个Form之间值的传递！(50分)

Form1,Form2;
在Form1中，import Form2;
在其中的一个方法中，form2,search();form2.show();
在Form2中，import Form1
在search()中，form1.eidt1.getText();
请问这样有错吗
出错为：overstack是不是不能循环调用呢

1。你的form2,search();form2.show();是在form1的什么地方调用的？
2。怎么会出现这样的流程。我觉得流程就有问题，还是改改流程吧

不会吧，看下面的程序就没有问题：
//Form1:
//_________________________
unit Unit1;
interface
uses
Windows, Messages, SysUtils, 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;
implementation
uses Unit2;
{$R *.DFM}
procedure TForm1.Button1Click(Sender: TObject);
begin
form2.show;
end;
end.

//Form2;
//_________________________
unit Unit2;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
StdCtrls;
type
TForm2 = class(TForm)
Button2: TButton;
procedure Button2Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form2: TForm2;
implementation
uses Unit1;
{$R *.DFM}
procedure TForm2.Button2Click(Sender: TObject);
begin
caption:=form1.edit1.text;
end;

end.

dhyzf：
还记得这个帖子么http://www.delphibbs.com/delphibbs/dispq.asp?lid=759049
你现在哪里？重新给我个你的email吧。
我的mail:hamburger99@sina.com.我在杭州富通，看到这后给我发个mail

请问你的邮箱是？

我发一个例子给你！

多人接受答案了。