关于Form返回值的问题

with tform2.create(nil) do
if showmodal=mrok then
begin
a:=edit1.text; //form2中的edit1
free;
end;

case form2.showmodal of
mrNone: ;
mrOK: ;
mrCancel: ;
....
end;

—————————————————————————————————
宠辱不惊，看庭前花开花落，去留无意；毁誉由人，望天上云卷云舒，聚散任风。
—————————————————————————————————

lxpbuaa: good:), study from you,,form copy_paste , form you all

你要返回什么值？

http://expert.Codefund.cn/Expert/TopicView2.asp?id=1059121&datebasetype=now

在Form2的public中申明变量，然后直接使用Form2.变量名方式就可以获得该值，当然要在Form2被释放之前，另外可以在Form1的Public中申明变量，在Form2对该变量进行操作可以起到同样的作用，我个人觉得第二种方法好像好一点，不过矛盾的是，我一直在使用第一种方法，习惯了，很难改了