如何自动检测 sql server 服务器连接中断（有高分，不够再加）

[delphinus]

Delphi+ADO+SQL Server写C/S程序，SQL Server数据库在局域网的服务器上，有时候网络状态不是很好的时候，数据库发生连接中断的情况，请教各位大侠，我如何才能在程序中实时检测到数据库的中断异常。