限制TEdit的输入类型? 在keypress中if not (key in ['0'..'9',#13] then key=#0 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 用TMaskEdit 在keypress中case ord(key) of ord('0')..ord('9'):; ord('.'):; ord('-'):; 8:; else key:=chr(0); end; 气死我了,下载了怎么多图标都用不了?有办法吗? 不难但是100分!如何判断一个程序是否启用了托盘功能? 窗体参数传递 如何获得一个进程他所站的内存空间 用SENDMESSAGE一窗口向另一窗口发送记录数据 如何在DELPHI开发的程序中使用MS SQL SERVER 带的客户端网络实用工具访问后台数据库?(SYBASE或其他的数据库) 常见的简单C/S问题,100分附送 如何区分我的隐射盘是本机的,还是网络上的?是网络上的那一台机器的? 有关报表? 怎样获得文件的大小? 如何实现模糊查找? 我是菜鸟,帮忙给介绍几本好书。
用TMaskEdit
case ord(key) of
ord('0')..ord('9'):;
ord('.'):;
ord('-'):;
8:;
else
key:=chr(0);
end;