Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

реализация АВЛ дерева на Delphi

alson © (2006-02-01 17:27:00)
Нужна реализация АВЛ дерева на Delphi. В сети че-то найти не могу нормальной реализации, т.е. чтобы было "красиво" сделано на классах. Сделано все через процедурное программирование или на С... Очень срочно нуна... Мот кто подскажет, где взять мона?

Alex Konshin (2006-02-03 13:29:00) [1]
Это неверно идеалогически. Тебе ненужен parent. Ты не должен лезьть в дерево грязными руками, считай, что это всего лишь способ организации индекса, что так и есть на самом деле. Многие заблуждаются считая, что AVL - обычное дерево. Оно очень специфичное и менять в нем что-то просто так нельзя. Тебе дано property Tree, вот им и пользуйся.
Я подозреваю, зачем оно тебе нужно. Ты хочешь задешево достать соседей. Так в обще случае через родителя ты узнаешь только одного из соседей, причем без не сразу ясно какого из них. А второго все равно искать нужно.
Можешь посмотреть другой юнит Arrays с моего сайта. Там тоже используется AVL-tree, но зато можно обращаться к элементам по логическому индексу, т.е. соседи достаются дешево и просто.

sally (2006-02-02 14:38:00) [2]
>Alex Konshin
Спасибо за дерево.
Предложение - сделать в Node свойство Parent.
Очень спосло бы во многих случаях.

Alex Konshin (2006-02-02 14:02:00) [3]
Хм. Ты меня озадачил... А что, какие-то проблемы со "взять"?

msguns (2006-02-02 13:57:00) [4]
Леш, а можно мне ArrayGrid взять посмотреть ?

Alex Konshin (2006-02-02 13:36:00) [5]
Я бы не сказал, что у меня красиво, но то, что быстро - однозначно.

alson (2006-02-01 17:48:00) [6]
СПАСИБО!!!! То что нужно!!!

Игорь Шевченко (2006-02-01 17:45:00) [7]
http://home.earthlink.net/~akonshin/поищи

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »