delphi 判断字符串是否为纯数字组合

本文整理自网络，侵删。

 

function IsNUM(Vaule:String):boolean; //delphi 判断字符串是否为纯数字组合
var
i:integer;
begin
Vaule:=trim(Vaule); //去空格知
for i:=1 to length(Vaule) do //准备循环
begin
if ( Vaule[i] in ['0'..'9'])  then //如果Vaule的第i个字不道是A-Z或者a-z中的任一个回
begin
result:=true; //返回值 不是
end
else
begin
result:=false; //设置返度回值为 是
exit;
end;
end;
end;
 

相关阅读 >>

Delphi winapi: setvolumelabel - 设置磁盘卷标

Delphi将图片转换成文本支持转换回去

Delphi idhttp用法详解

Delphi 全局钩子锁定鼠标

webbrowser部分用法

Delphiwindows 下编译 exe 文件时把一个外部 txt 文件编译到 exe 里面

Delphi idhttp上传图给asp完美解决

Delphi edit右键系统菜单加自定义菜单项

Delphi xe更改ttrayicon系统任务栏图标（无模糊）

Delphi 一行关键代码阻止360云查杀

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

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