各位大哥，我是新手，请问窗体如何相互调用？

Question

现有 form1和form2两个窗体
如何当form1调用form2时form1退出？请您具体一点好吗？

Answer 1

FILE（文件）/Use unit(引用)

Answer 2

delphi中是有一个主form，当主form退出，整个程序都会退出，因此主form只能隐藏，例如form1是主form，源文件是Unit1，form2源文件为Unit2，在unit1的uses部分加上unit2，unit2的uses部分加上unit1，在form1调用form2，可用Form2.show，form1隐藏（fomr1.visable：＝false），form2调用form1就在关闭前把form1设为可视
form1.visable：＝true；
form2.close；

Answer 3

如果form1不是主form
在Form2的onshow事件里加入
if Form1<>nil then
    form1.close;
在form1的onclose事件中加入
action:=cafree;
form1:=nil;