如何使TEDIT只接收数字字符。 如何使TEDIT只接收数字字符。 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 OnKeyPress Eventprocedure EditKeyPress(Sender: TObject; var Key: Char);begin if not (Key in ['0'..'9']) then Key := #0;end; DELPHI中如何实现类似C中的宏或者模板功能,欢迎讨论,分不够再加 SQLSERVER 中如何做 复制和日记传送?谢谢 文件的拖放打开问题 面向对象数据库编程 多线程出现异常的时候释放的问题 简单问题-急等 DELPHI 6 的Update pack1/2 在哪里有下载的啊? RMB求购图片相似 函数接口,需要delphi源代码 怎么样调用驱动程序。(vod) 我想调出一个窗口来选择一下目录,用savedialog的话又太多了一些,我只需要得到一个保存目录的路径就够了//瑶瑶 Object Pascal中能定义静态成员变量吗 Delphi联接DBF数据库的问题
begin
if not (Key in ['0'..'9']) then Key := #0;
end;