| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

доступ к списку Tlist [D7, WinXP]

Anonim ©   (2010-01-25 15:25:00) 

Доброго времени суток. Опишу вкратце ситуацию:
Написал 3 класса

TClass1 = class
 public
   Name: string;
 end;

TClass2 = class
 public
   Name: string;
   ...
   Class1List: TList;
 end;

TClass3 = class
 public
   Name: string;
   ...
   Class2List: TList;
 end;


Далее делаю примерно так


var
 A: TClass1;
 B: TClass2;
 C: TClass3;
...

A:= TClass1.Create(...);
B:= TClass2.Create(...);
С:= TClass3.Create(...);
...
С.Class3List.Add(B);


а вот дальше у меня проблемы - как добавить в список Class2List экземпляр класса TClass1 (т.е. А)?

---

Германн   (2010-01-26 02:17:00) [1]

> Игорь Шевченко ©   (25.01.10 16:37) [7]
>
> За такой код (и такие решения) надо убивать. Медленно и
> с наслаждением.

+1

---

Игорь Шевченко   (2010-01-25 16:37:00) [2]

За такой код (и такие решения) надо убивать. Медленно и с наслаждением.

Либо надо приводить типы через As либо объявлять свойства, гарантированно возвращающие типизированные объекты.

---

Anonim   (2010-01-25 16:16:00) [3]

благодарю.

тема закрыта

---

Сергей М.   (2010-01-25 16:11:00) [4]

TClass2(c.class2list[i]).class1list.add(A)

---

Anonim   (2010-01-25 16:08:00) [5]

упс ошибся
правильно так
c.class2list[i].class1list.add(A)

---

Сергей М.   (2010-01-25 15:55:00) [6]

> c.class3list[i]

У твоего клсса TClass3 нетсвойства class 3list

---

Anonim   (2010-01-25 15:53:00) [7]

не совсем так, мне надо что-то типа такого
c.class3list[i].class2list.add(A)

---

Сергей М.   (2010-01-25 15:37:00) [8]

C.Class2List.Add(A);

---

Наверх