如何防止非法字符的输入呢? 如何防止非法字符的输入呢?还有怎么样控制输入的位数呢?能有人告诉我吗? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 (1)procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);begin if not (Key in['0'..'9',#8]) then Key:=#0;end;(2)maxlength 如何打开bpl文件 我有一个组态软件,想动态的支持OCX控件,不知怎么实现 Delphi如何使扫描(或数码摄像)采集图像不显示而送内存? Runtime error 216 at 02A60B12 怎么解决? 现在的女性真幸福! 如何读出DBGrid中所选中行的各个字段的值?? 怎样给一幅黑白的BMP图像加上伪彩(彩色)? ADOQuery的ExecSQL执行的问题。。。 report builder中的ppSystemVariable控件 关于nvarchar 怎么让一个程序的一个功能在一个时间段自动开启或关闭(50分) hehe
begin
if not (Key in['0'..'9',#8]) then
Key:=#0;
end;
(2)maxlength