delphi关闭程序

[zpc198600]

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

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

因为DataModule2,中出现错误我要让整个程序退出，不然还会加载下面的窗体，继续提示好多错误，谁能告诉我怎么关闭整个程序

[zpc198600]

呵呵，引用下FORMS单元,好了，不知道这样解决完美不，还有不知道大家在DataModule中想退出程序是怎么操作的

[helloDX2012]

try
//出错代码
except
Application.Terminate; // PostQuitMessage(0); //Halt;
Exit;
end;

[kaikai_kk]

Application.Terminate是正常退出，就是说要等到Application.Run執行结束后才会退出程序
可以用halt非正常退出,后面的CreateForm就不会执行了

[山东蓝鸟贵薪]

Application.Terminate;

[lyhoo163]

[Quote=引用 4 楼 的回复:]
Application.Terminate;
[/Quote]
完全退出。