[firebase-br] Off Topic [Exception+Delphi 2010]

[Renato Alves]

Boa tarde a todos,
Eu sei que a pergunta é totalmente off-topic, mas já procurei a resposta no
google e em várias lista de discussão.
Utilizo DBExpress(SQLConnection+TSQLStoredProcedure) Delphi 2010 com 
Firebird 2.1 e estou
tentando pegar a mensagem de erro de uma Stored Procedure uma 'Exception', 
tratar e mostrar ao usuário.
Parte da Stored:

...........
if (veflagsituacao = 'B' ) then
        begin
            exception cartao_bloqueado;
            exit;
        end
...........

Utilizo a Stored Procedure para inserção, e quando der o erro de exception 
não mostrar uma messagem (Delphi)
confusa para o usuário que ele não irá entender nada.
Aguardo,
Renato