How To Handle Lost Connection?

Is there any recommended way in which to handle a lost connection to a
SQL2000 database via ADO?
I would like to be able to handle this scenario so as to shutdown my app
gracefully. At the moment an error message is raised
but my app  stops responding and has to be closed with the Task Manager.



(Delphi 5)