Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.01.17;
Скачать: [xml.tar.bz2];




Вниз

Иерархическая структура 


vuk   (2001-12-28 15:21) [2]

В принципе - ничего особо сложного. Каждый узел дерева (Node) можно представить как что-то типа того:

TNode = class
//это, я думаю, понятно
property Parent : TNode ... ;
property Children[index : integer]:TNode ...;
property ChildrenCount : integer ...;
property Data : .... ;

//это не обязательно, но иногда удобнее для обхода дерева,
//да и структуру дерева можно строить именно через эти
//свойства
//FirstChild - первый "ребенок" узла
property FirstChild : TNode...;
//NextSibling - следующий "родной брат"
property NextSibling : TNode...;

end;

все нужные операции (добавление/удаление элементов), я думаю, очевидны.

Если объекты по каким-то причинам не устраивают, то можно все сделать на record"ах.
Для удобства все элементы дерева можно хранить в линейном массиве - это иногда упрощает обход элементов.




Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.01.17;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.71 MB
Время: 0.021 c
3-52462           Knyaz17               2001-12-14 10:04  2002.01.17  
Как использовать отладчик ХП?


6-52630           z0ne                  2001-10-19 02:18  2002.01.17  
server sharedirname --->>> d: dir subdirwhatshared


1-52585           Марина                2001-12-29 09:05  2002.01.17  
Минимизация формы


6-52629           Polevi                2001-10-22 16:10  2002.01.17  
Как это понимать?


1-52603           BFG                   2001-12-29 17:36  2002.01.17  
Image