В соответствии со спецификацией языка Fore использование директивы default актуально только для индексированных свойств.
Удалите директиву default в описании свойства, либо добавьте в описание свойства хотя бы один параметр.
Class TestClass: Object
i: Integer;
Public Property Value: Integer
Get
Begin
Return i;
End Get
Set
Begin
i := Value;
End Set
End Property Value; Default;
End Class TestClass;
При компиляции указанного кода будет сгенерирована ошибка «Недопустимая директива default для неиндексированного свойства». Для разрешения ошибки необходимо удалить в описание директиву «default», либо добавить в описание свойства «Value» хотя бы один параметр.
См. также: