PDA

View Full Version : EL and SvCom


Alex Gielv
01-Feb-2006, 06:06 PM
Hello,

My application can work as simple application and as NT service. I have
use SvCom components for service implementation. This component have own
variable
Application : TNtServiceApplication

So, EurekaLog don't hook any exception, all exceptions goes to
Application.OnExceptionHandler. What code I need to write manually to
overload SvCom exception handler by EurekaLog?

Thanks in advance.


--
With best regards,
Alex Gilev,
http://www.xstarter.com

admin
02-Feb-2006, 08:27 AM
Hi,

Alex Gielv wrote:
> Hello,
>
> My application can work as simple application and as NT service. I have
> use SvCom components for service implementation. This component have own
> variable
> Application : TNtServiceApplication
>
> So, EurekaLog don't hook any exception, all exceptions goes to
> Application.OnExceptionHandler. What code I need to write manually to
> overload SvCom exception handler by EurekaLog?

You should use a similar "Application.OnExceptionHandler" event:



uses
ExceptionLog; // Required unit.

procedure Application.OnExceptionHandler(Sender: TObject; E: Exception);
begin
StandardEurekaNotify(E, ExceptAddr); // Call EurekaLog manually!
end;



Can you send to me a little source demo capable to reproduce this
problem, so that I can automatize it in the next EurekaLog versions, please?

>
> Thanks in advance.
>
>
> --
> With best regards,
> Alex Gilev,
> http://www.xstarter.com


--
Best regards...

Fabio Dell'Aria.
----------------
http://www.eurekalog.com
Catch every BUG, every time!

Alex Gielv
02-Feb-2006, 01:30 PM
Hello Fabio,

I am very sorry for boring you. It was my error, I was override
exception handler in the SvCom TApplication one month ago and forgot
about this :(.

Thank you for your help!

admin wrote:
> Hi,
>
> Alex Gielv wrote:
>> Hello,
>>
>> My application can work as simple application and as NT service. I
>> have use SvCom components for service implementation. This component
>> have own variable
>> Application : TNtServiceApplication
>>
>> So, EurekaLog don't hook any exception, all exceptions goes to
>> Application.OnExceptionHandler. What code I need to write manually to
>> overload SvCom exception handler by EurekaLog?
>
> You should use a similar "Application.OnExceptionHandler" event:
>
>
>
> uses
> ExceptionLog; // Required unit.
>
> procedure Application.OnExceptionHandler(Sender: TObject; E: Exception);
> begin
> StandardEurekaNotify(E, ExceptAddr); // Call EurekaLog manually!
> end;
>
>
>
> Can you send to me a little source demo capable to reproduce this
> problem, so that I can automatize it in the next EurekaLog versions,
> please?
>
>>
>> Thanks in advance.
>>
>>
>> --
>> With best regards,
>> Alex Gilev,
>> http://www.xstarter.com
>
>

admin
02-Feb-2006, 03:20 PM
Hi,

Alex Gielv wrote:
> Hello Fabio,
>
> I am very sorry for boring you. It was my error, I was override
> exception handler in the SvCom TApplication one month ago and forgot
> about this :(.
>
> Thank you for your help!
>
> [...]
>

Ok, no problem! :)

--
Best regards...

Fabio Dell'Aria.
----------------
http://www.eurekalog.com
Catch every BUG, every time!

NathanProbst
09-Apr-2006, 12:59 AM
Alex, how did you override the OnExceptionHandler in TNtServiceApplication? I'd like to learn this trick!