Prevent vertical scrolling via the mouse wheel or keyboardTag(s): Datawindow
For the wheel, declare an user event, ue_noscroll, mapped to pbm_vscroll.
[ue_noscroll] // prevent vertical scrolling return 1
[ue_dwnkey]
CHOOSE CASE key
CASE KeyEnter!,KeyPageUp!,KeyPageDown!,KeyUpArrow!,KeyDownArrow!
This.AcceptText()
RETURN 1
END CHOOSE
RETURN 0
mail_outline
Send comment, question or suggestion to howto@rgagnon.com
Send comment, question or suggestion to howto@rgagnon.com