Hola amigos, retomando el tema...
resulta que tengo una db firebird 2.5.4, en la que declaro unas excepciones; una de ellas es
'no_borrar'
Código Delphi
[-]with qEjecutar do
begin
Close;
SQL.Clear;
SQL.Add(CadenaSQL);
try
ExecSQL;
Result := True;
Transaccion.CommitRetaining;
if notificado then
MsgBox(Titulo, 'Registro actualizado satisfactoriamente...',
mtInformation, ['Aceptar'], 0);
except
on E: exception do
MsgBox(Titulo, 'Clase de error: ' + E.ClassName + chr(13) + chr(13) +
'Mensaje del error: ' + E.Message, mtError, ['Aceptar'], 0);
end;
end;
en el código no sé cómo capturar la excepción de tal manera que sólo me aparezca el texto de la excepción sin que me diga el resto de cosas, ej.
nombre de la excepción, trigger en el cual se ha lanzado, ubicación de la línea de código...
yo sólo quiero la descripción del error
"No puedes eliminar el registro porque..."
De antemano gracias por vuestra ayuda
Gustavo Cruz