delphi - Delphi 中不兼容的 char 和 widechar

Question

我有一个奇怪的问题。

我正在使用 Delphi 2007 并使用 -r 开关运行它。在我的电脑上一切正常。当我将代码传输到另一台计算机时出现错误:

Incompatible types char and widechar.

也许我应该更改一些选项。

产生问题的函数:

function THcp.ConVertString(s: string): string;
Var i:integer;
    lstr:string;
begin
     lstr:=EmptyStr;
     for i := 1 to Length(s) do
     begin
           case s[i] of
             'Č': s[i]:='C';
             'č': s[i]:='c';
             'Ć': s[i]:='C';
             'ć': s[i]:='c';
             'Š': s[i]:='S';
             'š': s[i]:='s';
             'Đ': s[i]:='D';
             'đ': s[i]:='d';
             'Ž': s[i]:='Z';
             'ž': s[i]:='z';
           end;
           lstr:=lstr+s[i];
     end;
     Result:=lstr;
end;

Answer 1

这是我的假设。在编译代码的机器上，代码中的非 ASCII 字符对于该机器的语言环境都是有效的 ANSI 字符。但是另一台机器使用不同的语言环境，其中一些字符不包含在代码页的 >= 128 部分中。因此，这些字符被提升为 WideChar，因此当然与 AnsiChar 不兼容。