Delphi - problema con Excepciones

Saludos!!

Tengo una aplicación con un campo memo, a traves de el y cada vez que pulso un boton realio una consulta a un TQuery, bien, cuando introduzco un error en la consulta, me salta una excepcion EDataBaseError, cual sería el codigo para controlarala:

try
--
---
except
on E: EDatabaseError do
ShowMessage('error');
end;

asi me sale un error de que no esta declarada, si la declaro como
EDataBaseError = class(exeption), sique sin controlarala, que hago, por dioss ayuda!!!

Siempre que trabajes desde el IDE el error te va a salir porque Delphi recoge primero el error. Pulsa run de nuevo y verás la emisión de tu mensaje. Cuando corras el programa solo simplemente saldrá tu mensaje.

Saludos.

Muchas Gracias, todo resuelto