Вниз
Скачать: CL | DM;

TreeView   Найти похожие ветки 

← →
Masa ©   (2002-09-04 16:55) [0]

Есть дерево:

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

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


← →
MBo ©   (2002-09-04 16:57) [1]

Node.Parent


← →
Masa ©   (2002-09-04 18:18) [2]

А как унать Index Item`a который я выбрал ?


← →
MBo ©   (2002-09-04 18:24) [3]

так в OnChange же Node есть, или Selected используй


← →
Masa ©   (2002-09-04 18:48) [4]

Не выходит. :((

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

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




← →
McSimm ©   (2002-09-04 18:56) [5]

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 19:02) [6]

Спасибо !
То что надо !


← →
Masa ©   (2002-09-04 19:16) [7]

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

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


← →
TTCustomDelphiMaster ©   (2002-09-04 21:30) [8]

Node.Parent.Parent


← →
Masa ©   (2002-09-04 23:22) [9]

Например есть вот такое дерево:

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 т.д.

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







← →
MBo ©   (2002-09-05 05:20) [10]

Ты случайно не издеваешься?

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


← →
Masa ©   (2002-09-05 10:19) [11]

Не издеваюсь, просто первый раз с этим работаю. :))
Спасибо за помошь, я уже разобрался как это работает.
Все работает.



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.47 MB
Время: 0.01 c
8-50873
fore_3
2002-05-16 12:54
2002.09.16
Проблема с перемоткой DVD


7-50990
aaZ
2002-06-22 18:19
2002.09.16
Keyboard hook


6-50895
werr
2002-07-09 16:41
2002.09.16
Как программно узнать каким юзером занят файл?


1-50819
Z:TCFV
2002-09-03 18:32
2002.09.16
Помогите


1-50670
AndbyOne
2002-09-04 11:53
2002.09.16
Быстрый поиск в Tree по значению TPointer




   Наверх