🚀 go-pugleaf

The problem is that OnActivate of a form isn't called when a form changes is 
Focused status.
I tryed catching WM_ACTIVATE but the form is activated before it receives 
the Escape message so you can't block esc when the form is not focused.
I was thinking to add a timer (which autodisables itself) of 300 ms  that is 
enabled when WM_ACTIVATE is catched and drop the Escape key in OnKeyUp() 
function till the timer is active...
but I dunno if there's a better solution.

If you have a better idea let me know it :)


"Remy Lebeau (TeamB)" <no.spam@no.spam.com> ha scritto nel messaggio 
news:45181312$1@newsgroups.borland.com...
>
> "Russell Allen" <russell.allen@bt.com> wrote in message
> news:4517e850$1@newsgroups.borland.com...
>
>> The problem I'm having - when a piece of code elsewhere pops up
>> a dialog box with a Cancel option, if the user presses "Esc" to cancel
>> the dialog box, not only is the dialog box cancelled, the onkeyup event
>> is being fired off as well!
>
>    void __fastcall TForm1::FormKeyUp(TObject *Sender, char &Key)
>    {
>        if( Key == VK_ESCAPE )
>            Key = 0;
>    }
>
>
>> Can I include a line to stop the Esc key press firing other events
>
> No.
>
>> can I maybe unhook the OnKeyUp event handler before the dialog
>> and rehook it after the dialog box?
>
>    void __fastcall TForm1::Button1Click(TObject *Sender)
>    {
>        this->OnKeyUp = NULL;
>        MessageDlg("Proceed?", mtConfirmation, TMsgDlgButtons() << mbYes <<
> mbCancel, 0);
>        this->OnKeyUp = FormKeyUp;
>    }
>
>
> Gambit
>
>