本文整理自网络,侵删。
function IsDigit(ch: char): boolean;begin Result := ch in ['0'..'9'];end;
相关阅读 >>
Delphi - 如何执行windows、osx、linux的外部程序?
Delphi xe mysql数据库操作类 mysqlhelper
Delphi firemonkey限制tedit只能输入数字的完美方法
Delphi webbrowser的关于流载入流保存和流生成
Delphi webbrowser通过遍历id查找元素是否存在
Delphi中使用xmlhttp / xmlhttprequest 避免缓存
更多相关阅读请进入《Delphi》频道 >>