Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2008.08.10;
Скачать: CL | DM;

Вниз

TreeNode   Найти похожие ветки 

 
IvanS   (2008-07-09 14:53) [0]

Есть дерево TTreeView и отдельный элемент "NewNode" - TTreeNode (вне дерева, отдельной переменной). Как этот элемент грамотно добавить в само дерево, сразу же после текущего выделенного элемента в дереве (Selected)?
Отдельный NewNode также содержит Data, который следует указать и в добавленном элементе.
Мне необходимо иметь возможность добавить NewNode несколько раз, в нескольких разных местах. Проблемы начинаются у меня в том месте, когда я хочу элемент NewNode добавить повторно.

Как необходимо действовать?

Сейчас делаю так:
TreeView.Selected := TreeView.Items.AddNode(NewNode, TreeView.Selected, NewNode.Text, NewNode.Data, naInsert);


 
Palladin ©   (2008-07-09 14:56) [1]


> Проблемы начинаются у меня в том месте, когда я хочу элемент
> NewNode добавить повторно.

а не нужно его добавлять повторно. создавай новый экземпляр.


 
IvanS   (2008-07-09 19:56) [2]

А каким образом это сделать? Я пробовал:
TreeView.Items.AddObject(TreeView.Selected, NewNode.Text, NewNode.Data);

и даже так:
var
 SNode: TTreeNode;
begin
 SNode := TTreeNode.Create(TreeView.Items);
 SNode.Assign(NewNode);
 SNode.Data := NewNode.Data;

 TreeView.Items.Add... (SNode, ...);


Ничего не помогает.

У меня в TreeView.OnDeletion:
if Node.Data <> nil then
 Dispose(PSuperItem(Node.Data));


И если я один из добавленных узлов удаляю, то он удаляет PSuperItem данные, которые удаляются во всех добавленных мною узлов. Из-за этого все перестает функционировать.

Как поступить?


 
Johnmen ©   (2008-07-09 20:06) [3]


>  то он удаляет PSuperItem данные

Насколько видно, их удаляешь ты, а не он.

> удаляются во всех добавленных мною узлов

Естественно, ведь у тебя это указалель на один и тот же объект.



Страницы: 1 вся ветка

Текущий архив: 2008.08.10;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.011 c
2-1215539957
GrieVeR-13
2008-07-08 21:59
2008.08.10
Проблема с функциями EnumWindows и GetWindowText


8-1183314956
VitusV
2007-07-01 22:35
2008.08.10
Воспроизведение видео на 2х мониторах


2-1215457662
maxon
2008-07-07 23:07
2008.08.10
Функции и ее результат.


15-1214221429
Хохол
2008-06-23 15:43
2008.08.10
Компоненты для работы с Firebird


15-1214467249
123-ий
2008-06-26 12:00
2008.08.10
Интернет магазин