delphi中判断字符串是否为数字

本文整理自网络，侵删。

 
function IsNumber(pcString: PChar): Boolean;
begin
  Result := False;
  while pcString^ <> #0 do // 0 indicates the end of a PChar string
    if not (pcString^ in ['0'..'9']) then
      Exit;
    Inc(pcString);
  end;
  Result := True;
end;
 

相关阅读 >>

Delphi设置屏幕分辨率的函数

Delphi 官方使用并行编程库介绍

Delphi 时间转成大写

Delphi硬盘序列号修改器源码

Delphi debug release区别是什么？

Delphi strtoint 将“字符型”转换成“整数型”

Delphi 运行带参数的程序等待其并获取结果

Delphi中实现密码框“大写锁定打开”的提示

Delphi + word = 数据库 + 公文处理

Delphi 破解access密码

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » delphi中判断字符串是否为数字