Delphi RAD Studio class 完成问题

Delphi RAD Studio class completion issue

如果我有以下 class 结构,我无法使用 Embarcadero RAD Studio XE6 调用 class 完成(通过 Ctrl + Shift + C)。程序工作正常,但 IDE 导致以下错误。如果要用,必须要评论DescriptionArray,有点烦人

所以我想知道,如果有人知道,问题出在哪里,或者我做错了什么。

GT_Class = class
type
  TCustomEnum = (ceValue1, ceValue2, ceValue3, ceValue4);
  TCustomSet = set of TCustomEnum;

const
  DescriptionArray : array[TCustomEnum] of string = ('Description1', 'Description2', 'Description3', 'Description4');
end;

错误信息

Stefan Glienke in 解决。实际上这是 Delphi XE6 中的一个错误,在其他版本中它已被解决。您需要定义可见性,public 在本例中,即使不需要它。

GT_Class = class
public
  type
    TCustomEnum = (ceValue1, ceValue2, ceValue3, ceValue4);
    TCustomSet = set of TCustomEnum;

  const
    DescriptionArray : array[TCustomEnum] of string = ('Description1', 'Description2', 'Description3', 'Description4');
end;