Проблема с завершением класса Delphi RAD Studio

Question

Я не могу вызвать завершение класса (с помощью Ctrl + Shift + C) с помощью Embarcadero RAD Studio XE6, если у меня есть следующая структура классов. Программа работает нормально, но среда 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; 

Сообщение об ошибке

Answer 1

решаемые Stefan Glienke в comment. На самом деле это ошибка в Delphi XE6, а в других версиях она решена. Вам необходимо определить видимость, даже если она установлена ​​по умолчанию.

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;