| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Вопрос по TTreeView [D6, WinXP]
SergeyVP © (2002-12-16 03:57:00)Мастера, помогите!
Мне нужно к полю TTreeNode.Data привязать конкретный тип, например TMyType. Конечно это можно сделать так TMyType(Item.Data), но тогда все замарочки по созданию и освобожденю этого указателя нужно обробатывать в событиях OnCreate/OnDestroy формы. Я хочу разгрузить главный модуль, тем что переопределить поле Data в TTreeNode на мой тип и инициализировать его в конструкторе TTreeNode.
Теперь вопрос: как мне правильно переопределить объекты TTreeView и TTreeNode что бы это сделать?
Буду благодарен за ответы.
SergeyVP (2002-12-16 11:28:00) [1]Интересно....
Попробую в этом направлении поработать.
msts (2002-12-16 08:44:00) [2]Еще - если идти таким путем то и свойство Data использовать не надо прям у объекта и заводи данные
msts (2002-12-16 08:40:00) [3]procedure TForm1.OnCreateNodeClass(Sender: TCustomTreeView;
var NodeClass: TTreeNodeClass);
У дерева есть событие OnCreateNodeClass (D6) в нем и присвой значение
NodeClass := TMyTreeNode где TMyTreeNode = class(TTreeNode)
ну далее как хочешь...
НО приведение типов делать все равно придется
procedure TForm1.OnChange(Sender: TObject; Node: TreeNode);
где TMyTreeNode(Node)
Сам не юзал так что пробуй
| |
