Question

Delphi中Form1中有按钮，点击按钮，调用Form2，此时希望Form1关闭，如何解决？

Answer 1

首先的form1不是mainform才行
在form1上点按钮的时候先form1.hide,然后form2.show(如果不存在form2则创建),在form2中最好是记录form1实例,当点击按钮的时候form2.hide,form1这个实例show就行

Answer 2

修改工程文件,将Form1为动态创建的窗体
点击Form1的按钮后Application.CreateForm创建Form2
此时Form1.Free释放掉就可以了
如果隐藏的话,还是不会减少程序内存占用的

追问

begin
application.CreateForm(Tform2,form2);
form1.Free;
//form2.ShowModal;
//form1.close;
end
内存出错了 怎么回事？

Answer 3

application.CreateForm(Tform2,form2);
form1.Free;
//form2.ShowModal;
//form1.close;
这不出错才怪，你Create Form2 －－　是2　,Free的却是FORM1－－是1　！！！

不知道你的Form1和ForM2是否在同一个项目里，如果没有其他要求的话可以这么做：
begin
Application.Initialize;
Application.CreateForm(TForm1, Form1);
if Form1.ShowModal =1 then
begin
Form1.Free;
Application.CreateForm(TForm2, Form2);

Form2.ShowModal ;
　Form2.Free ;
end
else
Form1.Free ;

end.
Form1中的按钮 ：self.ModalResult := mrOk ;
明白了？？？不明白的话，我可以发给你调试程序，QQ：4172222。

Answer 4

form1是默认主窗体 主窗体关了 那其他窗体都要关了，你可以将form1隐藏起来

Answer 5

self.Free;
Application.CreateForm(TForm2, Form2);
Form2.Show;