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

Количество дочерних элементов элементов в дереве   Найти похожие ветки 

← →
Dionnis   (2004-10-16 16:42) [0]

Добрый день всем! В дереве нужно посчитать для каждого узла количество всех его дочерних элементов.
Tree. Items[i].Count не даёт желаемого результата, так как Count - это количество дочерних элементов i-го узла, а если эти элементы имеют в свою очередь дочерние элементы, то они не принимаются в расчёт. Может есть какой известный алгоритм для подсчёта этих элементов, тогда киньте ссылочку, или текст.  
Заранее всем благодарен!

---

← →
aleshap   (2004-10-16 16:48) [1]

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

---

← →
Dionnis   (2004-10-16 16:59) [2]

Спасибо конечно за подсказку, но то что он рекурсивный это понятно 8-), а поконкретнее нельзя?

---

← →
begin...end ©   (2004-10-16 17:13) [3]

Вроде так, насколько я понимаю:

функция ЧислоДочернихЭлементов(НомерУзла: Integer): Integer;
переменные
 Количество, Индекс: Integer;
начало
 Результат := 0;
 Количество := Items[НомерУзла].Count;
 если Количество = 0 тогда
   Результат := Количество
 иначе
   для Индекс := 0 до Количество - 1 делаем
     Увеличить(Результат, ЧислоДочернихЭлементов(Индекс))
конец.

---

← →
Dionnis   (2004-10-16 17:22) [4]

Спасибо большое!!! 8-)

---

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

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



Память: 0.45 MB
Время: 0.021 c