请问有没有办法控制Edit框只能输入1-12这12个数字呢?

主题：请问有没有办法控制Edit框只能输入1-12这12个数字呢?

channelxp [专家分：20] 发布于 2007-08-02 10:33:00

本人想通过一个控件输入月份,所以想用Edit框来控制,或者高手们有没有什么其他控件或方法实现,没有限制,能实现效果就可以了

沙发

zwt [专家分：1230] 发布于 2007-08-02 10:42:00

用Edit控件可以，但必须在程序中进行控制，不实用；所以可以用delphi的第三方插件FlatStyle的FlatInteger控件，设置它的最小值是1，最大值是12就可以了。

板凳

lishan200012 [专家分：200] 发布于 2007-08-03 09:32:00

if not (key in ['0'..'9',#8,#13,#46]) then
  begin
    key:=#0;
    beep;
  end;

3 楼

punkrocker [专家分：720] 发布于 2007-08-03 22:06:00

2楼的方法貌似是限制输入数字和小数点??

在程序里用edit的话比较麻烦,刚才写了下,可能各种情况还没考虑全,已经40行了

建议直接用combobox选

您尚未登录，请登录后再回复。点此登录或注册