在Delphi中切换表格

Question

我试图通过隐藏当前表单并显示下一个表单来更改Delphi XE7中的表单。我知道之前曾在这里询问过类似的问题，但我希望我的程序能够运行，以便如果用户关闭当前窗口，则整个应用程序都将关闭（当前，如果发生这种情况，我必须在任务管理器中结束项目）。

编辑：我的项目中也有10个表单，并且所有表单都无法自动创建，那么如何使用其他可用的表单？

Answer 1

在Delphi中，如果用户关闭主窗体，应用程序应自动关闭自身。

主要形式的OnClose事件：

procedure TfrmMain.FormClose(Sender: TObject; var Action: TCloseAction);
begin
  Action := TCloseAction.caFree;
  frmMain:= nil;
end;

此外，您还可以使用暂停命令终止应用。