...я, похоже, не могу получить для работы уровень ChangeLevelBy(-1), тем не менее, если вам необходимо переместить элемент на один уровень назад, то это можно сделать так:
with Outline1[Outline1.SelectedItem] do if Level > 1 then moveto(Parent.Index,oaAdd); |
[000682]