Delphi XE 中的集合的工作方式与 D7 中的工作方式不同

Question

我在 Delphi 7 程序中有这个常量。它们不在 Delphi XE 下编译。

TYPE
  TSingleChar= AnsiChar;

CONST
  noData: TSingleChar= '.';
  Ambiguity= ['x'];
  DNA_Ambig= ['x', noData]+ Ambiguity;

[DCC 错误] E2026 常量表达式 预计。

1. XE 中发生了什么变化导致我的旧代码无法编译？
2. 我认为代码按原样被解释为 Unicode。我说得对吗？

Answer 1

像这样“修复”它：

TYPE
  TSingleChar= AnsiChar;

CONST
  Const_noData = '.';
  noData: TSingleChar= Const_noData;
  Ambiguity= ['x'];
  DNA_Ambig= ['x', Const_noData]+ Ambiguity;

就编译器而言，Const_noData 是一个真正的 const，允许您使用以下命令初始化 noData 和 DNA_Ambig它。而且您仍然遵循 DRY 原则，即 noData 只有一个定义，即 Const_noData。

Answer 2

const
  Ambiguity:  TAnsiCharSet = ['B', 'D', 'H'];
  Ambiguity2: TAnsiCharSet = ['C', 'c', 't'] + Ambiguity;

不起作用。

const
  Ambiguity = ['B', 'D', 'H'];
  Ambiguity2 = ['C', 'c', 't'] + Ambiguity;

确实有效。类型化常量根本不是真正的常量...

（请注意，这个问题与歧义无关。它是关于什么被认为是常量，什么不是。）