dungeon
28-05-2004, 17:52:20
Perdona que te moleste, pero te envio este e-mail para ver si me podrias ayudar a resolver un problema que tengo con una aplicacion que estoy realizando.
el problema es el siguiente:
lo que me interesa hacer es que los mensajes de error que da la aplicacion es cambiarlos a forma humana y que me enseñe el numero de error en question la primera parte la tengo hecho lo que me falla es la segunda, yo lo he hecho asi para verlo i me da errores:
procedure TFrmvehiculodetalles.tratarexcepciones(sender: tobject; e : exception);
begin
if e.ClassNameIs('eibinterbaseerror') then
showmessage(format('iberrorcode: %d - sqlerrorcode: %d',[EIBInterbaseError(e).IBErrorCode,EIBInterbaseError(e).SQLCode])+#13+ 'Mensaje: '+e.Message)
else
ShowMessage(E.Message);
el error que me da es undeclared identifier('eibinterbaseerror').
gracias por todod y disculpa las molestias.
el problema es el siguiente:
lo que me interesa hacer es que los mensajes de error que da la aplicacion es cambiarlos a forma humana y que me enseñe el numero de error en question la primera parte la tengo hecho lo que me falla es la segunda, yo lo he hecho asi para verlo i me da errores:
procedure TFrmvehiculodetalles.tratarexcepciones(sender: tobject; e : exception);
begin
if e.ClassNameIs('eibinterbaseerror') then
showmessage(format('iberrorcode: %d - sqlerrorcode: %d',[EIBInterbaseError(e).IBErrorCode,EIBInterbaseError(e).SQLCode])+#13+ 'Mensaje: '+e.Message)
else
ShowMessage(E.Message);
el error que me da es undeclared identifier('eibinterbaseerror').
gracias por todod y disculpa las molestias.