Solution: add or remove information "xxx" to the b

delphi package - automated exception handling
Post Reply
Alex
Posts: 3
Joined: Fri Jul 27, 2007 12:24 pm

Solution: add or remove information "xxx" to the b

Post by Alex »

How to add or remove information "xxx" to the bug report:

Add the following lines to the end of a used unit:

Code: Select all

{$IFDEF madExcept}
procedure LayoutExceptHandler(const exceptIntf : IMEException; var handled : boolean);
begin
  exceptIntf.BugReportHeader.Insert(0,'Current caption', Form1.caption );  //add custom information to the bug report
  exceptIntf.BugReportHeader['user name'] := '';          // save privacy
  exceptIntf.BugReportHeader['registered owner'] := '';   // save privacy
  exceptIntf.BugReportHeader['computer name'] := '';      // save privacy
end;
initialization
  RegisterExceptionHandler(LayoutExceptHandler, stDontSync);
{$ENDIF}
end.
See also http://www.elevatesoft.com/scripts/news ... 703&page=7

I hope this helps,
Alex
Post Reply