如何使TEDIT只接收数字字符。 如何使TEDIT只接收数字字符。 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 OnKeyPress Eventprocedure EditKeyPress(Sender: TObject; var Key: Char);begin if not (Key in ['0'..'9']) then Key := #0;end; 如何改变字体显示方向??? 数据统计问题? 我想做一个集合csdn的登录,分分,结贴功能的软件。 DELPHI运行环境 子窗体大小调整问题!如何使鼠标不能在子窗体边框拖动改变子窗体大小? fastreport支持delphi7吗?,哪个版本支持? 一个关于时间转换的问题!希望高手解答! 哪位老兄能给我一个关于查询方面的源程(新手指教) 推荐几本书给初学者吧 请问用delphi6+sqlserver2K,如何将最新插入的记录的ID号,放到一个变量中。 Object Pascal中能定义静态成员变量吗 Delphi联接DBF数据库的问题
begin
if not (Key in ['0'..'9']) then Key := #0;
end;