如何适时的检查输入的字符是数字? 在一个文本框输入的时候,我想实现每输入一个字符都能检查是不是数字的功能,请教各位怎样实现。敬请赐教,不胜感激。 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 procedure TMainForm.edtNumberKeyPress(Sender: TObject; var Key: Char);begin {只允许输入0..9,回车,退格键} if not ( Key in ['0'..'9',chr(13),chr(8 {BackSpace})]) then begin Key:=#0; Windows.Beep(880,100); end;end; 谁有兴趣用DELPHI实现一个C++那样的模板类 多个同类控件共用同一过程 类似符号≤6怎么截取数字出来 SQL server中有没有宏? VSS的問題求解決!!!! 百分求解!!!!! 一个关于Createmutex函数的问题 如何遍历文件并加入TreeView? 我是新手!! 作为一名新手应该怎样开始学习dephi 怎么用delphi些vxd程序?哪有这方面的资料?最好是纯delphi的。 有關字符串的問題(在線急等) 用delphi压缩文件流,压缩后的文件怎么不能用其它解压缩工具打开?
begin
{只允许输入0..9,回车,退格键}
if not ( Key in ['0'..'9',chr(13),chr(8 {BackSpace})]) then begin
Key:=#0;
Windows.Beep(880,100);
end;
end;