Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

TreeView [D6]

Masa © (2002-09-04 16:55:00)
Есть дерево:

Item 1
---- item 1.2
---------- item 1.2.1

Как по клику на item 1.2.1
узнать item 1.2 и item 1 ?

Masa (2002-09-05 10:19:00) [1]
Не издеваюсь, просто первый раз с этим работаю. :))
Спасибо за помошь, я уже разобрался как это работает.
Все работает.

MBo (2002-09-05 05:20:00) [2]
Ты случайно не издеваешься?

поднимайся по Parent, пока он не будет Nil

Masa (2002-09-04 23:22:00) [3]
Например есть вот такое дерево:

Item 1
---- item 1.2
---------- item 1.2.1
---------- item 1.2.1
---------- item 1.2.3
---------- item 1.2.4
---------- item 1.2.5
---- item 1.3
---- item 1.4
item 2
---- item 2.1
---- item 2.2
---------- item 2.2.1
---------- item 2.2.1
---------- item 2.2.3

Нужно при клике на item 2.2.3 или item 2.2 узнать item 2
при клике на item 1.2.5 или item 1.4 узнать Item 1 т.д.

Спасибо за помошь.

TTCustomDelphiMaster (2002-09-04 21:30:00) [4]
Node.Parent.Parent

Masa (2002-09-04 19:16:00) [5]
Item 1
---- item 1.2
---------- item 1.2.1

А каким образом можно получить кликнув на item 1.2.1
имя Item 1 ?

Masa (2002-09-04 19:02:00) [6]
Спасибо !
То что надо !

McSimm (2002-09-04 18:56:00) [7]
procedure TForm1.TreeView1Click(Sender: TObject);
begin
if Assigned(TreeView1.Selected) then Memo1.Lines.Add(TreeView1.Selected.Text);
end;

Но лучше: (на OnChange)

procedure TForm1.TreeView1Change(Sender: TObject; Node: TTreeNode);
begin
if Assigned(Node) then Memo1.Lines.Add(Node.Text);
end;

Masa (2002-09-04 18:48:00) [8]
Не выходит. :((

procedure TForm1.TreeView1Click(Sender: TObject);
begin
Memo1.Lines.Add(TreeView1.Items[0].Text;
end;

А вот как вместо 0 подставить тот елемент которы Selected ?

MBo (2002-09-04 18:24:00) [9]
так в OnChange же Node есть, или Selected используй

Masa (2002-09-04 18:18:00) [10]
А как унать Index Item`a который я выбрал ?

MBo (2002-09-04 16:57:00) [11]
Node.Parent

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »