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

Вниз

TTreeNode скопировать   Найти похожие ветки 

 
Wowa1   (2008-07-08 21:22) [0]

хочу сделать реальную копию одного TTreeNode, а не ссылку.

var
 NodeTmp: TTreeNode;

procedure p1;
begin
 NodeTmp := TreeView.Selected;
 TreeView.Items.Delete(TreeView.Selected);
end;


Хочу что бы после удаления из TreeView, данные оставались в NodeTmp. Что надо сделать?


 
Johnmen ©   (2008-07-08 21:33) [1]

Создать NodeTmp.


 
Wowa1   (2008-07-08 21:39) [2]

А где и как это делать надо?

var
NodeTmp: TTreeNode;

procedure p1;
begin
NodeTmp := TTreeNode.Create(nil);
NodeTmp := TreeView.Selected;
TreeView.Items.Delete(TreeView.Selected);
end;


Так не получается.


 
JanMihail   (2008-07-08 21:41) [3]

NodeTmp := TTreeNode.Create(TreeView.Items);


 
Wowa1   (2008-07-08 21:43) [4]

Так тоже не получается. После удаления из TreeView в NodeTmp данные пропадают.


 
JanMihail   (2008-07-08 21:47) [5]

Зачем Вам весь объект. Сохраните нужные данные из него да и все


 
JanMihail   (2008-07-08 21:53) [6]

Попробуйте в другой TTreeView сохранять


 
Игорь Шевченко ©   (2008-07-08 21:58) [7]

скопировать в tmpnode надо. У TTreeNode есть замечательный метод Assign


 
Wowa1   (2008-07-08 22:18) [8]


> скопировать в tmpnode надо. У TTreeNode есть замечательный
> метод Assign

Спасибо, это помогло. А при этом .Data из источника не скопируется в новый экземпляр NodeTmp?
Как перенести .Data?


 
Ega23 ©   (2008-07-08 22:30) [9]


> Как перенести .Data?

Data - это указатель. Куда и на что он у тебя указывает - это твоё дело.
Копируется оператором присваивания: tmpnode.Data := TreeView.Selected.Data


 
MsGuns ©   (2008-07-08 22:47) [10]

А зачем удалять, может просто сделать узел невидимым ?



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

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

Наверх




Память: 0.48 MB
Время: 0.018 c
2-1215600820
IvanS
2008-07-09 14:53
2008.08.10
TreeNode


15-1213898858
Knight
2008-06-19 22:07
2008.08.10
Железячники, что можно установить на MB Asus A7V600-X ?


15-1214114732
Kostafey
2008-06-22 10:05
2008.08.10
Just for fun: Почему у Microsoft ничего не выйдет с .Net


6-1191558528
R4V3N
2007-10-05 08:28
2008.08.10
Проверка активности ServerSocketa


4-1192602325
_Guest_
2007-10-17 10:25
2008.08.10
Распознать подключение / отключение флешки