have you tried
application.OnKey "{DELETE}", ""