vfp text没有keydown 事件，想阻止一些字符的输入？

[chinawcs]

比如 阻止字母的输入 (大小写) 当输入的时候判断 ascii 符合条件 nkeycode=0
但是 只有keypress 事件

[十豆三]

你参考这个：

怎样让文本框里只能输入0～9几个数据？是在属性里设置吗？设置那个参数？
还是在别的地方处理，谢谢大家帮忙！
---------------------------------------------------------------
1、
在文本框的KeyPress事件中：
Lparameters nKeyCode, nShiftAltCtrl
If nKeyCode=48 And nShiftAltCtrl=2 &&防止按Ctrl+0
Nodefault
Endif


然后
设置文本框的Value属性值,如："0" &&能输入正整数和负整数。
或
设置文本框的Value属性值,如："0.00" &&能输入正数和负数，可有小数位数，小数位数自定。


2、
设置文本框的Inputmask属值,如："99999" &&只能输入正整数。
或
设置文本框的Inputmask属值,如："99999.99" &&只能输入正数，可有小数位数，小数位数自定。
或
设置文本框的Inputmask属值,如："#99999.99" &&能输入正数和负数，可有小数位数，小数位数自定。

[chinawcs]

我的本意是 如果键盘输入 一个字母(符合我的过滤条件) 就相当于 没有输入

键盘按下 时 触发什么事件呢

[十豆三]

KeyPress 事件

[十豆三]

在文本框的KeyPress事件中加如下代码，就不能输入大小写字母了，只允许输入数字，就参考1楼
Lparameters nKeyCode, nShiftAltCtrl
If (Between(nKeyCode,97,122) Or (Between(nKeyCode,65,90) Or (nKeyCode=48 And nShiftAltCtrl=2) &&防止按Ctrl+0
Nodefault
Endif

[chinawcs]

搞定了
原来是
Nodefault

我一开始写的 nkeycode =0
写delphi 代码习惯了