Gracias muchachos por la ayuda.
Estuve intentando con el aplicationEvents y capturar el mensaje en el evento onExepcion pero no entra a ese evento. Derrepente estoy mostrando mal el mensaje desde firebird. Muestro un ejm. de codigo de mi procedimiento a ver si me pueden ayudar un pokito mas:
Código SQL
[-]
if (Contador=0) then
begin
exception No_hay_Stock;
end
y en delphi ejecutado el procedimiento asi:
Código Delphi
[-]
ADOQuery_ActLocales.Active:=False;
ADOQuery_ActLocales.Parameters.ParamByName('Accion').Value := Accion;
ADOQuery_ActLocales.Parameters.ParamByName('Item').Value := EdtCodigo.Text);
ADOQuery_ActLocales.Parameters.ParamByName('Cantidad').Value := EdtCantidad.Text;
ADOQuery_ActLocales.ExecSQL;
Espero haber sido lo suficiente claro y me puedan ayudar.
Muchas gracias.
Oscar