Скопировать один TreeView в другой

← →
DelphiLexx © (2006-07-26 16:09) [0]

Мне нужно сделать копию одного TreeView в другой. Метод Assign не помагает.
Т.е. у меня есть TreeView1 и TreeView2.
TreeView1 должен стать аналогичен TreeView2 и после чего TreeView2 делаем TreeView2.Free. Так как сделать копию?

← →
MBo © (2006-07-26 16:10) [1]

SaveToStream/Load

← →
DelphiLexx © (2006-07-26 16:15) [2]

> SaveToStream/Load

А почему Assign не работает?

← →
MBo © (2006-07-26 16:18) [3]

>А почему Assign не работает?
Этот метод не обязан быть реализован

← →
PSPF2003 © (2006-07-26 18:38) [4]

Хм... :)
А ты как писал?
Так :
TreeView1.Assign();
или так :
TreeView1.Items.Assign();

← →
DelphiLexx © (2006-07-27 09:06) [5]

> TreeView1.Assign();

TreeView1.Assign();

Так тебе что надо, Items скопировать ?

> Так тебе что надо, Items скопировать ?

Один из способ копирования одного TreeView в другой даже с сохранением
сортировки:
procedure TForm1.btn1Click(Sender: TObject); var m : TMemoryStream; begin m := TMemoryStream.Create; m.Seek(0, soFromBeginning); tv2.SaveToStream(m); m.Seek(0, soFromBeginning); tv1.LoadFromStream(m); m.Free; end;
Но у меня первоначальной дерево создается через AddObject, в котором
2-ой параметр укаатель Pointer. Так вот данные этих не сохраняются. Как быть?

Скопировать один TreeView в другой Найти похожие ветки