Доброе время суток.
Необходимо запретить перенос узлов на другие уровни.
В DevExprese у TreeList есть индикатор Drag&Drop
(работа индикатора, 3 его положения представлены на скрине)
Можно ли как нибудь определить его состояние в событии:
Код:
procedure DragOver(Sender, Source: TObject; X, Y: Integer;
State: TDragState; var Accept: Boolean);
?
Что бы получилось что то вроде
Код:
if InicatorState = 1 then
Accept := false
else
Accept := true
Тогда задача решилась бы сама собой, но не как не могу определить статус этого индикатора....