Скачать: CL | DM;

ООП   Найти похожие ветки 

← →
Scot Storch   (2010-08-17 13:10) [0]

в отдельном Unit"e находится класс TNode. В основном Unit"e создаю объект этого класса. При попытке назначить значение полю Name записи типа Tnode_info (upd_pack.FInfo.upd.Info.Name := "zzz";) ругается "Left side  cannot be assigned to". Как разрешить назначение этому полю?

 { Tnode_info }

 Tnode_info = record
   Name: string;
   Attrs: TAttrs;
 end;

 { TNode }

 TNode = class(TObject)
 private
   { ... }
   FInfo: Tnode_info;
   { ... }
 public
   constructor Create;
   destructor Destroy; override;
   { ... }
 {  }
   { ... }
   property Info: Tnode_info read FInfo write FInfo;
   { ... }
 end;

---

← →
Ega23 ©   (2010-08-17 13:16) [1]


TNode = class(TObject)
public
  property Info: Tnode_info;
end;

Зачем тебе отдельное property для рекорда, если у тебя ни геттеров ни сеттеров?

---

← →
12 ©   (2010-08-17 13:17) [2]

> upd_pack.FInfo.Info.Name := "zzz";

что такое это, по словам

(например,
upd_pack - модуль
FInfo - объект

)


> TAttrs;

это что?

---

← →
12 ©   (2010-08-17 13:18) [3]

> upd_pack.FInfo.upd.Info.Name := "zzz";
это, по словам, что такое& каждое слово
Info.Name - понятно, до этого нет

> TAttrs;
это что?

---

← →
Ega23 ©   (2010-08-17 13:32) [4]

Осечка.
TNode = class(TObject)
public
 Info: Tnode_info;
end;

property было лишнее.

---

← →
Scot Storch   (2010-08-17 13:35) [5]

> Ega23


все ясно, спс

---

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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.005 c