delphi - 为什么 Delphi 2009 不允许我在集合中包含 Char？

Question

这是另一个关于将旧代码转换为 D2009 和 Unicode 的问题。我确信这很简单，但我没有看到解决方案......CharacterSet 是 Char 的集合，s[i] 也应该是 Char。但编译器仍然认为AnsiChar和Char之间存在冲突。

代码:

TSetOfChar = Set of Char;

procedure aFunc;
var
  CharacterSet: TSetOfChar;
  s: String;
  j: Integer;
  CaseSensitive: Boolean;
begin
  // Other code that assign a string to s
  // Set CaseSensitive to a value

  CharacterSet := [];
  for j := 1 to Length(s) do
  begin
    Include(CharacterSet, s[j]);  // E2010 Incompatible types: 'AnsiChar' and 'Char'
    if not CaseSensitive then
    begin
      Include(CharacterSet, AnsiUpperCase(s[j])[1]);
      Include(CharacterSet, AnsiLowerCase(s[j])[1])
    end
  end;
end;  

Answer 1

由于 Pascal 集的范围不能高于 0..255，编译器会悄悄地将字符集转换为 AnsiChars 集。这就是给你带来麻烦的原因。