数据库连接异常问题

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

因为AdoTable1还在查找和连接计算机``~这是需要时间的`~大概也就是2分钟左右

这个时间可以减少呢。。好像要改动注册表来减少？