freepascal
/
utils
1
0
Fork 0
Code Issues 0 Pull Requests 0 Releases 0 Wiki Activity
Browse Source

utlLogger: include ThreadID in exception log

master
Martok 11 years ago
parent
2777fdbea3
commit
90fd82bdb0
1 changed files with 1 additions and 0 deletions
Unified View
Diff Options
Show Stats Download Patch File Download Diff File
  1. +1
    -0
      uutlLogger.pas

+ 1
- 0
uutlLogger.pas View File

@@ -151,6 +151,7 @@ begin
result := result + sLineBreak + result := result + sLineBreak +
' Exception: ' + aException.ClassName + sLineBreak + ' Exception: ' + aException.ClassName + sLineBreak +
' Message: ' + aException.Message + sLineBreak + ' Message: ' + aException.Message + sLineBreak +
' Thread: ' + IntToStr(GetCurrentThreadId) + sLineBreak +
' StackTrace:' + sLineBreak + ' StackTrace:' + sLineBreak +
' ' + BackTraceStrFunc(ExceptAddr) ' ' + BackTraceStrFunc(ExceptAddr)
else else


Write Preview
Loading…
Cancel
Save