Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.11.13;
Скачать: CL | DM;

Вниз

Проблема с массивом   Найти похожие ветки 

 
nikolas   (2005-10-19 17:43) [0]

Добрый день!

Есть тип TMyArray = array[0..n] of TObject;
объявляю в классе поле:
type
 TMyClass = class
 private
   FMyArray: TMyArray;
 public
   property MyArray: TMyArray read FMyArray;
 end;

когда пытаюсь обратится к элементу
MyArray[0]:=TObject.Create... получаю ошибку "left side cannot be assigned to".
Что здесь неправильно?


 
MetalFan ©   (2005-10-19 17:45) [1]

ну ясен пень! у тебя ж пропертя readonly!!
...write FMyArray еще нуна


 
MetalFan ©   (2005-10-19 17:45) [2]

упс... гоню...


 
MetalFan ©   (2005-10-19 17:47) [3]

а попробуй не TObject.Create, а TMyClass.create написать...
TObject это ж вроде абстрактный класс... или я опять гоню? )


 
begin...end ©   (2005-10-19 17:53) [4]

> nikolas   (19.10.05 17:43)

Тип свойства MyArray -- TMyArray. Это массив. Значит, этому свойству можно присвоить значение только целого массива типа TMyArray. И только в том случае, если оно не read-only.

Выход -- например, сделать индексированное свойство (понадобится ещё написать методы для чтения и записи поля).

Хотя, в принципе, есть способ сделать почти так, как делаете Вы. Но так лучше не делать.


 
umbra ©   (2005-10-19 17:55) [5]

1) Вы объявили свойство, доступное только для чтения. Чтобы иметь возможность что либо ему присвоить оно должнобыть объявлено как доступное для чтения и записи. А чтобы получить доступ к элементам массива, это должно быть свойство-массив.  В общем, объявлять надо так:


property MyObj[index: Integer]: TObject read GetElement write SetElement;


А затем в процедурах GetElement и SetElement что-то делать с FMyArray



Страницы: 1 вся ветка

Текущий архив: 2005.11.13;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.049 c
2-1129571918
Pasha L
2005-10-17 21:58
2005.11.13
_filetime в searchrec


4-1126628734
begin...end
2005-09-13 20:25
2005.11.13
Значения описателей объектов ядра


14-1129729150
lightix
2005-10-19 17:39
2005.11.13
QuickReport у не нравится лазерный принтер samsung


14-1129810870
wHammer
2005-10-20 16:21
2005.11.13
Как перевести исходники с версии 6 на версию 5


8-1118224081
Gydvin
2005-06-08 13:48
2005.11.13
изменить wmf в делфи