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

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]

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


 
Zelius ©   (2003-03-20 22:24) [5]

для твоей задачи может пригодиться такое решение: создать дополнительную таблицу 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]

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



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

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



Память: 0.46 MB
Время: 0.01 c
1-30398
Intell
2003-03-30 14:18
2003.04.10
Как изменить цвет выделения строки в ListBox?


1-30460
race1
2003-03-31 13:06
2003.04.10
combobox.item


6-30491
cyberwolf
2003-02-18 19:52
2003.04.10
default dialup


6-30504
stur
2003-02-17 16:32
2003.04.10
ClientSocket , режим NonBlocking. Где обработать исключение?


1-30439
dir_er
2003-03-31 04:08
2003.04.10
параметры и мессаги




   Наверх