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

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

Как можно в Data засунуть мою структуру?

Fenix ©   (2006-03-17 17:26:00) 

Доброго времени суток.
Мне надо в Data TTreeNode засунуть структуру (доп информацию.)
Но она типа Point. Как мне правильно связать?

---

Fenix   (2006-03-17 20:57:00) [1]

Да не я уже разобрался... я сделал массив из структуры глобальный, а в Tag храню только индекс к какому элементу массива структур относиться TreeNode.

---

Гаврила   (2006-03-17 20:30:00) [2]

И не забыть в конце выполнить
Dispose(MyStruct)
иначе получится утечка памяти

---

Stakan   (2006-03-17 17:41:00) [3]

PMyStruct = ^TMyStruct;
TMyStruct = record
...
end;

...
var
 MyStruct: PMyStruct;
begin
 New(MyStruct);
 MyStruct^. ... := ...
   ...
 TreeView1.Items.AddObject(nil, 'Item' + IntToStr(TreeViewIndex), MyStruct);
end;

Извлечь
... := PMyStruct(TreeView1.Selected.Data)^. ...  

---

Amoeba   (2006-03-17 17:39:00) [4]

> Fenix ©   (17.03.06 17:36) [2]
> а как потом мне обратиться? ну допустим мне надо извлечь
> поле UIN из структуры...

Как? Используя приведение типов.

---

Fenix   (2006-03-17 17:36:00) [5]

а как потом мне обратиться? ну допустим мне надо извлечь поле UIN из структуры...

---

isasa   (2006-03-17 17:28:00) [6]

Data:=@< структура>;
?

---

Наверх