我正在使用Inno Setup并想要检查Pascal脚本,如果字符串变量是一个整数(仅0-9,没有十六进制).我做了这个功能: function IsInt(s: string): boolean;var i, len: Integer;begin len := length(s); if len = 0 then res
function IsInt(s: string): boolean;
var
i, len: Integer;
begin
len := length(s);
if len = 0 then
result := false
else
begin
result := true;
for i := 1 to len do
begin
if not (s[i] in ['0'..'9']) then !!! ERROR HERE !!!
begin
result := false;
exit;
end;
end;
end;
end;
但是编译器引发了一个错误:
Closing square bracket (']') expected.
怎么解决?
如果我将行更改为:
if not (s[i] in ['0','1','2','3','4','5','6','7','8','9']) then
它符合但如果代码被执行则会出现此错误:
Runtime Error - Invalid Type.
该怎么办?
而不是使用集合,您可以只进行简单的范围测试,例如IF (s[i] < '0') OR (s[i] > '9') THEN ...
