FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
|||
|
|||
Capturar Mensajes de error
Hola!
Estoy haciendo una aplicación en Delphi. Tengo varias clases que son usadas por la apliación principal. Estas clases generan errores, como por ejemplo: Como puedo capturar este mensaje de error y mostrarselo al usuario desde la apliación principal. Este sería el código de un botón de la aplicación principal por ejemplo Gracias Saludos Última edición por dec fecha: 27-10-2005 a las 00:46:45. Razón: ¡¡Encerrad el código fuente entre las etiquetas [DELPHI] ... [/DELPHI]!! |
#2
|
||||
|
||||
Pues no hagas nada. A no ser que quieras dar un tratamiento especial a la excepción, ésta saltará solita sin necesidad del try-except.
// Saludos |
#3
|
|||
|
|||
necesito controlar el error en el programa principal. Si este hace una llamada a una función de un objeto que tiene su propia clase y durante el proceso se ejecuta un error, automáticamente se cancela el resto de insturcciones de la función, muestra el mensaje de error y continua el programa principal. A mi no me interesa que continúe el programa principal. Una de las razones es realizar un rollback en la base de datos. Por este motivo me veo obligado a controlar los mensajes de error en el programa principal. Pero si pongo un try /except no visualizo el mensaje de error a no ser que pueda capturarlo. Esta es mi pregunta
como capturar el mensaje. Saludos |
#4
|
||||
|
||||
hola
hola!
si lo he entendido bien podrias hacer lo siguiente: Código:
procedure TForm1.Button1Click(Sender: TObject); begin try {instrucciones del programa} except //Aquí me gustaría mostrar el mensaje de error generado por otra clase On E: Exception do begin //Aquí tratarias el error si es necesario ShowMessage(E.Message); //muestras tu error end; end; end; |
#5
|
||||
|
||||
__________________
Si usted entendió mi comentario, contácteme y gustosamente, se lo volveré a explicar hasta que no lo entienda, Gracias. |
#6
|
|||
|
|||
ok, ha sido de ayuda. Es lo que buscaba.
Saludos |
|
|
|