SET ESCAPE OFF

>Hello!
>
>I have a question that I was curious how some of you have handled. When a SELECT statement is running and the user presses the escape key what is a good way to handle this.
>
>What I have come up with is:
>
>this in my startup.prg
>on escape main.cmdstop.click()
>
>And this in main.cmdstop.click event
>lnnowwhat=messagebox("Are You Sure You Want To Cancel?"+chr(13) ;
> +" Report Creation Will Terminate",36,"Abort Update?")
>if lnnowwhat = 6
> on shutdown
> on error
> close all
> cancel
>else
> retry
>endif
>
>This works when a select statement is running but I really don't want them to be kicked out of the program, just brought back to the main screen. I know there probably is an easy way to do this but I seem to be brain dead this morning.
>
>AHWBGA!!!
>
>-Kevin