При установке значения свойству были пропущены значения одного или более обязательного индекса.
Установите значения всех обязательных индексов свойства.
Class TestClass: Object
s: Array Of String;
Public Constructor Create(Length: Integer);
Begin
s := New String[Length]
End Constructor Create;
Public Property Item(i: Integer): String
Get
Begin
Return s[i];
End Get
Set
Begin
s[i] := Value;
End Set
End Property Item;
End Class TestClass;
Sub UserProc;
Var
Obj: TestClass;
Begin
Obj := New TestClass.Create(4);
Obj.Item := 1;
End Sub UserProc;
При компиляции указанного кода на строке «Obj.Item := 1;» будет сгенерирована ошибка «Определены не все обязательные индексы при записи свойства Item». Для разрешения ошибки необходимо указать значение обязательного индекса «i».
См. также: