如何解决Delphi 10 中的“下限超过上限”错误
目前我正在将应用程序从 Delphi 5 迁移到 Delphi 10。下面的 switch case 在 Delphi 5 中工作正常,但给出了
"Low Bound Exceeds High Bound"
编译期间 Delphi 10 中的错误。如果我将值从 #128 更改为 #127,则一切正常。我不知道为什么使用 #128 会出错,而使用 #127 可以正常工作。
var Src : PChar;
...
case Src^ of
#128..#255 :
begin
end;
end;
解决方法
我不知道为什么您显示的代码不起作用。我怕是bug! 无论如何,要编译它,你可以这样写:
var Src : PChar;
...
case Src^ of
#128,#129..#255 :
begin
end;
end;
这将产生相同的效果。 你也可以写:
case Ord(Src^) of
128..255 :
begin
end;
end;
但是如果您有许多其他情况下具有常量字符的情况,则第二个变体很烦人。您必须通过添加和 Ord() 来修改每一个。
您还应该看看 {$HIGHCHARUNICODE} 指令的效果。
顺便说一句:这种代码 - 也许 - 你忘记了 Delphi 5 字符是 8 位 ANSI 的标志,而对于 Delphi 2009 及更高版本,字符是 16 位。
版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 dio@foxmail.com 举报,一经查实,本站将立刻删除。