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

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

Про TreeView [D7]

<Lelik> ©   (2005-06-21 18:08:00) 

Здраствуйте, программеры!
Вот такой наверно простой вопрос.
Есть список TStrings SList1 с объектами.
Затем создается TreeView TView1, содержащий значение некоторого поля списка SList1 и ссылку на сам объект SList1
Спискок SList1 формируется как
type
PObj = ^Obj
Tobj = class
id : integer;
...
des: string
end;
obj1 : TObj
SList1.AddObject('', obj1)
Формирование TView1:
child := Items.AddChildObject(nil, TObj(Slist.Objects[i]).Des, SList.Objects[i]);
child : TTreeNode;
затем пытаюсь получить доступ
k : integer;
k := PObj(child.Data)^.idОшибка!
Подскажите пожалуйста, что не так.

---

<Lelik>   (2005-06-21 18:21:00) [1]

Спасибо!

---

-=XP=-   (2005-06-21 18:18:00) [2]

Что это такое: PObj = ^ Obj
В Delphi все объектные переменные - суть ссылки.
k := TObj(child.Data).id;

P.S. Давайте переменным, методам и пр. вразумительные имена.

---

Наверх