Capturar errores y personalizarlos

[@-Soft]

hola

tengo la siguiente necesidad, observando en algunas aplicaciones comerciales que me he descargado en version demo para evaluacion he notado lo siguiente, al momento de producirse algun error, el mensanje esta personalizado de una forma muy instructiva y me gustaria saber como puedo utilizar este tipo de control de errores en mis aplicaciones.

el formato del error es el siguiente :

Error 5080. Se ha producido el siguiente error : Invalid Argument, en la Linea 465. del Archivo Mast_Cli.pas. Llame a su asesor e informe de este error al telefono 271-4096 o envie un correo electronico a juan_perez@hotmail.com

a ver si me hechan una mano con esto ya que como todos saben mientra mas control sobre los errores se tiene mas posibilidad de entregar un producto robusto y confiable al cliente y es lo que yo necesito.

Saludos

P.D. Si es posible, escribirme algun ejemplillo de como se hacen este tipo de control seria mas provechoso y tendriamos que dialogar menos ya que un codigo dice mas que mil palabras.

[Julià T.]

Normalmente los errrores o excepciones se capturan colocando el codigo que puede fallar entre un

  try
    Codigo que puede fallar
  except
    Acciones correctoras si fueran  necesarias
    mensaje de error
  end;

[@-Soft]

hola


ok, este codigo esta bien try...except o try...finally pero como lo personalizo, es decir como puede tomar el valor del la ecepcion (Numero de error, linea en la sucede el error, mensaje de error, nombre del archivo que produce el error) es esto lo que quiero saber.


el formato que quiero es:

Error : 5010 en la Linea 150, Type Mismatch in the expression. En el Programa - Invent.pas.

gracias de antemano y Saludos

[roman]

El tipo de información que buscas (número de línea, archivo, etc.) no se presenta en el objeto exception, salvo el código de error y esto sólo en algunos tipos de excepciones. En algunos casos lo más que obtienes es el mensaje en sí.

Para información más detallada tienes que recurrir a otras técnicas como las que puedes ver en este artículo.

En cuanto a lo de escribirte el código...

// Saludos

[kinobi]

Empezado por @-Soft

y tendriamos que dialogar menos ya que un codigo dice mas que mil palabras.

  procedure Respuesta;
  begin
    writeln('¿Tú crees?');
    writeln('No estoy de acuerdo');
    write('Adivina que hace este código C:');
    writeln(' (Sacado del concurso de C ofuscado:http://www.es.ioccc.org/years.html)');
  end;

int _,O,__??('}'??);main(){while(O?gets((rand()%O++?':':_)+__)||
  puts(&__??(_??))&_:srand(time((O+++_)))||O);}

  procedure Despedida;
  begin
    writeln('Saludos');
  end;

[@-Soft]

hola

estoy de acuerdo en un 80% contigo Kinobi, pero el texto esta incompleto me falto la palabra "Aveces".

Saludos