Как реализовать перемещение элементов в TTreeView вверх или вниз

← →
oduvan (2003-08-21 09:24) [0]

т.е. допустим есть елементы:

111111
222222
333333
444444

переместить 2 элемент вверх

222222
111111
333333
444444

Ни че немогу придумать. помогите пожалуйста.

У меня голова кипит уже.

← →
Skier © (2003-08-21 09:26) [1]

Как переместить ?
программно ? или через Drag and Drop ?

← →
oduvan (2003-08-21 09:33) [2]

мне нужно программно, а как это сделать не знаю

← →
wl © (2003-08-21 09:56) [3]

Находишь два узла, которые надо поменять (один Selected, другой либо выше, либо ниже) и меняешь у них заголовки, ну ещё может Objects.

← →
Guerrillero © (2003-08-21 11:14) [4]

TreeView1.Items[1].MoveTo(TreeView1.Items[0],naInsert);

← →
wl © (2003-08-21 11:17) [5]

>Guerrillero © (21.08.03 11:14) [4]
аха, так проще...

← →
Zelius © (2003-08-21 11:36) [6]

Moves the node to another location in the tree view.
procedure TTreeNode.MoveTo(Destination: TTreeNode; Mode: TNodeAttachMode);

← →
oduvan (2003-08-21 15:18) [7]

Всем пасибо.))))) некоторых вещей я просто не знал.

← →
oduvan (2003-08-21 15:35) [8]

хы, ладно вроде все ок, но если перемещается верхний элемент дерева, то упс - не точто надо бы.

до:

11111
a11111
b11111
ba11111
c11111
22222
a22222
aa22222
b22222
33333
.....
.....

после:

22222
a22222
aa22222
b22222
11111
a11111
b11111
ba11111
c11111
33333
.....
.....

И т.д.

как перемешать пурвый уровень (просто цыфры) со всем деревом?????

наверное в цикле перебирать всех детей и переносить вслед за родителем?

← →
oduvan (2003-08-21 16:39) [10]

ыыыыы, апо проще? я думаю можно, т.к. по идеи в каждом НОДЕ есть ссылка на другой НОД, чтологически должно решить эту проблему, но у меня чото не получется. Если бы можно было бы сделать так:

b:=tree.items[0];
a:=tree.items[1];

tree.items[0]:=a;
tree.items[1]:=b;

Как реализовать перемещение элементов в TTreeView вверх или вниз Найти похожие ветки