Tom*_*500 5 inno-setup pascalscript
我正在使用 Inno Setup,并想使用 Pascal Script 检查字符串变量是否为整数(仅限 0-9,无十六进制)。我做了这个功能:
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;
Run Code Online (Sandbox Code Playgroud)
但编译器会抛出一个错误:
Closing square bracket (']') expected.
Run Code Online (Sandbox Code Playgroud)
如何修复它?
如果我将行更改为:
if not (s[i] in ['0','1','2','3','4','5','6','7','8','9']) then
Run Code Online (Sandbox Code Playgroud)
它符合要求,但如果执行代码,则会出现以下错误:
Runtime Error - Invalid Type.
Run Code Online (Sandbox Code Playgroud)
该怎么办?
您可以只进行简单的范围测试,而不是使用集合,例如
IF (s[i] < '0') OR (s[i] > '9') THEN
...
Run Code Online (Sandbox Code Playgroud)
| 归档时间: |
|
| 查看次数: |
3346 次 |
| 最近记录: |