相当简单的问题

doctorzw 2002-11-08 01:45:42
怎样控制DBEdit中只能输入数字而不能输入其他非法字符串?
...全文
30 6 打赏 收藏 转发到动态 举报
写回复
用AI写文章
6 条回复
切换为时间正序
请发表友善的回复…
发表回复
myy 2002-11-08
  • 打赏
  • 举报
回复
别把 #8 也屏蔽了(BackSpace)!
hzpengyou 2002-11-08
  • 打赏
  • 举报
回复
1.可以使用EditMask限制输入
2.在OnKeyPress事件中输入
if not (key in['0'..'9',#13,#8]) then
Key=#0;
blueshu 2002-11-08
  • 打赏
  • 举报
回复
在keypress中写最好了
blueshu 2002-11-08
  • 打赏
  • 举报
回复
在Tedit的Onexit()的事件中写入:
if not key in [0..9] then key:=#0
qtercel 2002-11-08
  • 打赏
  • 举报
回复
在onKeyPress事件加入
if not ( key in ['0'..'9',#8]) then
abort;
daniel007 2002-11-08
  • 打赏
  • 举报
回复
onKeyPress里控制,如果不符合要求,将Key:=0即可

2,507

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 数据库相关
社区管理员
  • 数据库相关社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧