怎么实现在一个窗体中点击按钮后关闭本窗体，打开新窗体

如何实现在一个窗体中点击按钮后关闭本窗体，打开新窗体
如何实现在一个窗体中点击按钮后关闭本窗体，打开新窗体？多谢了。好像比vb复杂多了。

------解决方案--------------------
这种情况下，你的flash窗体就是起动窗体了，那你只能hide它了，不能关闭。
------解决方案--------------------
在项目文件里：

var
frmFlash: TFormFlash;
begin
frmFlash := TFormFlash.Create(Application);
frmFlash.ShowModal;
Application.CreateForm(TFormMain, FormMain);
Application.Run;
end;
------解决方案--------------------
frmSplash := TfrmSplash.Create(Application);
frmSplash.Show;
frmSplash.Update;
Application.CreateForm(TDMDCM, DMDCM);
Application.CreateForm(TLocalDAO, LocalDAO);
Application.CreateForm(TfrmMain, frmMain);
Application.CreateForm(TfmPopupTree, fmPopupTree);
Application.CreateForm(TfmPopupKATree, fmPopupKATree);
Application.CreateForm(TPersQueryForm, PersQueryForm);
Application.CreateForm(TEmployerQueryForm, EmployerQueryForm);
Application.CreateForm(TFrm_JSQuery, Frm_JSQuery);
frmSplash.Close;
frmSplash.Free;
Application.Run;
以上代码用于加载过程中显示frmSplash,加载完毕时,关闭frmSplash 窗体