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

← →
Fenix © (2006-03-17 17:26) [0]

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

← →
isasa © (2006-03-17 17:28) [1]

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

← →
Fenix © (2006-03-17 17:36) [2]

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

← →
Amoeba © (2006-03-17 17:39) [3]

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

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

← →
Stakan © (2006-03-17 17:41) [4]

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)^. ...

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

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

Как можно в Data засунуть мою структуру? Найти похожие ветки