delphi关闭程序,该怎么处理

delphi关闭程序
我现在在DataModule单元中写了一段代码，中间有个try..except...end   在try执行不成功的时间，在EXCEPT中要退出整个程序，这样用Application.Terminate;会提示未定义变量APPLICATION，没法退出整个程序。

  Application.Initialize;
  Application.CreateForm(TDataModule2, DataModule2);
  Application.CreateForm(TFwe, Fwe);
   …………中间会加载好多窗体......
  Application.Run;

因为DataModule2,中出现错误我要让整个程序退出，不然还会加载下面的窗体，继续提示好多错误，谁能告诉我怎么关闭整个程序
------解决方案--------------------
try
  //出错代码
except
  Application.Terminate;  // PostQuitMessage(0);  //Halt;
  Exit;
end;
------解决方案--------------------
Application.Terminate是正常退出，就是说要等到Application.Run執行结束后才会退出程序
可以用halt非正常退出,后面的CreateForm就不会执行了

------解决方案--------------------
Application.Terminate;
------解决方案--------------------

引用:

Application.Terminate;

完全退出。