Q
qiushen
Unregistered / Unconfirmed
GUEST, unregistred user!
我建立了两个窗口，主窗口１， 窗口２，我要在进入窗口１之前运行窗口２，进行一
些，于是有我写了以下代码，可是运行的时候好像窗口２只是一闪而过，为什么没有等待？
procedure TForm1.FormCreate(Sender: TObject);
begin
Application.CreateForm(TForm2, Form2);
form2.show;
// 如果加入 Application.run; 的话，关闭窗口２，程序就退出了，这是怎么回事？
form2.free;
end;
些，于是有我写了以下代码，可是运行的时候好像窗口２只是一闪而过，为什么没有等待？
procedure TForm1.FormCreate(Sender: TObject);
begin
Application.CreateForm(TForm2, Form2);
form2.show;
// 如果加入 Application.run; 的话，关闭窗口２，程序就退出了，这是怎么回事？
form2.free;
end;