Capturar mensajes de error de SQL server

[User_baja1]

Hola a todos,
Sabeis como capturar los mensajes de error que devuelve sql server?


Es decir,
tengo desde delphi una Query:

Query.close;
Query.sql.clear;
Query.sql.add('Update tabla set campo=valor where ......');

try
Query.ExecSql
except
---> y aqui es donde me gustaria recoger el error del gestor de base de datos para mostrarselo al usuario con una ventana de error propia.
end;


he visto que si no pongo el try except.. sale el error pero sale mu feo.
¿Sabes como obtener el error producido al ejecutar un Query.execSql ??


Gracias.
David.