本文整理自网络,侵删。 if not (key in ['0'..'9',#8]) then key := #0; 相关阅读 >> Delphi 根据经纬度计算地球上两点之间的距离 Delphi判断字符串是否是汉字 Delphi winsock远程唤醒计算机的函数 Delphi 判断字符串是否为纯字母组合 indy10下的tidhttp控件获取源码乱码的解决方法 Delphi xe8安卓下汉字转gb2312 Delphi 几个实用的html解析函数 Delphi 用dbexpress处理jpg图片 Delphi xe2创建apple ios程序 Delphi 两个非常有用的进程函数 更多相关阅读请进入《Delphi》频道 >> 转载请注明出处:木庄网络博客 » Delphi edit只允许输入数字