数据库连接异常问题

try
         AdoTable1.Active:=true;
         except
         begin
           MessageBox(handle,'数据库连接有问题请与管理员联系！','错  误',MB_ok or MB_ICONERROR);
           application.Terminate;
         end;
         end;
数据库关闭时候为什么不执行application.terminate,过了2分钟后才结束进程这个问题怎么解决？？？？？我想让它，立马结束进程。