新手关于关闭窗体的问题~~很简单~~

Question

程序运行时，运行程序弹出窗体form1,form1上有一个按纽,点击他后弹出form2,然后关闭form1（或者先关闭form1在弹出form也行）代码怎么写？？

Answer 1

begin
form2.show;
close;
end;

Answer 2

看主FORM是哪一個,如果是FORM1的話FORM1就不能CLOSE,隻能HIDE!

Answer 3

to:NightCloud(),gerrylc(lc) :你们的方法是当程序运行时,先运行form1,单击按钮后，form1.close 将form1关闭了，同时form2也关闭了。
to:Randomize() :我按你的方法作了，我这么写的：
form1.Hide;
form2.show;        不过这么写有错误，程序无法关闭，被隐藏的窗体怎么关闭掉？？？

Answer 4

Form1作为Main Form的时候，不能Close，只能Hide
procedure TForm1.Button1Click(Sender: TObject);
begin
  Form2.Show;
  Form1.Hide;
end;
在Form2的OnClose事件里面Close Form1 
procedure TForm2.FormClose(Sender: TObject; var Action: TCloseAction);
begin
  Form1.Close;
end;

Answer 5

你的自己写代码创建窗体，并且From1和From2是独立的
var
  Frm: TForm2;
begin
  Application.CreateForm(TForm2, frm);
  frm.show;
end;

Answer 6

或者写回调函数，但得保证 被关闭的不是主窗体，否则程序都没有了，则么让你的Form2存活

Answer 7

form1是主窗体Close的话就相当于整个退出了
你可以不要把form1作为主窗体，是不是在做登录窗口

Answer 8

好像你在做封面不是登录,
把form2设为主窗体,form2的Onshow里面showmodal form1

Answer 9

orm1作为Main Form的时候，不能Close，只能Hide
procedure TForm1.Button1Click(Sender: TObject);
begin
Form2.Show;
Form1.Hide;
end;
在Form2的OnClose事件里面Close Form1
procedure TForm2.FormClose(Sender: TObject; var Action: TCloseAction);
begin
Form1.Show;//當FORM2關閉以後SHOW出FORM1來,這樣可以關閉了.
end;to:yq3woaini
樓主這個小問題還都沒搞定,怎麼寫回調?