Unfroze application

[Santiago Castaño]

Hi,

In my current proyect, i have to sign files securely, and can't call
application.processmessages during the sign process, with large files,
the application seems frozen (and eurekalog does raise this exception).
I want to catch that excepction, and do the processmessages routine, but
it doesn't seem to work.

How can i do it? can i use postmessage or anything (i have just looked
the post of closing an application and i think i'm in a similar problem).

Here's my code...

procedure TFPrincipal.EurekaLogExceptionNotify(
EurekaExceptionRecord: TEurekaExceptionRecord; var Handled: Boolean);
begin
if EurekaExceptionRecord.ExceptionObject is Exception then
begin
if
lowercase(Exception(EurekaExceptionRecord.Exceptio nObject).ClassName)=lowercase('EFrozenApplication' )
then
begin
application.ProcessMessages;sleep(1);
handled:=False;
end;
end;
end;

[tms]

Hello!
User "Santiago Castaño" <santiago.chestnut@larraby.com> wrote...
> Hi,
>
> In my current proyect, i have to sign files securely, and can't call
> application.processmessages during the sign process, with large files, the
> application seems frozen (and eurekalog does raise this exception). I want
> to catch that excepction, and do the processmessages routine, but it
> doesn't seem to work.
>
[..]

Did you try to avoid EFrozenApplication?


if IsEurekaLogActive then
CurrentEurekaLogOptions.FreezeActivate := false;

//do some long term operations

if IsEurekaLogActive then
CurrentEurekaLogOptions.FreezeActivate := true;


--
tomski

[Santiago Castaño]

The idea is to get an advantage with the freeze detection, and be able
when it raises the exception to call processmessages or any other code
to process de message queue of windows.

Thanks

tms escribió:
> Hello!
> User "Santiago Castaño" <santiago.chestnut@larraby.com> wrote...
>> Hi,
>>
>> In my current proyect, i have to sign files securely, and can't call
>> application.processmessages during the sign process, with large files, the
>> application seems frozen (and eurekalog does raise this exception). I want
>> to catch that excepction, and do the processmessages routine, but it
>> doesn't seem to work.
>>
> [..]
>
> Did you try to avoid EFrozenApplication?
>
>
> if IsEurekaLogActive then
> CurrentEurekaLogOptions.FreezeActivate := false;
>
> //do some long term operations
>
> if IsEurekaLogActive then
> CurrentEurekaLogOptions.FreezeActivate := true;
>
>
> --
> tomski
>
>

[admin]

Hi,

Santiago Castaño wrote:
> The idea is to get an advantage with the freeze detection, and be able
> when it raises the exception to call processmessages or any other code
> to process de message queue of windows.
>
> Thanks
>
> [...]

I'm sorry but it's really impossible, because if the application is
frozen did not process its messages!

--
Best regards...

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

[Santiago Castaño]

No problem, i use now threads to do the hard work that did the freezing.
Thanks anyway

admin escribió:
> Hi,
>
> Santiago Castaño wrote:
>> The idea is to get an advantage with the freeze detection, and be able
>> when it raises the exception to call processmessages or any other code
>> to process de message queue of windows.
>>
>> Thanks
>>
>> [...]
>
> I'm sorry but it's really impossible, because if the application is
> frozen did not process its messages!
>