怎么控制输入文本框里的数据类型(10分)

  • 主题发起人 主题发起人 幸福人生1
  • 开始时间 开始时间

幸福人生1

Unregistered / Unconfirmed
GUEST, unregistred user!
[blue][/blue]我想让输入文本框里的只是整型,应该怎么办?
 
在keypress事件中写:if not (key in ['0'..'9',#13,#8]) then key:=#0;
就是限制输入除0--9的数字和回车、删除就是整形了。
 
仅仅在 OnKeyPress 事件方法中进行控制可能还不够,使用者要是采用“粘贴”写入呢?
 
在onkeydown当中粘贴都会被屏蔽
 
用MaskEdit之类的专用数据录入组件,如果你实在要用Edit,看看下面的例子:
SetWindowLong(Edit1.Handle, GWL_STYLE, GetWindowLong(Edit1.Handle, GWL_STYLE) or ES_NUMBER);
 
在我的程序的弹出菜单里没有设置复制,粘贴,所以可以在keypress方法里写,谢谢大家
 
后退
顶部