Hola Edchar, bienvenido a Club Delphi
Script ejemplo:
Código SQL
[-]
SET TERM ^;
CREATE EXCEPTION EX_NOM_MAX 'Longitud máxima del nombre: 50 caracteres.' ^
CREATE OR ALTER TRIGGER CLIENTE_BIU FOR CLIENTES
ACTIVE BEFORE INSERT OR UPDATE POSITION 0
AS
BEGIN
IF (CHAR_LENGTH(NEW.NOMBRE) > 50) THEN
EXCEPTION EX_NOM_MAX;
END ^
SET TERM ;^
Una imágen resultante de esta excepción desde Delphi:
Como dato adicional, el nombre de la excepción puede tener hasta 31 caracteres y el mensaje hasta 78.
Saludos.