BEEP suite a Entrée dans un EDIT

Bonsoir,

J'ai adopter la tactique du Enter pour valider un texte dans un EDIT et donc lorsque j'appuie sur enter j'ai le vieux BEEP qui se fait entendre....(comme lorsque l'on appuie sur escape)

Code:

rem declare a label
label enter_key
rem an EDIT is created
edit 1:set_focus 1
rem every time a key is released in EDIT, execute from label "enter_key"
on_key_up 1,enter_key
end: rem main program is finished
enter_key:
rem treatment of event
if key_up_code=13 then caption 0,"ENTER is released"
return

Y'a t'il un quelconque moyen de contourner ou de faire taire ce BEEP?

ceci (Le BEEP) avait été brièvement aborder lors de la sortie de la 0.9.13 =>BEEP


Merci d'avance
bonne soirée