madExcept ist kostenlos für nicht kommerzielle Nutzung.
Ich weiß, das ist aber kein Hobby-Projekt
Die JCL hat auch ein Demo dabei wo er auch genau kann, was Eurekalog da macht. Der Code ist aber für mein Gehirn zu verworren um ihn überhaupt extrahieren zu können. Deshalb nehme ich, wenn
meineException.StackTrace
leer ist (also der Automatismus nicht gegriffen hat), einfach den normalen Stacktrace (in einem ominösen "raw mode"). Das sieht dann ungefähr so aus:
Code:
Sender: TForm2
Exception: EProgrammerNotFound: 'The programmer has gone home'
[006107D9] Debug.StackTracer.TStacktracerJCL.getStack (Line 80, "Debug.StackTracer.pas")
[00610E4E] NewExceptionHandlingProject.TExceptionHandler.ObtainStackTrace (Line 145, "NewExceptionHandlingProject.dpr")
[00610C6C] NewExceptionHandlingProject.TExceptionHandler.HandleException (Line 121, "NewExceptionHandlingProject.dpr")
[005DB672]
Vcl.Forms.TApplication.HandleException
[0052DDDF]
Vcl.Controls.TWinControl.MainWndProc
[004084B3] System.TMonitor.Exit
[0052DDA4]
Vcl.Controls.TWinControl.MainWndProc
[006104C0] Unit2.TForm2.Button2Click (Line 116, "Unit2.pas")
(ca 50 weitere Zeilen)
Ich glaube für meine Zwecke soll das reichen