程序初始化时用什么退出程序？

Question

如下：在application.run还未执行前，我先进行数据库的连接，如连不上退出系统，可是用application.terminate不行，"非法操作",应该用什么退出程序。

Answer 1

{$R *.res}begin
  Application.Initialize;
  with TfrmSplash.Create(Application) do
  try
  Application.Title := 'XXXXX管理系统';
  Application.CreateForm(TfrmMain, frmMain);
  Application.CreateForm(TDmsys, Dmsys);
  finally
    Free;
  end;
  with TfrmLogin.Create(Application) do
  try
    ShowModal;
  finally
    Free;
    if ModalResult = mrOK then
      Application.Run
    else
      begin
      Dmsys.Free;
      frmMain.Free;
      Application.Terminate;
      end;
  end;
end.————————————————————————————
不是高手，跟我混。▲▲▲▲
寻觅尘封的往事，想念重现。那一段曾经陪你走过的从前，感觉还是没变，我珍惜这份缘。

Answer 2

try
你的程序
except
Application.Terminate;
end;

Answer 3

你application都还没有run，那来的Application??直接 Exit;

Answer 4

同意crossbow(La Vida Es Amor)，exit