How to use this event

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

EurekaLog includes an "ExceptionErrorNotify" event for interaction with the user program when a raised exception is being handled by EurekaLog and an error occurrs.

The syntax of this event is:

procedure MyErrorNotify(EurekaExceptionRecord: TEurekaExceptionRecord;

                        EurekaAction: TEurekaActionType; var Retry: Boolean);

To use this event you must create a routine with the indicated parameters and assign it to the ExceptionErrorNotify EurekaLog variable, as shown in the following example:

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

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

procedure MyErrorNotify(EurekaExceptionRecord: TEurekaExceptionRecord;

                         EurekaAction: TEurekaActionType; var Retry: Boolean);

begin

   ...

   ...  // Your code...

   ...

end;

begin

   // Assign ExceptionErrorNotify variable to MyErrorNotify procedure...

   ExceptionErrorNotify := MyErrorNotify; 

end.

The user-supplied routine is called if an error occurs during the processing of any of the following actions:

atSavedLogFile         (after) : call made after saving Log File.

atSentEmail            (after) : call made after sending Email.

atSentWebMessage       (after) : call made after sending Web message

If you set "Retry" to True, EurekaLog will retry the last action.

You can use this event to change some EurekaLog settings in accord with the computer configuration.

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