OpenEuphoria

Re: beep

• Posted by George Walters <gwalters at sc.rr.com> Oct 02, 2004
• 610 views

In fact if I do nothing but 'returnValue(-1)' in keyDownProcess it 
beeps. I think something is wrong with 59.1....

How I'm using this is... the cursor is setting in an EditText field and 
I want to hit escape to back out, or hit tab to go to the next field, or 
hit the Enter to go to the next field... It works that way, but with the 
annoying beep.


George Walters wrote:

> 
> Well, I guess I don't understand the issue of windows(xp) beeping. I've 
> spend several days trying to remove the annoyance and have failed. The 
> escape, enter, and tab keys beep eventhough I've placed returnValue(-1). 
>  Perhaps I've put in at the wrong place in the code. Interesting is that 
> if instead of using 'keyDown' I use 'keyPress' the beeping stops but 
> then I have the 'q' having the same keyCode as 'F2'problem. Here's a 
> snip of the code
> 
> If anyone has a hint of where to look please clue me in...
> BTW, I'm using win32 59.1
> 
> }}}
<eucode>
> --------------------------------------------------------------------------
> procedure keyDownProcess(integer self, integer processId, sequence arg)
> 
	returnValue(-1)
	return

>     integer keyCode, shift
> 
> 
>     keyCode = arg[1]
>     shift   = arg[2]
> 
>     if find (keyCode, {esc, tab, downArrow, upArrow, cr, f1, f2, f3 
> ,                     f4, f5, f6, f7, f8, f9, f10}) then
> 
>         SpecialKeyProcess(self, processId, {keyCode, shift})
>         returnValue(-1)
> 
>     else
> 
>         NormalKeyProcess(self, processId, {keyCode, shift})
> 
>     end if
> 
> end procedure
> 
> 
> --    setHandler(Screen, w32HKeyPress, routine_id("keyPressProcess"))
>     setHandler(Screen, w32HKeyDown, routine_id("keyDownProcess"))
>
> -------------------------------------------------------------------------------------
>
> 
>     WinMain(Main,Normal)
> </eucode>
{{{

> 
> 
> 
>