capturar errores

[jzginez]

Hola amigos, estoy usando delphi 7, firebird 1.5 y las fibplus
espero poder explicarme bien.

en mi base de datos tengo 2 tablas:
proveedores:
ID integer
Nombre Varchar(30)
etc. etc.

y compras:
ID integer
ID_Proveedor Integer
Monto decimal(15,2)
etc. etc

y las relaciono con:

Código SQL [-]
ALTER TABLE COMPRAS ADD CONSTRAINT FK_COMPRAS01 FOREIGN KEY (ID_PROVEEDOR) REFERENCES PROVEEDORES (ID);

Con lo cual como debe de ser al intentar borrar un proveedor si existe una compra no me lo permite, eso esta bien el problema es que en delphi e intentado caturar el error para que en lugar de que aparesca el mensage de error de firebird/delphi ("DtmDatos.pFDSProveedores.DeleteQuery violation of FOREING KEY constraint "FK_COMPRAS_1" on tabla "compras") aparesca un mensaje de error personalizado, no logro hacer que este desaparesca o mas bien no aparesca en la pantalla y entonces lo que tengo son dos errores el personalisado y el de delphi, alguien me puede ayudar a evitar que el mensage de error de delphi

Gracias