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

TTreeNode: отцы и дети   Найти похожие ветки 

← →
ИМХО ©   (2004-08-30 14:52) [0]

Имеем дерево:

A
B
C
 D
 E
  F
 G
  H
  I
  J
K

Нужно найти всех детей узла C.

Понятно с D, E и G (проверяем, является ли для них узел C Parent).

А как насчет F, H, I и J?

---

← →
KSergey ©   (2004-08-30 14:55) [1]

Рекурсия от С? (Count, Item)

---

← →
YurikGL ©   (2004-08-30 14:57) [2]

http://delphimaster.net/view/1-1093847342/

---

← →
Digitman ©   (2004-08-30 14:59) [3]

> Нужно найти всех детей узла C.


> А как насчет F, H, I и J?


а никак.
эти узлы не имеют "прямой родственной сыновне/дочерней связи" с узлом С.

о своих "прямых наследниках" знает только тот узел, кто имеет оные "сыновне/дочерние" связи, у него (этого узла) и следует спрашивать об этом

---

← →
ИМХО ©   (2004-08-30 15:29) [4]

Неверно выразился. Найти не только прямых детей, а еще и узлы, связанные теми или иными связями с узлом C.

---

← →
MBo ©   (2004-08-30 15:31) [5]

procedure Walk(Node: TTreeNode);
 var i: Integer;
 begin
   Memo1.Lines.Add(Node.Text);
   for i := 0 to Node.Count - 1 do
     Walk(Node.Item[i]);
 end;

---

← →
Digitman ©   (2004-08-30 15:33) [6]

у каждого прямого наследника спрашивай всех ЕГО прямых наследников

решение ведет в рекурсию - правильно тебе уже сказали

шевели гипоталамусом)

главное - грамотно декларировать и реализовать туи п/п. которая будет вызываться рекурсивно

---

← →
Ega23 ©   (2004-08-30 15:38) [7]

туи п/п - это что????

---

← →
Digitman ©   (2004-08-30 15:45) [8]

п/п = подпрограмма

---

← →
Ega23 ©   (2004-08-30 15:52) [9]

А "туи"?

---

← →
Digitman ©   (2004-08-30 15:57) [10]

"туи" = ту подпрограмму ...

прошу прощения за очепятку

---

← →
Ega23 ©   (2004-08-30 16:02) [11]

А, тады всё ясно...

---

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

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



Память: 0.47 MB
Время: 0.022 c