DELPHI, Paradox и древовидные структуры данных

← →
OneOfTheFew (2003-03-20 13:29) [0]

Уважаемые Мастера !
Помогите решить такую задачу (желательно стандартными средствами: Delphi и Local SQL):

Есть парадоксовская таблица, описывающая древовидную стуктуру:
<Persons.db>
Person_id I
Parent_id I
Person_Name A(30)

Как получить список всех Person_id подчиненных указанному элементу непосредственно и опосредовано? Понятно, что глубина вложенности дерева практически не ограничена.

Заранее благодарю за помощь!

← →
Соловьев © (2003-03-20 13:31) [1]

select PersonID from Persons where ParentId=10

← →
OneOfTheFew (2003-03-20 17:42) [2]

2 Соловьев

Не, Вы не поняли. Мне нужно "вычленить" поддерево все, а Ваше решение выдает только прямых "детишек". А как насчет "внуков" и "правнуков" ???

← →
Соловьев © (2003-03-20 17:46) [3]

на парадоксе такое не решаемо...хотя в цыкле программно, а вот на IB и ему подобных с ХП вполне. www.ibase.ru там есть классные примеры...

← →
Mike Kouzmine (2003-03-20 17:50) [4]

Возьми пролог. Там это считается одной строчкой :)

для твоей задачи может пригодиться такое решение: создать дополнительную таблицу Parent_ID, Person_ID, в которой будут харниться все пары Parent_ID со всеми возможными потомками Person_ID.

пример основной таблицы:
1 0 Петров
2 1 Иванов
3 2 Сидоров
4 2 Орлов
5 4 Козлов
а так будет выглядеть дополнительная таблица:
1 2
1 3
1 4
1 5
2 3
2 4
2 5
4 5

← →
OneOfTheFew (2003-03-21 14:05) [6]

Всем Спасибо!

DELPHI, Paradox и древовидные структуры данных Найти похожие ветки