怎么判断我的一个字符串里是否含有数字?

[joanagle]

比如:'CN009'第三个字符就是数字了,那我怎么判断它?
即是说,这代码该怎么写?
谢谢!

[joanagle]

ORD函数?

[senfore]

function haveNum(s:string):boolean;
var
i:integer;
begin
result:=false;
for i:=1 to length(s) do
if s[i] in ['0'..'9'] then begin
result:=true;
exit;
end;
end;

[cjyaojun]

用ORD()函数，用一个FOR语句判断它是否属于字母

[joanagle]

那如果我用定位的话,应该怎么来写呢?

[纯冰糖]

用循环判断还是可以的

[何鲁青]

那如果我用定位的话,应该怎么来写呢?
--------------------------------
那样就把senfore(来而不往非礼也！) 的答案改写一下就可以了
function haveNum(s:string):integer;
var
i:integer;
begin
result:=false;
for i:=1 to length(s) do
if s[i] in ['0'..'9'] then begin
result:=i; //返回数字所在的位置
exit;
end;
else
result:=-1; //如果没有找到返回-1
end;

[fangming120]

分给我留着，晚上给你写个函数，不是搂主您怎么和我一样懒，自己写个循环判断就可以搞定的！

[luckyboyforever]

我也想知道，顺便看看，：）

[qbl007]

如果你只是想判断字串中是否存在0-9的数字，用senfore的方法就可以了
如果你想得到全部数字，用以下函数：

function HaveNum(s: string): integer;
var
i: integer;
lResult: string;
begin
i := -1;
lResult := '';
for i := 1 to Length(s) do
if s[i] in ['0'..'9'] then
lResult := lResult + s[i];
Result := StrToInt(lResult);
end;

[skertone]

有没哪哥们可以用正则滴？？

[才子鸣]

up

[cdsgajxlp]

up

[w_anghe]

二楼的就很好

[xthmpro_cn]

考虑API函数：
IsCharAlpha和IsCharAlphaNumeric

[senfore]

对呀，用正则取数字最简单了。。。。