Обращение к родительской ветке древа

← →
0_o (2006-05-29 18:48) [0]

Случай такой: нужно при выборе дочерней ветки получать значение поля Data родителя этой ветки,
а у мну получается получать только значение Data предыдущей дочерней ветки.

procedure TForm1.TreeViewChange(Sender: TObject; Node: TTreeNode); var i,j: integer; begin if (TreeView.Selected = nil) or (TreeView.Selected.Level = 0) then Exit; i:=integer(TreeView.Selected.GetPrev.Data); // << Неверные действия здесь j:=integer(TreeView.Selected.Data); ShowMessage(".Data родителя = "+IntToStr(i)+" .Data текущей ветки = "+IntToStr(j)); ... end;

Подскажите пилиз как решить?

← →
EvS © (2006-05-29 19:00) [1]

i:=integer(TreeView.Selected.GetPrev.Data)-> i:=integer(TreeView.Selected.Parent.Data);

← →
0_o (2006-05-29 19:52) [2]

2EvS
Огромное спасибо!

Обращение к родительской ветке древа Найти похожие ветки