How to use this event

Caution: this is old EurekaLog 6 documentation. This is not the latest version.

EurekaLog includes an "ExceptionNotify" event for interaction with the user program when an exception is raised. The user-defined routine is called when EurekaLog traps an exception.

The syntax of this event is :

procedure MyNotify(ExcRecord: TEurekaExceptionRecord; var Handled: Boolean);

To use this event, you must declare a procedure with those parameters and assign it to the ExceptionNotify EurekaLog variable, as shown in the following example:

uses ExceptionLog, ECore, ETypes; // The required units...

// This is a normal procedure (not a method)...

procedure MyNotify(ExcRecord: TEurekaExceptionRecord; var Handled: Boolean);

begin

   ...

   ...  // Your code...

   ...

end;

begin

   ExceptionNotify := MyNotify; // Assign ExceptionNotify variable to MyNotify procedure.

end.

If you set the "Handled" parameter to False in your routine before returning, the exception will be reported by the standard Borland Exception Manager. If you set "Handled" to True (the default value) the exception will be handled by EurekaLog.

Note: to simplify management of your EurekaLog events, you can use the TEurekaLog.OnExceptionNotify event.