帮个忙，关于模式对窗体的

Question

试一试：
var
  form2:Tform2;
begin
...
try
  form2:=Tform2.create(application);
  form2.showmodal;
finally
  form2.free;
  end;
更正；
NO.1:
 form2.hide=(form2.visible:=false;)
NO.2:
  如果你想正真的释放它的话，那么你要把这个窗体从autocreate里边移到另一个里边才可以；
  你现在一起步就错了，也就是说，你的那个form2是在工程一创建时就自动创建了，你在程序中释放不干净；

Answer 1

procedure Tform2.Myexit ;  //不要用EXIT,因为exit为系统命令.
begin
  close;
end;

Answer 2

呵呵，要想释放掉请在form2的onclose事件里面写上:
action:=cafree

Answer 3

然后在您的退出按钮的click 事件里面写上：
button1onclick(sender:Tobject)
begin
close;
end;

Answer 4

？
我的那段就是当你close处理它自动运行；

Answer 5

这位ihihonline(小小) 老兄，你还在线吗？我又有问了：
   hide跟viable:=false是一样的。
我再问怎么在form2中用一个“退出”按钮来释放form2啊 ?

Answer 6

大菜单project->options按子窗体名移到auilable form 里面去!
调用时用T窗体名.Create(application);
关闭时用action:=cafree;
我就是这样的!!!
你试一试!!

Answer 7

好啦，解决啦，谢谢大家！
我刚才用了一个
  form2.close;
没用
后来把蛇足去了,写成
   close;
哎，还有用了，你们说我是不是很笨啊