[firebase-br] Tratar mensagem de Constraint no Delphi 7

[Rogerio Monteiro]

Olá colegas.

Estou com o seguinte problema:

Tenho uma Constraint unique UNQ_CLIENTE_1 que trata o campo CODCLI.

CODCLI pode estar em branco.
Quando CODCLI está em branco seu ReadOnly do Field do Dataset deixo como 
False (permitindo a edição). Se não for em branco, ReadOnly vai para True 
(não permitindo que se altere um código já cadastrado).

PROBLEMA: Quando tenho um CODCLI em branco e digito um código que já existe 
na tabela, a Constraint UNQ_CLIENTE_1 levanta a exceção.

DÚVIDA: como capturar no delphi essa exceção do Firebird?

Abraços.

Rogerio Monteiro.