启动的问题(30分)

我的工程文件
begin
Application.Initialize;
try
Application.CreateForm(TDM, DM);//里面放有连接控件若干个
except
Application.Terminate;
end;
Form_login:= TForm_login.Create(Application);
if Form_login.ShowModal<>mrOK then
begin
Form_login.Close;
Form_login.Release;
Application.Terminate;
我目的是如果数据库路径被改动，程序就结束，可是我改变了数据库路径后，出现一个错误提示，Form_login还是弹了出来，Application.Terminate 好象没有起到作用，怎么回事？

Application主窗体还没有建立，此时使用这个是不能退出的。

try
Application.CreateForm(TDM, DM);//里面放有连接控件若干个
except
Application.run;//在这里加这句看看
Application.Terminate;
end;

不行啊，还有什么办法？

用halt代替Application.Terminate看看
在每个Application.Terminate;前加上Application.run;