IsEurekaLogModule function

EurekaLog includes a function called IsEurekaLogModule, that enables you to check if a module has been compiled with the EurekaLog support.

Syntax of this function is as follows:

function IsEurekaLogModule(HModule: THandle): Boolean;

Example:

uses ExceptionLog; // The required unit...

procedure LoadLib;

var

   Lib: THandle;

   Res: Boolean;

begin

   Lib := LoadLibrary('C:\Library.dll');

   if (Lib <> 0) then

   try

     Res := IsEurekaLogModule(Lib);

     if (Res) then

       MessageBox(0, 'The "Lybrary.dll" module has been compiled WITH the EurekaLog support.',

        'Information', MB_OK or MB_ICONINFORMATION)

     else

       MessageBox(0, 'The "Lybrary.dll" module has been compiled WITHOUT the EurekaLog support.',

       'Information', MB_OK or MB_ICONINFORMATION)

   finally

     FreeLibrary(Lib);

   end;

end;