Debugear en tiempo de ejecucion ?

lento manu · #12 10-10-2005

Que corcholis, estoy intentando obtener resultados como los que menciona Lepe, pero no consigo ver esta tipo de info:

Cita:

Empezado por Lepe

Código:

Exception 
UnitName : DBTables
Procedure : TBDEDataSet.OpenCursor
Line : 4111 OffsetLine : 0
Deep of Except frame-dump : 7
UnitName : DBTables Procedure : TBDEDataSet.OpenCursor SourceName : DBTables.pas Line : 4112

La piedra filosofal es obtener el pas y la línea de código que produce el error, pero he implementado el pas que edita Lepe tam amablemente, lpJclDebug.pas, y obtengo el fichero map, una vez compilado el programa. Pero nada más.
¿Pero como puedo recoger los errores de ejecución?
¿Podrías ponernos un ejemplo Lepe, de cómo utilizarlo?, ¿cómo llamar a la funciónLogException(ExceptObj: TObject; ExceptAddr: Pointer; IsOS: Boolean):string y recoger el string en el map o en un .log con el TJvLogFile?
Gracias, profe... y perdona mi torpeza.